https://gcc.gnu.org/bugzilla/show_bug.cgi?id=104571
Bug ID: 104571
Summary: ICE in resolve_elemental_actual, at
fortran/resolve.cc:2383
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 at least r5 :
(gcc configured with --enable-checking=yes)
$ cat z1.f90
program p
real :: x(3)
call g(x)
contains
elemental subroutine g(*)
end
end
$ gfortran-12-20220213 -c z1.f90
z1.f90:5:25:
5 | elemental subroutine g(*)
| 1
Error: Alternate return specifier in elemental subroutine 'g' at (1) is not
allowed
z1.f90:3:12:
3 | call g(x)
| 1
Error: Missing alternate return specifier in subroutine call at (1)
f951: internal compiler error: Segmentation fault
0xe7073f crash_signal
../../gcc/toplev.cc:322
0x79bd73 resolve_elemental_actual
../../gcc/fortran/resolve.cc:2383
0x7ab0bb resolve_call
../../gcc/fortran/resolve.cc:3805
0x7a8449 gfc_resolve_code(gfc_code*, gfc_namespace*)
../../gcc/fortran/resolve.cc:12154
0x7aa977 resolve_codes
../../gcc/fortran/resolve.cc:17536
0x7aaa3e gfc_resolve(gfc_namespace*)
../../gcc/fortran/resolve.cc:17571
0x792d64 resolve_all_program_units
../../gcc/fortran/parse.cc:6586
0x792d64 gfc_parse_file()
../../gcc/fortran/parse.cc:6842
0x7e102f gfc_be_parse_file
../../gcc/fortran/f95-lang.cc:216
