[Bug fortran/25756] New: ICE on valid code

[aldot at gcc dot gnu dot org]

attached label_3.f90, label_4.f90 and label_5.f90 ICE with
gcc version 4.1.0 20060111 (prerelease)

As this worked with g77, please make pr19292 depend on this.

Backtraces are provided for the sake of completeness.


$ gfortran-4.1-HEAD -v  -c -o /tmp/foo.o label_3.f90
 In file label_3.f90:4

1 ! { dg-warning "Ignoring statement label in empty statement" }
                                                               1
Warning: Ignoring statement label in empty statement at (1)
label_3.f90:5: internal compiler error: Segmentation fault

backtrace label_3.f90:
Program received signal SIGSEGV, Segmentation fault.
free_expr0 (e=0x12) at ../../../src/gcc-4.1/gcc/fortran/expr.c:141
141       switch (e->expr_type)
(gdb) bt
#0  free_expr0 (e=0x12) at ../../../src/gcc-4.1/gcc/fortran/expr.c:141
#1  0x0805f161 in gfc_free_expr (e=0x12) at
../../../src/gcc-4.1/gcc/fortran/expr.c:230
#2  0x08090663 in gfc_free_namespace (ns=0x8564d30) at
../../../src/gcc-4.1/gcc/fortran/symbol.c:1504
#3  0x08090728 in gfc_symbol_done_2 () at
../../../src/gcc-4.1/gcc/fortran/symbol.c:2393
#4  0x080783f8 in gfc_done_2 () at ../../../src/gcc-4.1/gcc/fortran/misc.c:293
#5  0x0807f1fe in gfc_parse_file () at
../../../src/gcc-4.1/gcc/fortran/parse.c:2685
#6  0x08098593 in gfc_be_parse_file (set_yydebug=0) at
../../../src/gcc-4.1/gcc/fortran/f95-lang.c:286
#7  0x082cc358 in toplev_main (argc=11, argv=0xbfb72194) at
../../../src/gcc-4.1/gcc/toplev.c:990
#8  0x080ba0f2 in main (argc=8191, argv=0x29) at
../../../src/gcc-4.1/gcc/main.c:35

======================================================================
$ gfortran-4.1-HEAD -v  -c -o /tmp/foo.o label_4.f90
 In file label_4.f90:4

1 ! { dg-warning "Ignoring statement label in empty statement" }
                                                               1
Warning: Ignoring statement label in empty statement at (1)
label_4.f90:5: internal compiler error: Segmentation fault

backtrace label_4.f90:
Program received signal SIGSEGV, Segmentation fault.
free_expr0 (e=0x12) at ../../../src/gcc-4.1/gcc/fortran/expr.c:141
141       switch (e->expr_type)
(gdb) bt
#0  free_expr0 (e=0x12) at ../../../src/gcc-4.1/gcc/fortran/expr.c:141
#1  0x0805f161 in gfc_free_expr (e=0x12) at
../../../src/gcc-4.1/gcc/fortran/expr.c:230
#2  0x08090663 in gfc_free_namespace (ns=0x8564d30) at
../../../src/gcc-4.1/gcc/fortran/symbol.c:1504
#3  0x08090728 in gfc_symbol_done_2 () at
../../../src/gcc-4.1/gcc/fortran/symbol.c:2393
#4  0x080783f8 in gfc_done_2 () at ../../../src/gcc-4.1/gcc/fortran/misc.c:293
#5  0x0807f1fe in gfc_parse_file () at
../../../src/gcc-4.1/gcc/fortran/parse.c:2685
#6  0x08098593 in gfc_be_parse_file (set_yydebug=0) at
../../../src/gcc-4.1/gcc/fortran/f95-lang.c:286
#7  0x082cc358 in toplev_main (argc=11, argv=0xbfd7a324) at
../../../src/gcc-4.1/gcc/toplev.c:990
#8  0x080ba0f2 in main (argc=8191, argv=0x29) at
../../../src/gcc-4.1/gcc/main.c:35

======================================================================
$ gfortran-4.1-HEAD -v  -c -o /tmp/foo.o label_5.f90
 In file label_5.f90:4

1 ! { dg-warning "Ignoring statement label in empty statement" }
                                                               1
Warning: Ignoring statement label in empty statement at (1)
 In file label_5.f90:5

1 ! { dg-warning "Ignoring statement label in empty statement" }
                                                               1
Warning: Ignoring statement label in empty statement at (1)
label_5.f90:6: internal compiler error: Segmentation fault


backtrace label_5.f90:
Program received signal SIGSEGV, Segmentation fault.
free_expr0 (e=0x12) at ../../../src/gcc-4.1/gcc/fortran/expr.c:141
141       switch (e->expr_type)
(gdb) bt
#0  free_expr0 (e=0x12) at ../../../src/gcc-4.1/gcc/fortran/expr.c:141
#1  0x0805f161 in gfc_free_expr (e=0x12) at
../../../src/gcc-4.1/gcc/fortran/expr.c:230
#2  0x08090663 in gfc_free_namespace (ns=0x8564d90) at
../../../src/gcc-4.1/gcc/fortran/symbol.c:1504
#3  0x08090728 in gfc_symbol_done_2 () at
../../../src/gcc-4.1/gcc/fortran/symbol.c:2393
#4  0x080783f8 in gfc_done_2 () at ../../../src/gcc-4.1/gcc/fortran/misc.c:293
#5  0x0807f1fe in gfc_parse_file () at
../../../src/gcc-4.1/gcc/fortran/parse.c:2685
#6  0x08098593 in gfc_be_parse_file (set_yydebug=0) at
../../../src/gcc-4.1/gcc/fortran/f95-lang.c:286
#7  0x082cc358 in toplev_main (argc=11, argv=0xbf8d1e34) at
../../../src/gcc-4.1/gcc/toplev.c:990
#8  0x080ba0f2 in main (argc=8191, argv=0x29) at
../../../src/gcc-4.1/gcc/main.c:35


-- 
           Summary: ICE on valid code
           Product: gcc
           Version: 4.1.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: aldot at gcc dot gnu dot org
 GCC build triplet: i686-linux-gnu
  GCC host triplet: i686-linux-gnu
GCC target triplet: i686-linux-gnu
OtherBugsDependingO 19292
             nThis:


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