From f6ddcaeddf0bcb7999ac81c384707c06b1cb49af Mon Sep 17 00:00:00 2001 From: Julian Brown Date: Thu, 16 May 2019 05:47:16 -0700 Subject: [PATCH] Add kernels for-index reuse testcase. libgomp/ * testsuite/libgomp.oacc-c-c++-common/kernels-for-index-reuse-1.c: New test. (cherry picked from openacc-gcc-9-branch commit 3f86b73b7706bdf066b1af71dfc5d8eb461eaa05) --- libgomp/ChangeLog.omp | 5 +++ .../kernels-for-index-reuse-1.c | 36 +++++++++++++++++++ 2 files changed, 41 insertions(+) create mode 100644 libgomp/testsuite/libgomp.oacc-c-c++-common/kernels-for-index-reuse-1.c diff --git a/libgomp/ChangeLog.omp b/libgomp/ChangeLog.omp index ef5579bd3828..225b4b5d4541 100644 --- a/libgomp/ChangeLog.omp +++ b/libgomp/ChangeLog.omp @@ -1,3 +1,8 @@ +2019-05-16 Julian Brown + + * testsuite/libgomp.oacc-c-c++-common/kernels-for-index-reuse-1.c: New + test. + 2019-05-16 Julian Brown * target.c (gomp_map_vars_async): Initialise KEY and OFFSET fields in diff --git a/libgomp/testsuite/libgomp.oacc-c-c++-common/kernels-for-index-reuse-1.c b/libgomp/testsuite/libgomp.oacc-c-c++-common/kernels-for-index-reuse-1.c new file mode 100644 index 000000000000..dafe41298d71 --- /dev/null +++ b/libgomp/testsuite/libgomp.oacc-c-c++-common/kernels-for-index-reuse-1.c @@ -0,0 +1,36 @@ +/* { dg-xfail-run-if "unhandled case" { *-*-* } } */ + +/* Test reuse of loop index variables in kernels region. */ + +#include + +#define SIZE 16384 + +int +main (int argc, char* argv[]) +{ + float arr[SIZE], arr_o[SIZE]; + int i, o; + + for (i = 0; i < SIZE; i++) + arr[i] = i; + + i = 15; + #pragma acc kernels + { + i *= 30; + o = i; + + #pragma acc loop independent + for (i = 0; i < SIZE; i++) + arr_o[i] = arr[i] * 2; + } + + assert (i == SIZE); + assert (o == 450); + + for (i = 0; i < SIZE; i++) + assert (arr_o[i] == arr[i] * 2); + + return 0; +} -- 2.47.2