Fortran Coder

查看: 5623|回复: 3
打印 上一主题 下一主题

[指针] 数组指针的堆栈问题

[复制链接]

796

帖子

2

主题

0

精华

大宗师

F 币
3787 元
贡献
2266 点
跳转到指定楼层
楼主
发表于 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

分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

24

帖子

7

主题

0

精华

熟手

F 币
143 元
贡献
88 点
沙发
发表于 2021-11-14 09:49:31 | 只看该作者
插个TP眼。
回复

使用道具 举报

1958

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1339 元
贡献
565 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

板凳
发表于 2021-11-17 08:24:24 | 只看该作者
没有好的思路,只能关注一下。
第一个问题,最好去intel论坛问问。
第二个问题,个人愚见,fortran的数组在内存里不能保证是连续的(可以由间距,甚至多维数组的间距也可以不一样),因此数组的赋值应该没什么提升空间。

796

帖子

2

主题

0

精华

大宗师

F 币
3787 元
贡献
2266 点
地板
 楼主| 发表于 2021-11-17 10:33:45 | 只看该作者
执行第九行a=p ( p指向b),实际会执行两次赋值: temp = b, a = temp 。这个效率低于 a=b.
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-4-20 07:47

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表