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 / novo 0
Último post
Para obter mais informações sobre otimizações de compiladores, consulte Aviso sobre otimizações.
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.

Deixar um comentário

Faça login para adicionar um comentário. Não é membro? Inscreva-se hoje mesmo!