diff options
author | Roger Sayle <sayle@gcc.gnu.org> | 2006-12-17 18:28:07 +0000 |
---|---|---|
committer | Roger Sayle <sayle@gcc.gnu.org> | 2006-12-17 18:28:07 +0000 |
commit | fcd443200bdf5cefcfd2a711ae6fae6239443aca (patch) | |
tree | e7831650401f70808448a7867424483017c55832 /gcc/fortran/dependency.h | |
parent | 2ef73bb4ef051fdcf5e186465fa9bf4f7933f8f3 (diff) | |
download | gcc-fcd443200bdf5cefcfd2a711ae6fae6239443aca.tar.gz |
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
Diffstat (limited to 'gcc/fortran/dependency.h')
-rw-r--r-- | gcc/fortran/dependency.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/dependency.h b/gcc/fortran/dependency.h index 3851ca21d48..06744fd3613 100644 --- a/gcc/fortran/dependency.h +++ b/gcc/fortran/dependency.h @@ -22,6 +22,7 @@ Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA bool gfc_ref_needs_temporary_p (gfc_ref *); +bool gfc_full_array_ref_p (gfc_ref *); gfc_expr *gfc_get_noncopying_intrinsic_argument (gfc_expr *); int gfc_check_fncall_dependency (gfc_expr *, sym_intent, gfc_symbol *, gfc_actual_arglist *); |