]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
libgomp: Add a testcase for omp_get_num_teams inside of target inside of host teams
authorJakub Jelinek <jakub@redhat.com>
Mon, 15 Nov 2021 07:54:52 +0000 (08:54 +0100)
committerJakub Jelinek <jakub@redhat.com>
Mon, 15 Nov 2021 07:58:39 +0000 (08:58 +0100)
This is https://github.com/OpenMP/spec/issues/3183
There is an agreement that we should return 1 team inside of target,
even if that target is inside of host teams.  We were doing that
when offloading and not during host fallback, r12-5151 should fix that
even for host fallback.

2021-11-15  Jakub Jelinek  <jakub@redhat.com>

* testsuite/libgomp.c/teams-5.c: New test.

libgomp/testsuite/libgomp.c/teams-5.c [new file with mode: 0644]

diff --git a/libgomp/testsuite/libgomp.c/teams-5.c b/libgomp/testsuite/libgomp.c/teams-5.c
new file mode 100644 (file)
index 0000000..ad42e05
--- /dev/null
@@ -0,0 +1,17 @@
+#include <omp.h>
+#include <stdlib.h>
+
+int
+main ()
+{
+  #pragma omp teams num_teams (2)
+  {
+    if (omp_get_num_teams () != 2)
+      abort ();
+    #pragma omp parallel if (0)
+    #pragma omp target
+    if (omp_get_num_teams () != 1 || omp_get_team_num () != 0)
+      abort ();
+  }
+  return 0;
+}