------- Comment #4 from burnus at gcc dot gnu dot org 2010-01-25 09:37 ------- (In reply to comment #3) > This appears to fix this: regression tested on x86-64
I think the following patch is better. My intrinsic check was bogus. Index: array.c =================================================================== --- array.c (revision 156196) +++ array.c (working copy) @@ -2054,7 +2054,7 @@ gfc_array_dimen_size (gfc_expr *array, i } if (array->symtree->n.sym->attr.generic - && !array->symtree->n.sym->attr.intrinsic) + && array->value.function.esym != NULL) { if (spec_dimen_size (array->value.function.esym->as, dimen, result) == FAILURE) -- burnus at gcc dot gnu dot org changed: What |Removed |Added ---------------------------------------------------------------------------- AssignedTo|unassigned at gcc dot gnu |burnus at gcc dot gnu dot |dot org |org Status|NEW |ASSIGNED Last reconfirmed|2010-01-25 01:18:04 |2010-01-25 09:37:46 date| | http://gcc.gnu.org/bugzilla/show_bug.cgi?id=42858