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 posts / 0 new
Last post
For more complete information about compiler optimizations, see our Optimization Notice.
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.

Leave a Comment

Please sign in to add a comment. Not a member? Join today