[Bug fortran/102597] New: ICE in gfc_get_extern_function_decl, at fortran/trans-decl.c:2243

[gscfq--- via Gcc-bugs]

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

            Bug ID: 102597
           Summary: ICE in gfc_get_extern_function_decl, at
                    fortran/trans-decl.c:2243
           Product: gcc
           Version: 12.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gs...@t-online.de
  Target Milestone: ---

Started with r7 :


$ cat z1.f90
program p
   use iso_fortran_env
   associate (y => (compiler_version))
   end associate
end


$ cat z0.f90
program p
   use iso_fortran_env
   associate (y => compiler_version)
   end associate
end


$ gfortran-12-20211003 -c z1.f90
z1.f90:3:38:

    3 |    associate (y => (compiler_version))
      |                                      1
internal compiler error: Segmentation fault
0xd41bdf crash_signal
        ../../gcc/toplev.c:331
0x86c901 gfc_get_extern_function_decl(gfc_symbol*, gfc_actual_arglist*, char
const*)
        ../../gcc/fortran/trans-decl.c:2243
0x86d0ad gfc_get_extern_function_decl(gfc_symbol*, gfc_actual_arglist*, char
const*)
        ../../gcc/fortran/trans-decl.c:2121
0x86d9c7 gfc_get_symbol_decl(gfc_symbol*)
        ../../gcc/fortran/trans-decl.c:1772
0x87d3e8 gfc_conv_variable
        ../../gcc/fortran/trans-expr.c:2994
0x87958a gfc_conv_expr(gfc_se*, gfc_expr*)
        ../../gcc/fortran/trans-expr.c:9074
0x879696 gfc_conv_expr_op
        ../../gcc/fortran/trans-expr.c:3771
0x879696 gfc_conv_expr(gfc_se*, gfc_expr*)
        ../../gcc/fortran/trans-expr.c:9062
0x889881 gfc_trans_assignment_1
        ../../gcc/fortran/trans-expr.c:11359
0x8bc04c trans_associate_var
        ../../gcc/fortran/trans-stmt.c:2201
0x8c2771 gfc_trans_block_construct(gfc_code*)
        ../../gcc/fortran/trans-stmt.c:2314
0x84adc7 trans_code
        ../../gcc/fortran/trans.c:2014
0x871974 gfc_generate_function_code(gfc_namespace*)
        ../../gcc/fortran/trans-decl.c:6905
0x7f77b6 translate_all_program_units
        ../../gcc/fortran/parse.c:6572
0x7f77b6 gfc_parse_file()
        ../../gcc/fortran/parse.c:6841
0x843f3f gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:216