how to check if the array is aligned at 64 byte

how to check if the array is aligned at 64 byte

I use the directive to align the array at 64 byte, and I want to check whether this works. The following code is my try. However, it is likely that the alignment directive doesn't work because the mod result isn't zero.
program aligntest
       integer ,dimension(9) :: a
       integer ,dimension(9) :: b
       !dir$ attributes align: 64 :: a,b
     
       a=0
       b=1
       !use the address mod 64*8=512 
       print *,mod(loc(a),512)
       print *,mod(loc(b),512)     
 end program aligntest

 

2 帖子 / 0 全新
最新文章
如需更全面地了解编译器优化,请参阅优化注意事项
mecej4的头像
Best Reply

You specified that the variables should be aligned to a multiple of 64 bytes. Why, then, do you expect alignment to 512-byte boundaries? Replace 512 by 64 throughout, or vice versa.

登陆并发表评论。