43 lines · c
1/*2 * barrier.c -- Archer testcase3 */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-exception11//12//===----------------------------------------------------------------------===//13 14// RUN: %libarcher-compile-and-run | FileCheck %s15// REQUIRES: tsan16#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 barrier29 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 race41// CHECK-NOT: ThreadSanitizer: reported42// CHECK: DONE43