re PR fortran/30207 (ICE in gfc_dep_resolver with where (a < 0) a(:) = 1)
authorRoger Sayle <sayle@gcc.gnu.org>
Sun, 17 Dec 2006 18:28:07 +0000 (18:28 +0000)
committerRoger Sayle <sayle@gcc.gnu.org>
Sun, 17 Dec 2006 18:28:07 +0000 (18:28 +0000)
commitfcd443200bdf5cefcfd2a711ae6fae6239443aca
treee7831650401f70808448a7867424483017c55832
parent2ef73bb4ef051fdcf5e186465fa9bf4f7933f8f3
re PR fortran/30207 (ICE in gfc_dep_resolver with where (a < 0) a(:) = 1)

2006-12-17  Roger Sayle  <roger@eyesopen.com>
    Steven G. Kargl  <kargl@gcc.gnu.org>

PR fortran/30207
* dependency.c (gfc_full_array_ref_p): New function to test whether
the given array ref specifies the entire array.
(gfc_dep_resolver): Use gfc_full_array_ref_p to analyze AR_FULL
array refs against AR_SECTION array refs, and vice versa.
* dependency.h (gfc_full_array_ref_p): Prototype here.
* trans-array.c (gfc_conv_expr_descriptor): Use gfc_full_array_ref_p.

* gfortran.fortran-torture/execute/where21.f90: New test.

From-SVN: r119990
gcc/fortran/ChangeLog
gcc/fortran/dependency.c
gcc/fortran/dependency.h
gcc/fortran/trans-array.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.fortran-torture/execute/where21.f90 [new file with mode: 0644]