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 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117
|
/* { dg-do compile } */
void
foo (int a, int b, int *p, int *q)
{
int i;
#pragma omp parallel if (a)
;
#pragma omp parallel if (parallel:a)
;
#pragma omp parallel for simd if (a)
for (i = 0; i < 16; i++)
;
#pragma omp parallel for simd if (parallel : a)
for (i = 0; i < 16; i++)
;
#pragma omp parallel for simd if (simd : a)
for (i = 0; i < 16; i++)
;
#pragma omp parallel for simd if (simd : a) if (parallel:b)
for (i = 0; i < 16; i++)
;
#pragma omp task if (a)
;
#pragma omp task if (task: a)
;
#pragma omp taskloop if (a)
for (i = 0; i < 16; i++)
;
#pragma omp taskloop if (taskloop : a)
for (i = 0; i < 16; i++)
;
#pragma omp taskloop simd if (a)
for (i = 0; i < 16; i++)
;
#pragma omp taskloop simd if (taskloop : a)
for (i = 0; i < 16; i++)
;
#pragma omp taskloop simd if (simd : a)
for (i = 0; i < 16; i++)
;
#pragma omp taskloop simd if (taskloop:b) if (simd : a)
for (i = 0; i < 16; i++)
;
#pragma omp target if (a)
;
#pragma omp target if (target: a)
;
#pragma omp target simd if (a)
for (i = 0; i < 16; i++)
;
#pragma omp target simd if (simd : a) if (target: b)
for (i = 0; i < 16; i++)
;
#pragma omp target teams distribute parallel for simd if (a)
for (i = 0; i < 16; i++)
;
#pragma omp target teams distribute parallel for simd if (parallel : a) if (target: b)
for (i = 0; i < 16; i++)
;
#pragma omp target teams distribute parallel for simd if (simd : a) if (target: b)
for (i = 0; i < 16; i++)
;
#pragma omp target data if (a) map (p[0:2])
;
#pragma omp target data if (target data: a) map (p[0:2])
;
#pragma omp target enter data if (a) map (to: p[0:2])
#pragma omp target enter data if (target enter data: a) map (to: p[0:2])
#pragma omp target exit data if (a) map (from: p[0:2])
#pragma omp target exit data if (target exit data: a) map (from: p[0:2])
#pragma omp target update if (a) to (q[0:3])
#pragma omp target update if (target update:a) to (q[0:3])
#pragma omp parallel
{
#pragma omp cancel parallel if (a)
}
#pragma omp parallel
{
#pragma omp cancel parallel if (cancel:a)
}
#pragma omp for
for (i = 0; i < 16; i++)
{
#pragma omp cancel for if (a)
}
#pragma omp for
for (i = 0; i < 16; i++)
{
#pragma omp cancel for if (cancel: a)
}
#pragma omp sections
{
#pragma omp section
{
#pragma omp cancel sections if (a)
}
}
#pragma omp sections
{
#pragma omp section
{
#pragma omp cancel sections if (cancel: a)
}
}
#pragma omp taskgroup
{
#pragma omp task
{
#pragma omp cancel taskgroup if (a)
}
#pragma omp task
{
#pragma omp cancel taskgroup if (cancel: a)
}
}
}
|