From 7d02047320b1d47e4ab82d96dcb88dfe410e9be0 Mon Sep 17 00:00:00 2001 From: Thomas Schwinge Date: Mon, 9 Dec 2019 12:40:17 +0100 Subject: [PATCH] [PR92854] Add 'libgomp.oacc-c-c++-common/pr92854-1.c' ... to document the status quo. libgomp/ PR libgomp/92854 * testsuite/libgomp.oacc-c-c++-common/pr92854-1.c: New file. From-SVN: r279120 --- libgomp/ChangeLog | 3 ++ .../libgomp.oacc-c-c++-common/pr92854-1.c | 31 +++++++++++++++++++ 2 files changed, 34 insertions(+) create mode 100644 libgomp/testsuite/libgomp.oacc-c-c++-common/pr92854-1.c diff --git a/libgomp/ChangeLog b/libgomp/ChangeLog index 6ef2f24e4d5..aac3b1887b0 100644 --- a/libgomp/ChangeLog +++ b/libgomp/ChangeLog @@ -1,5 +1,8 @@ 2019-12-09 Thomas Schwinge + PR libgomp/92854 + * testsuite/libgomp.oacc-c-c++-common/pr92854-1.c: New file. + * testsuite/libgomp.oacc-c-c++-common/host_data-6.c: New file. * target.c (gomp_exit_data): Use 'gomp_remove_var'. diff --git a/libgomp/testsuite/libgomp.oacc-c-c++-common/pr92854-1.c b/libgomp/testsuite/libgomp.oacc-c-c++-common/pr92854-1.c new file mode 100644 index 00000000000..6ba96b6bf8f --- /dev/null +++ b/libgomp/testsuite/libgomp.oacc-c-c++-common/pr92854-1.c @@ -0,0 +1,31 @@ +/* Verify that 'acc_unmap_data' unmaps even in presence of dynamic reference + counts. */ + +/* { dg-skip-if "" { *-*-* } { "*" } { "-DACC_MEM_SHARED=0" } } */ + +#include +#include +#include + +int +main () +{ + const int N = 180; + + char *h = (char *) malloc (N); + char *d = (char *) acc_malloc (N); + if (!d) + abort (); + acc_map_data (h, d, N); + + char *d_ = (char *) acc_create (h + 3, N - 77); + assert (d_ == d + 3); + + d_ = (char *) acc_create (h, N); + assert (d_ == d); + + acc_unmap_data (h); + assert (!acc_is_present (h, N)); + + return 0; +} -- 2.30.2