1  /* { dg-do compile } */
       2  
       3  void
       4  a17_2_wrong ()
       5  {
       6    int x;
       7    int *i;
       8    float *r;
       9    i = &x;
      10    r = (float *) &x;
      11  #pragma omp parallel
      12    {
      13  #pragma omp atomic
      14      *i += 1;
      15  #pragma omp atomic
      16      *r += 1.0;
      17  /* Incorrect because the atomic constructs reference the same location
      18       through incompatible types */
      19    }
      20  }