openmp/tools/archer/tests/task/task-taskwait-nested.c

   1 /*
   2  * task-taskwait-nested.c -- Archer testcase
   3  */
   4
   5 //===----------------------------------------------------------------------===//
   6 //
   7 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
   8 //
   9 // See tools/archer/LICENSE.txt for details.
  10 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
  11 //
  12 //===----------------------------------------------------------------------===//
  13
  14
  15 // RUN: %libarcher-compile-and-run | FileCheck %s
  16 // REQUIRES: tsan
  17 #include <omp.h>
  18 #include <stdio.h>
  19 #include <unistd.h>
  20 #include "ompt/ompt-signal.h"
  21
  22 int main(int argc, char *argv[]) {
  23   int var = 0, a = 0;
  24
  25 #pragma omp parallel num_threads(2) shared(var, a)
  26 #pragma omp master
  27   {
  28 #pragma omp task
  29     {
  30 #pragma omp task shared(var, a)
  31       {
  32         OMPT_SIGNAL(a);
  33         delay(100);
  34         var++;
  35       }
  36 #pragma omp taskwait
  37     }
  38
  39     // Give other thread time to steal the task and execute its child.
  40     OMPT_WAIT(a, 1);
  41
  42 #pragma omp taskwait
  43     var++;
  44   }
  45
  46   fprintf(stderr, "DONE\n");
  47   int error = (var != 2);
  48   return error;
  49 }
  50
  51 // CHECK-NOT: ThreadSanitizer: data race
  52 // CHECK-NOT: ThreadSanitizer: reported
  53 // CHECK: DONE