tests/summary.c

   1 int f(int i);
   2 int maybe();
   3
   4 void set_odd_summary(int n, int A[static n])
   5 {
   6         for (int i = 1; i < n; i += 2)
   7                 if (maybe())
   8                         A[i] = 0;
   9 }
  10
  11 __attribute__((pencil_access(set_odd_summary)))
  12 void set_odd(int n, int A[static n]);
  13
  14 void set_odd(int n, int A[static n])
  15 {
  16         for (int i = 0; i < n; ++i)
  17                 A[2 * f(i) + 1] = i;
  18 }
  19
  20 void foo(int n, int A[static n][n])
  21 {
  22 #pragma scop
  23         for (int i = 0; i < n; ++i)
  24                 set_odd(n, A[i]);
  25 #pragma endscop
  26 }