diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2010-02-10 03:31:02 +0000 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2010-02-10 03:31:02 +0000 |
| commit | db9633ec5c9f1f260cd722e43c25df9485ba3620 (patch) | |
| tree | ecac0023831a1f8942acc1e7e19b053360ab088d /gcc/fortran/array.c | |
| parent | b09495c1a6524b32952fe5b73fcc715699083e33 (diff) | |
| download | gcc-db9633ec5c9f1f260cd722e43c25df9485ba3620.zip gcc-db9633ec5c9f1f260cd722e43c25df9485ba3620.tar.gz gcc-db9633ec5c9f1f260cd722e43c25df9485ba3620.tar.bz2 | |
re PR fortran/42999 (bogus error: Parameter 'i' at (1) has not been declared or is a variable, which does not reduce to a constant expression)
2010-02-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR fortran/42999
* array.c (gfc_constant_ac): Do not prevent expansion of constructors
with iterators.
From-SVN: r156642
Diffstat (limited to 'gcc/fortran/array.c')
| -rw-r--r-- | gcc/fortran/array.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/gcc/fortran/array.c b/gcc/fortran/array.c index 094026f..e0714e3 100644 --- a/gcc/fortran/array.c +++ b/gcc/fortran/array.c @@ -1522,8 +1522,7 @@ gfc_constant_ac (gfc_expr *e) rc = SUCCESS; if (e->value.constructor - && e->value.constructor->expr->expr_type == EXPR_ARRAY - && !e->value.constructor->iterator) + && e->value.constructor->expr->expr_type == EXPR_ARRAY) { /* Expand the constructor. */ iter_stack = NULL; |