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

            Bug ID: 107318
           Summary: ICE in make_decl_rtl, at varasm.cc:1446
           Product: gcc
           Version: 13.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 :


$ cat z1.f90
program p
   integer, parameter :: n = 1023
   integer :: a(0:n)=1, b(0:n)=2, c(0:n)
   integer :: i
   !$acc kernels copyin(a(0:n), b(0:n)) copyout(c(0:n))
   do i = 0, n
      c(i) = a(f(i)) + b(f(i))
   end do
   !$acc end kernels
contains
   integer function f(x)
      integer :: x
      f = x
   end
end


$ gfortran-13-20221016 -c z1.f90 -fopenacc
$ gfortran-13-20221016 -c z1.f90 -fopenacc -fstack-check
$
$ gfortran-13-20221016 -c z1.f90 -fopenacc -fstack-check=generic
during RTL pass: expand
z1.f90:5:55:

    5 |    !$acc kernels copyin(a(0:n), b(0:n)) copyout(c(0:n))
      |                                                       ^
internal compiler error: in make_decl_rtl, at varasm.cc:1446
0x1314150 make_decl_rtl(tree_node*)
        ../../gcc/varasm.cc:1442
0xb1af17 expand_expr_real_1(tree_node*, rtx_def*, machine_mode,
expand_modifier, rtx_def**, bool)
        ../../gcc/expr.cc:10857
0xb26232 expand_expr
        ../../gcc/expr.h:310
0xb26232 expand_expr_addr_expr_1
        ../../gcc/expr.cc:8685
0xb19063 expand_expr_addr_expr
        ../../gcc/expr.cc:8806
0xb19063 expand_expr_real_1(tree_node*, rtx_def*, machine_mode,
expand_modifier, rtx_def**, bool)
        ../../gcc/expr.cc:12090
0x9b5788 expand_normal
        ../../gcc/expr.h:316
0x9b5788 precompute_register_parameters
        ../../gcc/calls.cc:988
0x9bbcda expand_call(tree_node*, rtx_def*, int)
        ../../gcc/calls.cc:3412
0x9abbcc expand_builtin(tree_node*, rtx_def*, rtx_def*, machine_mode, int)
        ../../gcc/builtins.cc:8428
0xb1b3be expand_expr_real_1(tree_node*, rtx_def*, machine_mode,
expand_modifier, rtx_def**, bool)
        ../../gcc/expr.cc:11859
0x9d535f expand_expr
        ../../gcc/expr.h:310
0x9d535f expand_call_stmt
        ../../gcc/cfgexpand.cc:2831
0x9d535f expand_gimple_stmt_1
        ../../gcc/cfgexpand.cc:3880
0x9d535f expand_gimple_stmt
        ../../gcc/cfgexpand.cc:4044
0x9dc29f expand_gimple_basic_block
        ../../gcc/cfgexpand.cc:6096
0x9de8f6 execute
        ../../gcc/cfgexpand.cc:6822

Reply via email to