[Bug fortran/96013] New: ICE in write_symbol, at fortran/module.c:5747

["gscfq@t-online.de" <gcc-bugzilla@gcc.gnu.org>]

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

            Bug ID: 96013
           Summary: ICE in write_symbol, at fortran/module.c:5747
           Product: gcc
           Version: 11.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

Affects versions down to at least r5 :


$ cat z1.f90
module m
   type t
   end type
contains
   function f() result(t)
      character(3) :: c
      c = 'abc'
   end
end


$ gfortran-11-20200628 -c z1.f90
'
Segmentation fault
0xbd215f crash_signal
        ../../gcc/toplev.c:328
0x61891e pp_quoted_string
        ../../gcc/pretty-print.c:1845
0x1504b93 pp_format(pretty_printer*, text_info*)
        ../../gcc/pretty-print.c:1359
0x14f96df diagnostic_report_diagnostic(diagnostic_context*, diagnostic_info*)
        ../../gcc/diagnostic.c:1159
0x657489 gfc_report_diagnostic
        ../../gcc/fortran/error.c:782
0x658baa gfc_internal_error(char const*, ...)
        ../../gcc/fortran/error.c:1402
0x698e80 write_symbol
        ../../gcc/fortran/module.c:5747
0x698ecb write_symbol1_recursion
        ../../gcc/fortran/module.c:5974
0x69bb35 write_symbol1
        ../../gcc/fortran/module.c:6007
0x69bb35 write_module
        ../../gcc/fortran/module.c:6154
0x69bb35 dump_module
        ../../gcc/fortran/module.c:6283
0x69becd gfc_dump_module(char const*, int)
        ../../gcc/fortran/module.c:6340
0x6b5d26 gfc_parse_file()
        ../../gcc/fortran/parse.c:6457
0x7016ff gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:212