https://gcc.gnu.org/bugzilla/show_bug.cgi?id=104649
Bug ID: 104649
Summary: ICE in gfc_match_formal_arglist, at
fortran/decl.cc:6733
Product: gcc
Version: 12.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Affects versions down to r6 :
$ cat z1.f90
module m
interface
module subroutine s(x)
real :: x
end
end interface
end
submodule(m) m2
contains
module subroutine s(*)
end
end
$ cat z2.f90
module m
interface
module subroutine s(*)
end
end interface
end
submodule(m) m2
contains
module subroutine s(x)
real :: x
end
end
$ gfortran-12-20220220 -c z1.f90
f951: internal compiler error: Segmentation fault
0xcc909f crash_signal
../../gcc/toplev.cc:322
0x6d9f81 gfc_match_formal_arglist(gfc_symbol*, int, int, bool)
../../gcc/fortran/decl.cc:6733
0x6dfaaf gfc_match_subroutine()
../../gcc/fortran/decl.cc:7957
0x74bb57 decode_statement
../../gcc/fortran/parse.cc:384
0x74d54a next_free
../../gcc/fortran/parse.cc:1397
0x74d54a next_statement
../../gcc/fortran/parse.cc:1629
0x751f8c parse_contained
../../gcc/fortran/parse.cc:6039
0x752e17 parse_module
../../gcc/fortran/parse.cc:6466
0x753147 gfc_parse_file()
../../gcc/fortran/parse.cc:6773
0x7a0a5f gfc_be_parse_file
../../gcc/fortran/f95-lang.cc:216
