gcc/testsuite/gfortran.dg/vect/vect-4.f90

   1 ! { dg-do compile }
   2 ! { dg-require-effective-target vect_float }
   3
   4 ! Peeling to align the store to Y will also align the load from Y.
   5 ! The load from X may still be misaligned.
   6
   7 SUBROUTINE SAXPY(X, Y, A)
   8 DIMENSION X(64), Y(64)
   9 Y = Y + A * X
  10 END
  11
  12 ! { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" } }
  13 ! { dg-final { scan-tree-dump-times "Alignment of access forced using peeling" 1 "vect" { xfail { vect_no_align || {! vector_alignment_reachable} } } } }
  14 ! { dg-final { scan-tree-dump-times "Vectorizing an unaligned access" 1 "vect" { xfail { vect_no_align || {! vector_alignment_reachable} } } } }
  15 ! { dg-final { scan-tree-dump-times "Vectorizing an unaligned access" 2 "vect" { target {! vector_alignment_reachable} } } }
  16 ! { dg-final { scan-tree-dump-times "accesses have the same alignment." 1 "vect" } }
  17 ! { dg-final { cleanup-tree-dump "vect" } }