[Bug fortran/44354] implied do loop with its own variable name as upper bound

[mikael at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44354

--- Comment #23 from Mikael Morin <mikael at gcc dot gnu.org> 2012-07-26 08:47:42 UTC ---
Author: mikael
Date: Thu Jul 26 08:47:33 2012
New Revision: 189882

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=189882
Log:
fortran/
    PR fortran/44354
    * array.c (sought_symbol): New variable.
    (expr_is_sought_symbol_ref, find_symbol_in_expr): New functions.
    (resolve_array_list): Check for references to the induction
    variable in the iteration bounds and issue a diagnostic if some
    are found.

testsuite/
    PR fortran/44354
    * gfortran.dg/array_constructor_38.f90: New test.



Added:
    trunk/gcc/testsuite/gfortran.dg/array_constructor_38.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/array.c
    trunk/gcc/testsuite/ChangeLog