------- Comment #3 from dominiq at lps dot ens dot fr 2007-10-11 14:14 -------
I don't know if this the right fix, but
--- /opt/gcc/_gcc-clean/gcc/fortran/simplify.c 2007-10-07 09:37:46.000000000
+0200
+++ /opt/gcc/gcc-4.3-work/gcc/fortran/simplify.c 2007-10-11
16:05:57.000000000 +0200
@@ -4011,6 +4011,11 @@
|| !gfc_is_constant_expr (size))
return NULL;
+ if (source->expr_type != EXPR_ARRAY
+ && source->expr_type != EXPR_STRUCTURE
+ && source->expr_type != EXPR_CONSTANT)
+ return NULL;
+
/* Calculate the size of the source. */
if (source->expr_type == EXPR_ARRAY
&& gfc_array_size (source, &tmp) == FAILURE)
fixes this problem.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33733
