From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 7845) id B45F43858C50; Mon, 16 May 2022 08:09:09 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org B45F43858C50 MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Type: text/plain; charset="utf-8" From: Marcel Vollweiler To: gcc-cvs@gcc.gnu.org Subject: [gcc r13-471] OpenMP, C++: Add template support for the has_device_addr clause. X-Act-Checkin: gcc X-Git-Author: Marcel Vollweiler X-Git-Refname: refs/heads/master X-Git-Oldrev: ec69db6be6912e45fa5f54f2d231d56e52612f1d X-Git-Newrev: b4fb9f4f9a10d825302cfb5a0ecefa796570d8bc Message-Id: <20220516080909.B45F43858C50@sourceware.org> Date: Mon, 16 May 2022 08:09:09 +0000 (GMT) X-BeenThere: gcc-cvs@gcc.gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Gcc-cvs mailing list List-Unsubscribe: , List-Archive: List-Help: List-Subscribe: , X-List-Received-Date: Mon, 16 May 2022 08:09:09 -0000 https://gcc.gnu.org/g:b4fb9f4f9a10d825302cfb5a0ecefa796570d8bc commit r13-471-gb4fb9f4f9a10d825302cfb5a0ecefa796570d8bc Author: Marcel Vollweiler Date: Mon May 16 01:02:50 2022 -0700 OpenMP, C++: Add template support for the has_device_addr clause. This patch adds support for list items in the has_device_addr clause which type is given by C++ template parameters. gcc/cp/ChangeLog: * pt.cc (tsubst_omp_clauses): Added OMP_CLAUSE_HAS_DEVICE_ADDR. * semantics.cc (finish_omp_clauses): Added template decl processing. libgomp/ChangeLog: * testsuite/libgomp.c++/target-has-device-addr-7.C: New test. * testsuite/libgomp.c++/target-has-device-addr-8.C: New test. * testsuite/libgomp.c++/target-has-device-addr-9.C: New test. Diff: --- gcc/cp/pt.cc | 2 + gcc/cp/semantics.cc | 10 ++++- .../libgomp.c++/target-has-device-addr-7.C | 36 +++++++++++++++++ .../libgomp.c++/target-has-device-addr-8.C | 47 ++++++++++++++++++++++ .../libgomp.c++/target-has-device-addr-9.C | 30 ++++++++++++++ 5 files changed, 123 insertions(+), 2 deletions(-) diff --git a/gcc/cp/pt.cc b/gcc/cp/pt.cc index fa05e9134df..5037627b93f 100644 --- a/gcc/cp/pt.cc +++ b/gcc/cp/pt.cc @@ -17722,6 +17722,7 @@ tsubst_omp_clauses (tree clauses, enum c_omp_region_type ort, case OMP_CLAUSE_USE_DEVICE_PTR: case OMP_CLAUSE_USE_DEVICE_ADDR: case OMP_CLAUSE_IS_DEVICE_PTR: + case OMP_CLAUSE_HAS_DEVICE_ADDR: case OMP_CLAUSE_INCLUSIVE: case OMP_CLAUSE_EXCLUSIVE: OMP_CLAUSE_DECL (nc) @@ -17867,6 +17868,7 @@ tsubst_omp_clauses (tree clauses, enum c_omp_region_type ort, case OMP_CLAUSE_USE_DEVICE_PTR: case OMP_CLAUSE_USE_DEVICE_ADDR: case OMP_CLAUSE_IS_DEVICE_PTR: + case OMP_CLAUSE_HAS_DEVICE_ADDR: case OMP_CLAUSE_INCLUSIVE: case OMP_CLAUSE_EXCLUSIVE: case OMP_CLAUSE_ALLOCATE: diff --git a/gcc/cp/semantics.cc b/gcc/cp/semantics.cc index 61f49be32ff..cd7a2818feb 100644 --- a/gcc/cp/semantics.cc +++ b/gcc/cp/semantics.cc @@ -8575,14 +8575,20 @@ finish_omp_clauses (tree clauses, enum c_omp_region_type ort) else { t = OMP_CLAUSE_DECL (c); + while (TREE_CODE (t) == TREE_LIST) + t = TREE_CHAIN (t); while (TREE_CODE (t) == INDIRECT_REF || TREE_CODE (t) == ARRAY_REF) t = TREE_OPERAND (t, 0); } } - bitmap_set_bit (&is_on_device_head, DECL_UID (t)); if (VAR_P (t) || TREE_CODE (t) == PARM_DECL) - cxx_mark_addressable (t); + { + bitmap_set_bit (&is_on_device_head, DECL_UID (t)); + if (!processing_template_decl + && !cxx_mark_addressable (t)) + remove = true; + } goto check_dup_generic_t; case OMP_CLAUSE_USE_DEVICE_ADDR: diff --git a/libgomp/testsuite/libgomp.c++/target-has-device-addr-7.C b/libgomp/testsuite/libgomp.c++/target-has-device-addr-7.C new file mode 100644 index 00000000000..2c4571be455 --- /dev/null +++ b/libgomp/testsuite/libgomp.c++/target-has-device-addr-7.C @@ -0,0 +1,36 @@ +/* Testing 'has_device_addr' clause on the target construct with template. */ + +template +void +foo (T x) +{ + x = 24; + #pragma omp target data map(x) use_device_addr(x) + #pragma omp target has_device_addr(x) + x = 42; + + if (x != 42) + __builtin_abort (); +} + +template +void +bar (T (&x)[]) +{ + x[0] = 24; + #pragma omp target data map(x[:2]) use_device_addr(x) + #pragma omp target has_device_addr(x[:2]) + x[0] = 42; + + if (x[0] != 42) + __builtin_abort (); +} + +int +main () +{ + int a[] = { 24, 42}; + foo (42); + bar (a); + return 0; +} diff --git a/libgomp/testsuite/libgomp.c++/target-has-device-addr-8.C b/libgomp/testsuite/libgomp.c++/target-has-device-addr-8.C new file mode 100644 index 00000000000..2adfd30296f --- /dev/null +++ b/libgomp/testsuite/libgomp.c++/target-has-device-addr-8.C @@ -0,0 +1,47 @@ +/* Testing 'has_device_addr' clause on the target construct with template. */ + +#include + +template +void +foo (T (&x)[]) +{ + #pragma omp target has_device_addr(x) + for (int i = 0; i < 15; i++) + x[i] = 2 * i; + + #pragma omp target has_device_addr(x[15:15]) + for (int i = 15; i < 30; i++) + x[i] = 3 * i; +} + +int +main () +{ + int *dp = (int*)omp_target_alloc (30*sizeof(int), 0); + + #pragma omp target is_device_ptr(dp) + for (int i = 0; i < 30; i++) + dp[i] = i; + + int (&x)[30] = *static_cast(static_cast(dp)); + + foo (x); + + int y[30]; + for (int i = 0; i < 30; ++i) + y[i] = 0; + int h = omp_get_initial_device (); + int t = omp_get_default_device (); + omp_target_memcpy (&y, dp, 30 * sizeof(int), 0, 0, h, t); + for (int i = 0; i < 15; ++i) + if (y[i] != 2 * i) + __builtin_abort (); + for (int i = 15; i < 30; ++i) + if (y[i] != 3 * i) + __builtin_abort (); + + omp_target_free (dp, 0); + + return 0; +} diff --git a/libgomp/testsuite/libgomp.c++/target-has-device-addr-9.C b/libgomp/testsuite/libgomp.c++/target-has-device-addr-9.C new file mode 100644 index 00000000000..0c34cab56d2 --- /dev/null +++ b/libgomp/testsuite/libgomp.c++/target-has-device-addr-9.C @@ -0,0 +1,30 @@ +/* Testing 'has_device_addr' clause on the target construct with template. */ + +#include + +template +void +foo (T (&x)) +{ + #pragma omp target has_device_addr(x) + x = 24; +} + +int +main () +{ + int *dp = (int*)omp_target_alloc (sizeof(int), 0); + int &x = *dp; + + foo (x); + + int y = 42; + int h = omp_get_initial_device (); + int t = omp_get_default_device (); + omp_target_memcpy (&y, dp, sizeof(int), 0, 0, h, t); + if (y != 24) + __builtin_abort (); + + omp_target_free (dp, 0); + return 0; +}