[Bug fortran/84957] New: [8 Regression] ICE in gfc_sym_type, at fortran/trans-types.c:2255

["gscfq at t-online dot de" <gcc-bugzilla at gcc dot gnu dot org>]

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

            Bug ID: 84957
           Summary: [8 Regression] ICE in gfc_sym_type, at
                    fortran/trans-types.c:2255
           Product: gcc
           Version: 8.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

Changed between 20171119 and 20171126 :


$ cat z1.f90
function f() result(u)
entry g() result(v)
contains
   function v(x) result(z)
      character :: x(2)
      character(sum(len_trim(x))) :: z
   end
end


$ cat z2.f90
function f() result(u)
entry g() result(v)
contains
   function u(x) result(z)
      character :: x(2)
      character(sum(len_trim(x))) :: z
   end
end


$ gfortran-8-20171119 -c z1.f90
$
$ gfortran-8-20180318 -c z1.f90
z1.f90:2:0:

 entry g() result(v)

internal compiler error: Segmentation fault
0xb9bd5f crash_signal
        ../../gcc/toplev.c:325
0x7c348b gfc_sym_type(gfc_symbol*)
        ../../gcc/fortran/trans-types.c:2255
0x7c18e3 gfc_get_function_type(gfc_symbol*)
        ../../gcc/fortran/trans-types.c:3031
0x766a9f build_function_decl
        ../../gcc/fortran/trans-decl.c:2233
0x768561 build_entry_thunks
        ../../gcc/fortran/trans-decl.c:2739
0x768561 gfc_create_function_decl(gfc_namespace*, bool)
        ../../gcc/fortran/trans-decl.c:2913
0x77284b gfc_generate_function_code(gfc_namespace*)
        ../../gcc/fortran/trans-decl.c:6398
0x7009c0 translate_all_program_units
        ../../gcc/fortran/parse.c:6121
0x7009c0 gfc_parse_file()
        ../../gcc/fortran/parse.c:6324
0x74755f gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:204