gomp-20050608-branch/gcc/testsuite/gcc.dg/gomp/for-17.c

   1 /* { dg-do compile } */
   2 extern int bar (int);
   3
   4 void
   5 foo (void)
   6 {
   7   int j, k = 1, l = 30, m = 4;
   8   long int o = 4;
   9   long long int p = 0;
  10 #pragma omp for
  11   for (j = k; j <= l; j += m - 1)
  12     ;
  13 #pragma omp for
  14   for (j = k; j <= l; j += (m - 1))
  15     ;
  16 #pragma omp for
  17   for (j = k; j <= l; j += bar (m - 1))
  18     ;
  19 #pragma omp for
  20   for (j = k; j <= l; j = j + m - 1)
  21     ;
  22 #pragma omp for
  23   for (j = k; j <= l; j = j + (m - 1))
  24     ;
  25 #pragma omp for
  26   for (j = k; j <= l; j = j + bar (m - 1))
  27     ;
  28 #pragma omp for
  29   for (j = ({ int n; n = k; n; }); j <= l; j++)
  30     ;
  31 #pragma omp for
  32   for (j = k; j <= ({ int n; n = l; n; }); j++)
  33     ;
  34 #pragma omp for
  35   for (j = k; j <= l; j += ({ int n; n = 1; n; }))
  36     ;
  37 #pragma omp for
  38   for (j = k; j <= l; j += m + 1)
  39     ;
  40 #pragma omp for
  41   for (j = k; j <= l; j += o)
  42     ;
  43 #pragma omp for
  44   for (j = k; j <= l; j = j + o)
  45     ;
  46 #pragma omp for
  47   for (j = k; j <= l; j = o + 1 + j)
  48     ;
  49 #pragma omp for
  50   for (j = k; j <= l; j = o + m + j)
  51     ;
  52 #pragma omp for
  53   for (j = k; j <= l; j += o + p)
  54     ;
  55 #pragma omp for
  56   for (j = k; j <= l; j = j + o + p)
  57     ;
  58 #pragma omp for
  59   for (j = l; j >= k; j -= o)
  60     ;
  61 #pragma omp for
  62   for (j = l; j >= k; j -= p)
  63     ;
  64 #pragma omp for
  65   for (j = l; j >= k; j -= o + p)
  66     ;
  67 }