https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88009
Bug ID: 88009
Summary: [9 Regression] ICE in find_intrinsic_vtab, at
fortran/class.c:2761
Product: gcc
Version: 9.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Changed between 20180909 and 20180916 :
$ cat z1.f90
module m
class(*), allocatable :: z
end
block data
use m
z = 'z'
end
$ gfortran-9-20180909 -c z1.f90
z1.f90:6:10:
6 | z = 'z'
| 1
Error: assignment statement is not allowed inside of BLOCK DATA at (1)
z1.f90:6:10:
6 | z = 'z'
| 1
Error: Unexpected assignment statement in BLOCK DATA at (1)
$ gfortran-9-20181111 -c z1.f90
f951: internal compiler error: Segmentation fault
0xb297bf crash_signal
../../gcc/toplev.c:325
0x5fe2b5 find_intrinsic_vtab
../../gcc/fortran/class.c:2761
0x5fe2b5 gfc_find_vtab(gfc_typespec*)
../../gcc/fortran/class.c:2845
0x64a482 gfc_match_assignment()
../../gcc/fortran/match.c:1378
0x66d020 match_word
../../gcc/fortran/parse.c:65
0x66d020 decode_statement
../../gcc/fortran/parse.c:361
0x66eb5a next_free
../../gcc/fortran/parse.c:1234
0x66eb5a next_statement
../../gcc/fortran/parse.c:1466
0x67016b parse_spec
../../gcc/fortran/parse.c:3858
0x6748b2 parse_block_data
../../gcc/fortran/parse.c:5845
0x6748b2 gfc_parse_file()
../../gcc/fortran/parse.c:6231
0x6bc89f gfc_be_parse_file
../../gcc/fortran/f95-lang.c:204
