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

            Bug ID: 101762
           Summary: ICE in ix86_push_argument, at config/i386/i386.c:4203
           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: ---

Affects versions down to at least r5 :
(invocation of n() is not allowed at this position)


$ cat z1.f90
program p
   integer, target :: a(3) = [7, 8, 9]
   integer, pointer :: x => a(n())
   print *, x
end


$ gfortran-12-20210801 -c z1.f90
z1.f90:5:3:

    5 | end
      |   ^
internal compiler error: Segmentation fault
0xde5d0f crash_signal
        ../../gcc/toplev.c:328
0x11d09dd ix86_push_argument
        ../../gcc/config/i386/i386.c:4203
0x896e13 expand_call(tree_node*, rtx_def*, int)
        ../../gcc/calls.c:3731
0x9fa3f6 expand_expr_real_1(tree_node*, rtx_def*, machine_mode,
expand_modifier, rtx_def**, bool)
        ../../gcc/expr.c:11511
0x9f431d expand_expr
        ../../gcc/expr.h:301
0x9f431d expand_expr_real_2(separate_ops*, rtx_def*, machine_mode,
expand_modifier)
        ../../gcc/expr.c:9044
0x9faae1 expand_expr_real_1(tree_node*, rtx_def*, machine_mode,
expand_modifier, rtx_def**, bool)
        ../../gcc/expr.c:11796
0xa063be expand_expr
        ../../gcc/expr.h:301
0xa063be expand_operands(tree_node*, tree_node*, rtx_def*, rtx_def**,
rtx_def**, expand_modifier)
        ../../gcc/expr.c:8289
0x9f413c expand_expr_real_2(separate_ops*, rtx_def*, machine_mode,
expand_modifier)
        ../../gcc/expr.c:9255
0x9faae1 expand_expr_real_1(tree_node*, rtx_def*, machine_mode,
expand_modifier, rtx_def**, bool)
        ../../gcc/expr.c:11796
0x9f697e expand_expr
        ../../gcc/expr.h:301
0x9f697e expand_expr_real_2(separate_ops*, rtx_def*, machine_mode,
expand_modifier)
        ../../gcc/expr.c:9031
0x9faae1 expand_expr_real_1(tree_node*, rtx_def*, machine_mode,
expand_modifier, rtx_def**, bool)
        ../../gcc/expr.c:11796
0xa063be expand_expr
        ../../gcc/expr.h:301
0xa063be expand_operands(tree_node*, tree_node*, rtx_def*, rtx_def**,
rtx_def**, expand_modifier)
        ../../gcc/expr.c:8289
0x9f4efc expand_expr_real_2(separate_ops*, rtx_def*, machine_mode,
expand_modifier)
        ../../gcc/expr.c:9516
0x9faae1 expand_expr_real_1(tree_node*, rtx_def*, machine_mode,
expand_modifier, rtx_def**, bool)
        ../../gcc/expr.c:11796
0xa06c77 expand_expr
        ../../gcc/expr.h:301
0xa06c77 expand_expr_addr_expr_1
        ../../gcc/expr.c:8456

Reply via email to