数组指针的堆栈问题

li913 · 发表于 2021-11-13 12:33:50

将已关联的数组指针赋值给另一个数组，oneAPI会对源数组进行一次copy，并默认存放于堆栈中。如果源数组过大，造成性能损失，甚至可能导致栈溢出。
1、如何将临时数据移至内存而不是堆栈中？
2、指针赋值给数组，可否有其他高效的赋值函数或手段？

[Fortran] 纯文本查看 复制代码

  program Test
  implicit none
  integer(4),allocatable,target:: a(:,:,:), b(:,:,:)
  integer(4), pointer::p(:,:,:)
  allocate(a(1024,1024,10),b(1024,1024,10)) !大小各40M
  a=0
  b=1
  p=>b !任务管理器显示使用91M
  a=p  !内存使用 131M。如果数组过大，会栈溢出
  write(*,*) a(1,1,1) 
  pause
  end program Test