Mercurial > hg > CbC > CbC_gcc
view gcc/testsuite/c-c++-common/goacc/loop-2-parallel.c @ 111:04ced10e8804
gcc 7
author | kono |
---|---|
date | Fri, 27 Oct 2017 22:46:09 +0900 |
parents | |
children | 1830386684a0 |
line wrap: on
line source
void P(void) { int i, j; #pragma acc parallel { #pragma acc loop auto for (i = 0; i < 10; i++) { } #pragma acc loop gang for (i = 0; i < 10; i++) { } #pragma acc loop gang(static:5) for (i = 0; i < 10; i++) { } #pragma acc loop gang(static:*) for (i = 0; i < 10; i++) { } #pragma acc loop gang // { dg-message "containing loop" } for (i = 0; i < 10; i++) { #pragma acc loop vector for (j = 1; j < 10; j++) { } #pragma acc loop worker for (j = 1; j < 10; j++) { } #pragma acc loop gang // { dg-error "inner loop uses same" } for (j = 1; j < 10; j++) { } } #pragma acc loop seq gang // { dg-error "'seq' overrides" } for (i = 0; i < 10; i++) { } #pragma acc loop worker for (i = 0; i < 10; i++) { } #pragma acc loop worker // { dg-message "containing loop" 2 } for (i = 0; i < 10; i++) { #pragma acc loop vector for (j = 1; j < 10; j++) { } #pragma acc loop worker // { dg-error "inner loop uses same" } for (j = 1; j < 10; j++) { } #pragma acc loop gang // { dg-error "incorrectly nested" } for (j = 1; j < 10; j++) { } } #pragma acc loop seq worker // { dg-error "'seq' overrides" } for (i = 0; i < 10; i++) { } #pragma acc loop gang worker for (i = 0; i < 10; i++) { } #pragma acc loop vector for (i = 0; i < 10; i++) { } for (i = 0; i < 10; i++) { } #pragma acc loop vector // { dg-message "containing loop" 3 } for (i = 0; i < 10; i++) { #pragma acc loop vector // { dg-error "inner loop uses same" } for (j = 1; j < 10; j++) { } #pragma acc loop worker // { dg-error "incorrectly nested" } for (j = 1; j < 10; j++) { } #pragma acc loop gang // { dg-error "incorrectly nested" } for (j = 1; j < 10; j++) { } } #pragma acc loop seq vector // { dg-error "'seq' overrides" } for (i = 0; i < 10; i++) { } #pragma acc loop gang vector for (i = 0; i < 10; i++) { } #pragma acc loop worker vector for (i = 0; i < 10; i++) { } #pragma acc loop auto for (i = 0; i < 10; i++) { } #pragma acc loop seq auto // { dg-error "'seq' overrides" } for (i = 0; i < 10; i++) { } #pragma acc loop gang auto // { dg-error "'auto' conflicts" } for (i = 0; i < 10; i++) { } #pragma acc loop worker auto // { dg-error "'auto' conflicts" } for (i = 0; i < 10; i++) { } #pragma acc loop vector auto // { dg-error "'auto' conflicts" } for (i = 0; i < 10; i++) { } } #pragma acc parallel loop auto for (i = 0; i < 10; i++) { } #pragma acc parallel loop gang for (i = 0; i < 10; i++) { } #pragma acc parallel loop gang(static:5) for (i = 0; i < 10; i++) { } #pragma acc parallel loop gang(static:*) for (i = 0; i < 10; i++) { } #pragma acc parallel loop seq gang // { dg-error "'seq' overrides" "" { target c } } for (i = 0; i < 10; i++) // { dg-error "'seq' overrides" "" { target c++ } } { } #pragma acc parallel loop worker for (i = 0; i < 10; i++) { } #pragma acc parallel loop seq worker // { dg-error "'seq' overrides" "" { target c } } for (i = 0; i < 10; i++) // { dg-error "'seq' overrides" "" { target c++ } } { } #pragma acc parallel loop gang worker for (i = 0; i < 10; i++) { } #pragma acc parallel loop vector for (i = 0; i < 10; i++) { } #pragma acc parallel loop seq vector // { dg-error "'seq' overrides" "" { target c } } for (i = 0; i < 10; i++) // { dg-error "'seq' overrides" "" { target c++ } } { } #pragma acc parallel loop gang vector for (i = 0; i < 10; i++) { } #pragma acc parallel loop worker vector for (i = 0; i < 10; i++) { } #pragma acc parallel loop auto for (i = 0; i < 10; i++) { } #pragma acc parallel loop seq auto // { dg-error "'seq' overrides" "" { target c } } for (i = 0; i < 10; i++) // { dg-error "'seq' overrides" "" { target c++ } } { } #pragma acc parallel loop gang auto // { dg-error "'auto' conflicts" "" { target c } } for (i = 0; i < 10; i++) // { dg-error "'auto' conflicts" "" { target c++ } } { } #pragma acc parallel loop worker auto // { dg-error "'auto' conflicts" "" { target c } } for (i = 0; i < 10; i++) // { dg-error "'auto' conflicts" "" { target c++ } } { } #pragma acc parallel loop vector auto // { dg-error "'auto' conflicts" "" { target c } } for (i = 0; i < 10; i++) // { dg-error "'auto' conflicts" "" { target c++ } } { } }