1  /* { dg-do run } */
       2  
       3  extern void abort (void);
       4  int x = 6;
       5  float y;
       6  
       7  int
       8  main (void)
       9  {
      10    int v;
      11    float f;
      12    #pragma omp atomic read
      13      v = x;
      14    if (v != 6)
      15      abort ();
      16    #pragma omp atomic write
      17      x = 17;
      18    #pragma omp atomic read
      19    v = x;
      20    if (v != 17)
      21      abort ();
      22    #pragma omp atomic update
      23      x++;
      24    #pragma omp atomic read
      25      v = x;
      26    if (v != 18)
      27      abort ();
      28    #pragma omp atomic capture
      29      v = x++;
      30    if (v != 18)
      31      abort ();
      32    #pragma omp atomic read
      33      v = x;
      34    if (v != 19)
      35      abort ();
      36    #pragma omp atomic capture
      37      v = ++x;
      38    if (v != 20)
      39      abort ();
      40    #pragma omp atomic read
      41      v = x;
      42    if (v != 20)
      43      abort ();
      44    #pragma omp atomic capture
      45      { v = x; x *= 3; }
      46    if (v != 20)
      47      abort ();
      48    #pragma omp atomic read
      49      v = x;
      50    if (v != 60)
      51      abort ();
      52    #pragma omp atomic capture
      53      {
      54        x |= 2;
      55        v = x;
      56      }
      57    if (v != 62)
      58      abort ();
      59    #pragma omp atomic read
      60      v = x;
      61    if (v != 62)
      62      abort ();
      63    #pragma omp atomic capture
      64      { v = x; x++; }
      65    if (v != 62)
      66      abort ();
      67    #pragma omp atomic capture
      68      { v = x; ++x; }
      69    if (v != 63)
      70      abort ();
      71    #pragma omp atomic capture
      72      {
      73        ++x;
      74        v = x;
      75      }
      76    if (v != 65)
      77      abort ();
      78  #pragma omp atomic capture
      79  {x++;v=x;}if (v != 66)
      80      abort ();
      81    #pragma omp atomic read
      82      v = x;
      83    if (v != 66)
      84      abort ();
      85    #pragma omp atomic capture
      86      { v = x; x--; }
      87    if (v != 66)
      88      abort ();
      89    #pragma omp atomic capture
      90      { v = x; --x; }
      91    if (v != 65)
      92      abort ();
      93    #pragma omp atomic capture
      94      {
      95        --x;
      96        v = x;
      97      }
      98    if (v != 63)
      99      abort ();
     100    #pragma omp atomic capture
     101    { x--; v = x; } if (v != 62)
     102      abort ();
     103    #pragma omp atomic read
     104      v = x;
     105    if (v != 62)
     106      abort ();
     107    #pragma omp atomic write
     108      y = 17.5f;
     109    #pragma omp atomic read
     110      f = y;
     111    if (f != 17.5)
     112      abort ();
     113    #pragma omp atomic update
     114      y *= 2.0f;
     115    #pragma omp atomic read
     116      f = y;
     117    if (y != 35.0)
     118      abort ();
     119    #pragma omp atomic capture
     120      f = y *= 2.0f;
     121    if (f != 70.0)
     122      abort ();
     123    #pragma omp atomic capture
     124      f = y++;
     125    if (f != 70.0)
     126      abort ();
     127    #pragma omp atomic read
     128      f = y;
     129    if (f != 71.0)
     130      abort ();
     131    #pragma omp atomic capture
     132      f = --y;
     133    if (f != 70.0)
     134      abort ();
     135    #pragma omp atomic read
     136      f = y;
     137    if (f != 70.0)
     138      abort ();
     139    #pragma omp atomic capture
     140      { f = y; y /= 2.0f; }
     141    if (f != 70.0)
     142      abort ();
     143    #pragma omp atomic read
     144      f = y;
     145    if (f != 35.0)
     146      abort ();
     147    #pragma omp atomic capture
     148      { y /= 2.0f; f = y; }
     149    if (f != 17.5)
     150      abort ();
     151    #pragma omp atomic read
     152      f = y;
     153    if (f != 17.5)
     154      abort ();
     155    return 0;
     156  }