1! { dg-do compile }
2! { dg-require-effective-target vect_float }
3! { dg-additional-options "--param vect-max-peeling-for-alignment=0" }
4
5SUBROUTINE SAXPY(X, Y, A, N)
6DIMENSION X(N), Y(N)
7Y = Y + A * X
8END
9
10! { dg-final { scan-tree-dump-times "Alignment of access forced using versioning" 3 "vect" { target { vect_no_align && { ! vect_hw_misalign } } } } }
11! { dg-final { scan-tree-dump-times "Alignment of access forced using versioning" 1 "vect" { target { {! vect_no_align} && { {! vector_alignment_reachable} && {! vect_hw_misalign} } } } } }
12
13