* testsuite/libgomp.fortran/vla7.f90: Add -w to options.
[official-gcc.git] / gcc / testsuite / gcc.dg / vect / vect-53.c
blob91eaabeb93b2d16d5fd65ad3c954e5c4a024cdb6
1 /* { dg-require-effective-target vect_float } */
3 #include <stdarg.h>
4 #include "tree-vect.h"
6 #define N 256
8 void bar (const float *pa, const float *pb, const float *pc)
10 int i;
12 /* check results: */
13 for (i = 0; i < N; i++)
15 if (pa[i] != (pb[i] * pc[i]))
16 abort ();
19 return;
22 /* Unaligned pointer read accesses, aligned pointer write access.
23 The loop bound is unknown.
24 Can't prove that the pointers don't alias.
25 vect-49.c is similar to this one with one difference:
26 the loop bound is known.
27 vect-52.c is similar to this one with one difference:
28 aliasing is not a problem. */
30 int
31 main1 (int n, float *pb, float *pc)
33 float pa[N] __attribute__ ((__aligned__(16)));
34 int i;
36 for (i = 0; i < n; i++)
38 pa[i] = pb[i] * pc[i];
41 bar (pa,pb,pc);
43 return 0;
46 int main (void)
48 int i;
49 float a[N] __attribute__ ((__aligned__(16)));
50 float b[N+1] __attribute__ ((__aligned__(16))) = {0,3,6,9,12,15,18,21,24,27,30,33,36,39,42,45,48,51,54,57,60};
51 float c[N+1] __attribute__ ((__aligned__(16))) = {0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20};
53 check_vect ();
55 main1 (N,&b[1],c);
56 main1 (N,&b[1],&c[1]);
58 return 0;
61 /* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" { xfail *-*-* } } } */
62 /* { dg-final { cleanup-tree-dump "vect" } } */