------- Comment #3 from burnus at gcc dot gnu dot org 2008-09-08 09:23 -------
Created an attachment (id=16254)
--> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=16254&action=view)
Regtested patch, including test case
The same as patch. However, I'm not sure the fix is right.
a) Why is sym->as NULL even though "X" is an array?
b) Without the if-branch, one misses:
tmp = gfc_get_symbol_decl (sym);
se->expr = tmp;
I'm not sure whether it matters as the test case works OK, but I have the
feeling the patch is wrong and one rather needs to fix sym->as and needs to add
a "gcc_assert (sym->as)".
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=37411
