https://gcc.gnu.org/bugzilla/show_bug.cgi?id=82993
Bug ID: 82993
Summary: ICE free_expr0, at fortran/expr.c:445
Product: gcc
Version: 8.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
With a wrong parameter definition :
$ cat z1.f90
program p
type t
real :: a(3)
end type
type(t), parameter :: z = 1
print *, z%a(1)
print *, z%a
end
$ gfortran-8-20171112 -c z1.f90
f951: internal compiler error: Segmentation fault
0xb61c7f crash_signal
../../gcc/toplev.c:325
0x69268b free_expr0
../../gcc/fortran/expr.c:445
0x6926ad gfc_free_expr(gfc_expr*)
../../gcc/fortran/expr.c:518
0x6efd59 gfc_match_rvalue(gfc_expr**)
../../gcc/fortran/primary.c:3250
0x6c655e match_primary
../../gcc/fortran/matchexp.c:157
0x6c655e match_level_1
../../gcc/fortran/matchexp.c:211
0x6c655e match_mult_operand
../../gcc/fortran/matchexp.c:267
0x6c67a8 match_add_operand
../../gcc/fortran/matchexp.c:356
0x6c6a3c match_level_2
../../gcc/fortran/matchexp.c:480
0x6c6b92 match_level_3
../../gcc/fortran/matchexp.c:551
0x6c6ca4 match_level_4
../../gcc/fortran/matchexp.c:599
0x6c6ca4 match_and_operand
../../gcc/fortran/matchexp.c:693
0x6c6e62 match_or_operand
../../gcc/fortran/matchexp.c:722
0x6c6f52 match_equiv_operand
../../gcc/fortran/matchexp.c:765
0x6c7042 match_level_5
../../gcc/fortran/matchexp.c:811
0x6c63b1 gfc_match_expr(gfc_expr**)
../../gcc/fortran/matchexp.c:870
0x6af7a9 match_io_element
../../gcc/fortran/io.c:3542
0x6af9f3 match_io_list
../../gcc/fortran/io.c:3581
0x6b4214 match_io
../../gcc/fortran/io.c:4242
0x6b592a gfc_match_print()
../../gcc/fortran/io.c:4298
