[Bug fortran/117768] New: [15.0 regression] ICE in diagnostic_impl (?)

[juergen.reuter at desy dot de via Gcc-bugs]

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

            Bug ID: 117768
           Summary: [15.0 regression] ICE in diagnostic_impl (?)
           Product: gcc
           Version: 15.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: juergen.reuter at desy dot de
  Target Milestone: ---

This regression seems to have been introduced between Nov 18 (still working
HEAD 0dc389f21bfd4ee49d57bcfaa1d1936456c55e48) and Nov 25:
eio_ascii_sub.f90:381:25:
  381 | end submodule eio_ascii_s
      |                         1
internal compiler error: Segmentation fault
0x26dca5e diagnostic_context::diagnostic_impl(rich_location*,
diagnostic_metadata const*, diagnostic_option_id, char const*, __va_list_tag
(*) [1], diagnostic_t)
        ???:0
0x26f21de internal_error(char const*, ...)
        ???:0
0x11a07c4 relayout_decl(tree_node*)
        ???:0
0xdd9e1d allocate_struct_function(tree_node*, bool)
        ???:0
0xb4f364 gfc_generate_function_code(gfc_namespace*)
        ???:0
0xb1d2b1 gfc_generate_module_code(gfc_namespace*)
        ???:0
0xaba3ad gfc_parse_file()
        ???:0
Please submit a full bug report, with preprocessed source (by using
-freport-bug).

I will submit a reproducer shortly.