[Bug fortran/34990] [4.3 Regression] ICE in gfc_typenode_for_spec, at fortran/trans-types.c:842

[jvdelisle at gcc dot gnu dot org]

------- Comment #2 from jvdelisle at gcc dot gnu dot org  2008-01-27 18:37 
-------
Reverting with the following clears this bug:

Index: array.c
===================================================================
--- array.c     (revision 131876)
+++ array.c     (working copy)
@@ -1025,7 +1025,6 @@ gfc_check_constructor_type (gfc_expr *e)

   cons_state = CONS_START;
   gfc_clear_ts (&constructor_ts);
-  gfc_clear_ts (&e->ts);

   t = check_constructor_type (e->value.constructor);
   if (t == SUCCESS && e->ts.type == BT_UNKNOWN)

I suspect we just need to do this clearing conditioned on somthing.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34990