Home | History | Annotate | Download | only in fortran

Lines Matching refs:ar2

778 is_same_range (gfc_array_ref *ar1, gfc_array_ref *ar2, int n)
785 gcc_assert (ar1 && ar2);
787 gcc_assert (ar1->dimen_type[n] == ar2->dimen_type[n]);
790 e2 = ar2->stride[n];
814 e2 = ar2->start[n];
821 if (ar2->as && !e2)
822 e2 = ar2->as->lower[n];
835 e2 = ar2->end[n];
842 if (ar2->as && !e2)
843 e2 = ar2->as->upper[n];