[Bug fortran/78570] ICE in free_expr0, at fortran/expr.c:494

["janus at gcc dot gnu.org" <gcc-bugzilla at gcc dot gnu dot org>]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=78570

janus at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |ice-on-valid-code
                 CC|                            |janus at gcc dot gnu.org

--- Comment #2 from janus at gcc dot gnu.org ---
Slightly reduced variant:

type t
  character(len=2), dimension(2) :: c = '' // ['a']
end type
type(t) :: z
end


On this I get a "double free or corruption" followed by an ICE:

0xfd7a14 crash_signal
        /home/jweil/gcc/gcc7/trunk/gcc/toplev.c:333
0x8abbfd gfc_free_charlen(gfc_charlen*, gfc_charlen*)
        /home/jweil/gcc/gcc7/trunk/gcc/fortran/symbol.c:3841
0x8abd58 gfc_free_namespace(gfc_namespace*)
        /home/jweil/gcc/gcc7/trunk/gcc/fortran/symbol.c:3890
0x8abe78 gfc_symbol_done_2()
        /home/jweil/gcc/gcc7/trunk/gcc/fortran/symbol.c:3926
0x827ccb gfc_done_2()
        /home/jweil/gcc/gcc7/trunk/gcc/fortran/misc.c:264
0x85d6d9 translate_all_program_units
        /home/jweil/gcc/gcc7/trunk/gcc/fortran/parse.c:6057
0x85dc94 gfc_parse_file()
        /home/jweil/gcc/gcc7/trunk/gcc/fortran/parse.c:6238
0x8b6f18 gfc_be_parse_file
        /home/jweil/gcc/gcc7/trunk/gcc/fortran/f95-lang.c:202


The code is supposed to be valid, I guess?