https://gcc.gnu.org/bugzilla/show_bug.cgi?id=91550
Bug ID: 91550
Summary: [8/9/10 Regression] ICE in do_subscript, at
fortran/frontend-passes.c:2652
Product: gcc
Version: 10.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
With an invalid or non-integer value, down to gfortran-8 :
$ cat z1.f90
program p
real :: a(3)
integer :: i
do i = 1, 3, .1
a(i) = i
end do
end
$ gfortran-10-20190825 -c z1.f90
z1.f90:4:15:
4 | do i = 1, 3, .1
| 1
Warning: Deleted feature: Step expression in DO loop at (1) must be integer
f951: internal compiler error: Floating point exception
0xb3acef crash_signal
../../gcc/toplev.c:326
0x74497e do_subscript
../../gcc/fortran/frontend-passes.c:2652
0x74497e do_function
../../gcc/fortran/frontend-passes.c:2464
0x744245 gfc_expr_walker(gfc_expr**, int (*)(gfc_expr**, int*, void*), void*)
../../gcc/fortran/frontend-passes.c:4919
0x746ab1 gfc_code_walker(gfc_code**, int (*)(gfc_code**, int*, void*), int
(*)(gfc_expr**, int*, void*), void*)
../../gcc/fortran/frontend-passes.c:5337
0x746b47 gfc_code_walker(gfc_code**, int (*)(gfc_code**, int*, void*), int
(*)(gfc_expr**, int*, void*), void*)
../../gcc/fortran/frontend-passes.c:5345
0x747b5b doloop_warn
../../gcc/fortran/frontend-passes.c:2783
0x74809a gfc_run_passes(gfc_namespace*)
../../gcc/fortran/frontend-passes.c:152
0x687d97 gfc_resolve(gfc_namespace*)
../../gcc/fortran/resolve.c:16962
0x67581c resolve_all_program_units
../../gcc/fortran/parse.c:6073
0x67581c gfc_parse_file()
../../gcc/fortran/parse.c:6320
0x6bf60f gfc_be_parse_file
../../gcc/fortran/f95-lang.c:204
