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
19int 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, format: "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

source code of openmp/tools/archer/tests/barrier/barrier.c