diff options
| author | Mikael Morin <mikael.morin@tele2.fr> | 2008-11-24 20:04:34 +0100 |
|---|---|---|
| committer | Mikael Morin <mikael@gcc.gnu.org> | 2008-11-24 19:04:34 +0000 |
| commit | 6e7cc036d23e3eba474a083d8b1348b9252ff870 (patch) | |
| tree | 8afcec85bbbdbfe33d5210495fcf425aac29a173 /gcc/fortran | |
| parent | c63d77544c698d5ee05f194ae241db82b1769497 (diff) | |
| download | gcc-6e7cc036d23e3eba474a083d8b1348b9252ff870.zip gcc-6e7cc036d23e3eba474a083d8b1348b9252ff870.tar.gz gcc-6e7cc036d23e3eba474a083d8b1348b9252ff870.tar.bz2 | |
re PR fortran/38184 (invariant RESHAPE not expanded if SOURCE is empty)
2008-11-24 Mikael Morin <mikael.morin@tele2.fr>
PR fortran/38184
* simplify.c (is_constant_array_expr): Return true instead of false
if the array constructor is empty.
2008-11-24 Mikael Morin <mikael.morin@tele2.fr>
PR fortran/38184
* gfortran.dg/reshape_empty_1.f03: New test.
From-SVN: r142168
Diffstat (limited to 'gcc/fortran')
| -rw-r--r-- | gcc/fortran/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/fortran/simplify.c | 3 |
2 files changed, 6 insertions, 3 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 8a00921..5fe6e9e 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,9 @@ +2008-11-24 Mikael Morin <mikael.morin@tele2.fr> + + PR fortran/38184 + * simplify.c (is_constant_array_expr): Return true instead of false + if the array constructor is empty. + 2008-11-24 Daniel Kraft <d@domob.eu> PR fortran/37779 diff --git a/gcc/fortran/simplify.c b/gcc/fortran/simplify.c index 34105bc..7922bde 100644 --- a/gcc/fortran/simplify.c +++ b/gcc/fortran/simplify.c @@ -3410,9 +3410,6 @@ is_constant_array_expr (gfc_expr *e) if (e->expr_type != EXPR_ARRAY || !gfc_is_constant_expr (e)) return false; - if (e->value.constructor == NULL) - return false; - for (c = e->value.constructor; c; c = c->next) if (c->expr->expr_type != EXPR_CONSTANT) return false; |