libgomp/testsuite/libgomp.hsa.c/rotate-1.c

   1 #include <assert.h>
   2 #include <limits.h>
   3
   4 #define T unsigned int
   5 #define BITSIZE CHAR_BIT * sizeof (T)
   6
   7 #define C1 123u
   8
   9 #pragma omp declare target
  10 T
  11 rotate (T value, T shift)
  12 {
  13   T r = (value << shift) | (value >> (BITSIZE - shift));
  14   return (r >> shift) | (r << (BITSIZE - shift));
  15 }
  16 #pragma omp end declare target
  17
  18 int
  19 main (int argc)
  20 {
  21   T v1, v2, v3, v4, v5;
  22
  23 #pragma omp target map(to: v1, v2, v3, v4, v5)
  24   {
  25     v1 = rotate (C1, 10);
  26     v2 = rotate (C1, 2);
  27     v3 = rotate (C1, 5);
  28     v4 = rotate (C1, 16);
  29     v5 = rotate (C1, 32);
  30   }
  31
  32   assert (v1 == C1);
  33   assert (v2 == C1);
  34   assert (v3 == C1);
  35   assert (v4 == C1);
  36   assert (v5 == C1);
  37
  38   return 0;
  39 }