annotate gcc/testsuite/c-c++-common/goacc/loop-auto-2.c @ 111:04ced10e8804

gcc 7
author kono
date Fri, 27 Oct 2017 22:46:09 +0900
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1
kono
parents:
diff changeset
2 // Tile parititioning
kono
parents:
diff changeset
3
kono
parents:
diff changeset
4 void Ok ()
kono
parents:
diff changeset
5 {
kono
parents:
diff changeset
6 #pragma acc parallel num_gangs (10) num_workers(32) vector_length(32)
kono
parents:
diff changeset
7 {
kono
parents:
diff changeset
8
kono
parents:
diff changeset
9 #pragma acc loop tile(*) gang vector
kono
parents:
diff changeset
10 for (int ix = 0; ix < 10; ix++)
kono
parents:
diff changeset
11 {
kono
parents:
diff changeset
12 }
kono
parents:
diff changeset
13
kono
parents:
diff changeset
14 #pragma acc loop tile(*)
kono
parents:
diff changeset
15 for (int ix = 0; ix < 10; ix++)
kono
parents:
diff changeset
16 {
kono
parents:
diff changeset
17 }
kono
parents:
diff changeset
18
kono
parents:
diff changeset
19 #pragma acc loop tile(*) gang
kono
parents:
diff changeset
20 for (int ix = 0; ix < 10; ix++)
kono
parents:
diff changeset
21 {
kono
parents:
diff changeset
22 #pragma acc loop vector
kono
parents:
diff changeset
23 for (int jx = 0; jx < 10; jx++)
kono
parents:
diff changeset
24 ;
kono
parents:
diff changeset
25 }
kono
parents:
diff changeset
26
kono
parents:
diff changeset
27 #pragma acc loop tile(*)
kono
parents:
diff changeset
28 for (int ix = 0; ix < 10; ix++)
kono
parents:
diff changeset
29 {
kono
parents:
diff changeset
30 #pragma acc loop vector
kono
parents:
diff changeset
31 for (int jx = 0; jx < 10; jx++)
kono
parents:
diff changeset
32 ;
kono
parents:
diff changeset
33 }
kono
parents:
diff changeset
34
kono
parents:
diff changeset
35 #pragma acc loop gang
kono
parents:
diff changeset
36 for (int jx = 0; jx < 10; jx++)
kono
parents:
diff changeset
37 {
kono
parents:
diff changeset
38 #pragma acc loop tile(*) vector
kono
parents:
diff changeset
39 for (int ix = 0; ix < 10; ix++)
kono
parents:
diff changeset
40 {
kono
parents:
diff changeset
41 }
kono
parents:
diff changeset
42
kono
parents:
diff changeset
43 #pragma acc loop tile(*)
kono
parents:
diff changeset
44 for (int ix = 0; ix < 10; ix++)
kono
parents:
diff changeset
45 {
kono
parents:
diff changeset
46 }
kono
parents:
diff changeset
47 }
kono
parents:
diff changeset
48
kono
parents:
diff changeset
49 #pragma acc loop tile(*) worker
kono
parents:
diff changeset
50 for (int ix = 0; ix < 10; ix++)
kono
parents:
diff changeset
51 {
kono
parents:
diff changeset
52 #pragma acc loop vector
kono
parents:
diff changeset
53 for (int jx = 0; jx < 10; jx++)
kono
parents:
diff changeset
54 ;
kono
parents:
diff changeset
55 }
kono
parents:
diff changeset
56 }
kono
parents:
diff changeset
57 }
kono
parents:
diff changeset
58
kono
parents:
diff changeset
59 void Bad ()
kono
parents:
diff changeset
60 {
kono
parents:
diff changeset
61 #pragma acc parallel num_gangs (10) num_workers(32) vector_length(32)
kono
parents:
diff changeset
62 {
kono
parents:
diff changeset
63
kono
parents:
diff changeset
64 #pragma acc loop tile(*) gang vector /* { dg-message "containing loop" } */
kono
parents:
diff changeset
65 for (int ix = 0; ix < 10; ix++)
kono
parents:
diff changeset
66 {
kono
parents:
diff changeset
67 #pragma acc loop vector /* { dg-error "uses same" } */
kono
parents:
diff changeset
68 for (int jx = 0; jx < 10; jx++)
kono
parents:
diff changeset
69 ;
kono
parents:
diff changeset
70 }
kono
parents:
diff changeset
71
kono
parents:
diff changeset
72 #pragma acc loop tile(*) gang vector
kono
parents:
diff changeset
73 for (int ix = 0; ix < 10; ix++)
kono
parents:
diff changeset
74 {
kono
parents:
diff changeset
75 #pragma acc loop auto /* { dg-warning "insufficient partitioning" } */
kono
parents:
diff changeset
76 for (int jx = 0; jx < 10; jx++)
kono
parents:
diff changeset
77 ;
kono
parents:
diff changeset
78 }
kono
parents:
diff changeset
79
kono
parents:
diff changeset
80 #pragma acc loop tile(*) auto /* { dg-warning "insufficient partitioning" } */
kono
parents:
diff changeset
81 for (int ix = 0; ix < 10; ix++)
kono
parents:
diff changeset
82 {
kono
parents:
diff changeset
83 #pragma acc loop worker
kono
parents:
diff changeset
84 for (int jx = 0; jx < 10; jx++)
kono
parents:
diff changeset
85 ;
kono
parents:
diff changeset
86 }
kono
parents:
diff changeset
87
kono
parents:
diff changeset
88 #pragma acc loop worker /* { dg-message "containing loop" } */
kono
parents:
diff changeset
89 for (int jx = 0; jx < 10; jx++)
kono
parents:
diff changeset
90 {
kono
parents:
diff changeset
91 #pragma acc loop tile(*) gang vector /* { dg-error "incorrectly nested" } */
kono
parents:
diff changeset
92 for (int ix = 0; ix < 10; ix++)
kono
parents:
diff changeset
93 {
kono
parents:
diff changeset
94 }
kono
parents:
diff changeset
95
kono
parents:
diff changeset
96 #pragma acc loop tile(*) vector /* { dg-warning "insufficient partitioning" } */
kono
parents:
diff changeset
97 for (int ix = 0; ix < 10; ix++)
kono
parents:
diff changeset
98 {
kono
parents:
diff changeset
99 }
kono
parents:
diff changeset
100
kono
parents:
diff changeset
101 #pragma acc loop tile(*) /* { dg-warning "insufficient partitioning" } */
kono
parents:
diff changeset
102 for (int ix = 0; ix < 10; ix++)
kono
parents:
diff changeset
103 {
kono
parents:
diff changeset
104 }
kono
parents:
diff changeset
105 }
kono
parents:
diff changeset
106 }
kono
parents:
diff changeset
107 }