* io/transfer.c (transfer_array): Remove stride0 fix.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@115818
138bc75d-0d04-0410-961f-
82ee72b054a4
+2006-07-30 Janne Blomqvist <jb@gcc.gnu.org>
+
+ * io/transfer.c (transfer_array): Remove stride0 fix.
+
2006-07-26 Francois-Xavier Coudert <coudert@clipper.ens.fr>
* configure.ac: Check for function clock.
internal_error (&dtp->common, "transfer_array(): Bad type");
}
- if (desc->dim[0].stride == 0)
- desc->dim[0].stride = 1;
-
rank = GFC_DESCRIPTOR_RANK (desc);
for (n = 0; n < rank; n++)
{