diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2008-01-26 19:01:07 +0000 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2008-01-26 19:01:07 +0000 |
| commit | bdfc46af998ed47f58435744d0473722db127175 (patch) | |
| tree | a3aae605c0d35984000ae663503cfbc45b1da85b | |
| parent | f0025d1d6992dd2424d80e2dcdeec73cd7b909ad (diff) | |
| download | gcc-bdfc46af998ed47f58435744d0473722db127175.zip gcc-bdfc46af998ed47f58435744d0473722db127175.tar.gz gcc-bdfc46af998ed47f58435744d0473722db127175.tar.bz2 | |
re PR fortran/31610 (ICE with transfer, merge in gfc_conv_expr_descriptor)
2008-01-26 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR fortran/31610
* trans-array.c (gfc_trans_create_temp_array): Remove call to
gcc_assert (integer_zerop (loop->from[n])).
From-SVN: r131873
| -rw-r--r-- | gcc/fortran/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/fortran/trans-array.c | 6 |
2 files changed, 9 insertions, 3 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 6860244..0c8f4a2 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,9 @@ +2008-01-26 Jerry DeLisle <jvdelisle@gcc.gnu.org> + + PR fortran/31610 + * trans-array.c (gfc_trans_create_temp_array): Remove call to + gcc_assert (integer_zerop (loop->from[n])). + 2008-01-25 Daniel Franke <franke.daniel@gmail.com> PR fortran/34661 diff --git a/gcc/fortran/trans-array.c b/gcc/fortran/trans-array.c index f9c7619..41f01b84 100644 --- a/gcc/fortran/trans-array.c +++ b/gcc/fortran/trans-array.c @@ -588,9 +588,9 @@ gfc_trans_create_temp_array (stmtblock_t * pre, stmtblock_t * post, for (dim = 0; dim < info->dimen; dim++) { n = loop->order[dim]; - if (n < loop->temp_dim) - gcc_assert (integer_zerop (loop->from[n])); - else + /* TODO: Investigate why "if (n < loop->temp_dim) + gcc_assert (integer_zerop (loop->from[n]));" fails here. */ + if (n >= loop->temp_dim) { /* Callee allocated arrays may not have a known bound yet. */ if (loop->to[n]) |