initialization.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180844
138bc75d-0d04-0410-961f-
82ee72b054a4
2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
+ * trans-array.c (gfc_trans_preloop_setup): Factor loop index
+ initialization.
+
+2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
+
* trans-array.c (gfc_trans_preloop_setup): Move code earlier.
2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
continue;
if (info->ref)
- {
- ar = &info->ref->u.ar;
- i = loop->order[dim + 1];
- }
+ ar = &info->ref->u.ar;
else
- {
- ar = NULL;
- i = dim + 1;
- }
+ ar = NULL;
+
+ i = dim + 1;
+ /* For the time being, there is no loop reordering. */
+ gcc_assert (i == loop->order[i]);
+ i = loop->order[i];
if (dim == info->dimen - 1)
{