aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/c-c++-common/goacc/atomic.c
blob: ff3b25e4b379771aa0a73c5db0a4be674356f5d1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
/* { dg-do compile } */

void
foo ()
{
  int i, v;
#pragma acc atomic read bar  /* { dg-error "expected 'read', 'write', 'update', or 'capture' clause" } */
  i = v;  /* { dg-error "expected end of line before 'bar'" "" { target *-*-* } .-1 } */

#pragma acc atomic read write  /* { dg-error "too many atomic clauses" } */
  i = v;

#pragma acc atomic read seq_cst  /* { dg-error "expected 'read', 'write', 'update', or 'capture' clause" } */
  i = v;  /* { dg-error "expected end of line before 'seq_cst'" "" { target *-*-* } .-1 } */

#pragma acc atomic read relaxed  /* { dg-error "expected 'read', 'write', 'update', or 'capture' clause" } */
  i = v;  /* { dg-error "expected end of line before 'relaxed'" "" { target *-*-* } .-1 } */

#pragma acc atomic update hint(1)  /* { dg-error "expected 'read', 'write', 'update', or 'capture' clause" } */
  i += 1;  /* { dg-error "expected end of line before 'hint'" "" { target *-*-* } .-1 } */

#pragma acc atomic update update capture  /* { dg-error "too many atomic clauses" } */
  v = i += 1;

#pragma acc atomic update capture capture  /* { dg-error "too many atomic clauses" } */
  v = i += 1;

#pragma acc atomic write capture  /* { dg-error "too many atomic clauses" } */
  i = 1;
}