[Bug fortran/29537] ICE in gfc_match_common

["aldot at gcc dot gnu dot org" <gcc-bugzilla@gcc.gnu.org>]

------- Comment #3 from aldot at gcc dot gnu dot org  2006-10-21 18:05 -------
(In reply to comment #2)
> (In reply to comment #1)
> > Shorter testcase:
> > $ egrep -v "(^\!|^$)" foo2.f90
> > block data
> >   common c
> > end
> > 
> According to lahey's checker, this code is valid. Still it ICEs

Program received signal SIGSEGV, Segmentation fault.
0x080b0982 in gfc_trans_common (ns=0x85e2f20)
    at ../../../src/gcc-4.2/gcc/fortran/trans-common.c:1059
1059          c->where = ns->proc_name->declared_at;
(gdb) bt
#0  0x080b0982 in gfc_trans_common (ns=0x85e2f20)
    at ../../../src/gcc-4.2/gcc/fortran/trans-common.c:1059
#1  0x080b15a4 in gfc_generate_block_data (ns=0x85e2f20)
    at ../../../src/gcc-4.2/gcc/fortran/trans-decl.c:3316
#2  0x08086b25 in gfc_parse_file ()
    at ../../../src/gcc-4.2/gcc/fortran/parse.c:3237
#3  0x080a5db9 in gfc_be_parse_file (set_yydebug=0)
    at ../../../src/gcc-4.2/gcc/fortran/f95-lang.c:303
#4  0x082f5d6d in toplev_main (argc=15, argv=0xaffe1ad4)
    at ../../../src/gcc-4.2/gcc/toplev.c:1033
#5  0x080cffe6 in main (argc=Cannot access memory at address 0x0
) at ../../../src/gcc-4.2/gcc/main.c:35


-- 


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