1 /*
2  * task-barrier.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 
main(int argc,char * argv[])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   {
27 #pragma omp master
28     {
29 #pragma omp task shared(var)
30       {
31         OMPT_SIGNAL(a);
32         var++;
33       }
34 
35       // Give other thread time to steal the task.
36       OMPT_WAIT(a, 1);
37     }
38 
39 #pragma omp barrier
40 
41 #pragma omp master
42     { var++; }
43   }
44 
45   fprintf(stderr, "DONE\n");
46   int error = (var != 2);
47   return error;
48 }
49 
50 // CHECK-NOT: ThreadSanitizer: data race
51 // CHECK-NOT: ThreadSanitizer: reported
52 // CHECK: DONE
53