------- Comment #5 from pault at gcc dot gnu dot org 2007-10-11 07:26 ------- Confirmed.
Tobias, You should have received the fix. Cheers Paul Index: gcc/fortran/trans-array.c =================================================================== *** gcc/fortran/trans-array.c (révision 129121) --- gcc/fortran/trans-array.c (copie de travail) *************** get_array_ctor_var_strlen (gfc_expr * ex *** 1340,1346 **** case REF_SUBSTRING: if (ref->u.ss.start->expr_type != EXPR_CONSTANT ! || ref->u.ss.start->expr_type != EXPR_CONSTANT) break; mpz_init_set_ui (char_len, 1); mpz_add (char_len, char_len, ref->u.ss.end->value.integer); --- 1340,1346 ---- case REF_SUBSTRING: if (ref->u.ss.start->expr_type != EXPR_CONSTANT ! || ref->u.ss.end->expr_type != EXPR_CONSTANT) break; mpz_init_set_ui (char_len, 1); mpz_add (char_len, char_len, ref->u.ss.end->value.integer); -- pault at gcc dot gnu dot org changed: What |Removed |Added ---------------------------------------------------------------------------- Status|UNCONFIRMED |NEW Ever Confirmed|0 |1 Last reconfirmed|0000-00-00 00:00:00 |2007-10-11 07:26:59 date| | http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33727