https://gcc.gnu.org/bugzilla/show_bug.cgi?id=103779
Bug ID: 103779
Summary: ICE in gfc_convert_chartype, at
fortran/intrinsic.c:5400
Product: gcc
Version: 12.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: [email protected]
Target Milestone: ---
Affects versions down to at least r5 :
(gcc configured with --enable-checking=yes)
$ cat z1.f90
character(1,) function f()
f = 'a'
end
$ cat z2.f90
character(1, kind=) function f()
f = 'a'
end
$ cat z3.f90
character(1,n) function f()
f = 'a'
end
$ gfortran-12-20211219 -c z1.f90
z1.f90:1:13:
1 | character(1,) function f()
| 1
Error: Expected initialization expression at (1)
z1.f90:1:0:
1 | character(1,) function f()
|
Error: Bad kind expression for function 'f' at (1)
f951: internal compiler error: in gfc_convert_chartype, at
fortran/intrinsic.c:5400
0x7fde0a gfc_convert_chartype(gfc_expr*, gfc_typespec*)
../../gcc/fortran/intrinsic.c:5400
0x84e195 resolve_ordinary_assign
../../gcc/fortran/resolve.c:11183
0x85648c gfc_resolve_code(gfc_code*, gfc_namespace*)
../../gcc/fortran/resolve.c:12042
0x8589e7 resolve_codes
../../gcc/fortran/resolve.c:17532
0x858aae gfc_resolve(gfc_namespace*)
../../gcc/fortran/resolve.c:17567
0x840dd4 resolve_all_program_units
../../gcc/fortran/parse.c:6586
0x840dd4 gfc_parse_file()
../../gcc/fortran/parse.c:6842
0x88efcf gfc_be_parse_file
../../gcc/fortran/f95-lang.c:216
