xref: /llvm-project/openmp/tools/archer/tests/barrier/barrier.c (revision 77ad98c80881ba90bf18ec2780169c60e02c159b)
1 /*
2  * 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 // RUN: %libarcher-compile-and-run | FileCheck %s
15 // REQUIRES: tsan
16 #include <omp.h>
17 #include <stdio.h>
18 
main(int argc,char * argv[])19 int main(int argc, char *argv[]) {
20   int var = 0;
21 
22 #pragma omp parallel num_threads(2) shared(var)
23   {
24     if (omp_get_thread_num() == 0) {
25       var++;
26     }
27 
28 #pragma omp barrier
29 
30     if (omp_get_thread_num() == 1) {
31       var++;
32     }
33   }
34 
35   fprintf(stderr, "DONE\n");
36   int error = (var != 2);
37   return error;
38 }
39 
40 // CHECK-NOT: ThreadSanitizer: data race
41 // CHECK-NOT: ThreadSanitizer: reported
42 // CHECK: DONE
43