libgomp/testsuite/libgomp.c/simd-1.c

   1 /* { dg-do run } */
   2 /* { dg-additional-options "-msse2" { target sse2_runtime } } */
   3 /* { dg-additional-options "-mavx" { target avx_runtime } } */
   4
   5 extern void abort ();
   6 int a[1024] __attribute__((aligned (32))) = { 1 };
   7 int b[1024] __attribute__((aligned (32))) = { 1 };
   8 int k, m;
   9 struct U { int u; };
  10 struct V { int v; };
  11
  12 __attribute__((noinline, noclone)) int
  13 foo (int *p)
  14 {
  15   int i, s = 0;
  16   struct U u;
  17   struct V v;
  18   #pragma omp simd aligned(a, p : 32) linear(k: m + 1) \
  19                    reduction(+:s) lastprivate(u, v)
  20   for (i = 0; i < 1024; i++)
  21     {
  22       a[i] *= p[i];
  23       u.u = p[i] + k;
  24       k += m + 1;
  25       v.v = p[i] + k;
  26       s += p[i] + k;
  27     }
  28   if (u.u != 36 + 4 + 3 * 1023 || v.v != 36 + 4 + 3 * 1024)
  29     abort ();
  30   return s;
  31 }
  32
  33 int
  34 main ()
  35 {
  36 #if __SIZEOF_INT__ >= 4
  37   int i;
  38   k = 4;
  39   m = 2;
  40   for (i = 0; i < 1024; i++)
  41     {
  42       a[i] = i - 512;
  43       b[i] = (i - 51) % 39;
  44     }
  45   int s = foo (b);
  46   for (i = 0; i < 1024; i++)
  47     {
  48       if (b[i] != (i - 51) % 39
  49           || a[i] != (i - 512) * b[i])
  50         abort ();
  51     }
  52   if (k != 4 + 3 * 1024 || s != 1596127)
  53     abort ();
  54 #endif
  55   return 0;
  56 }