openmp/tools/archer/tests/barrier/barrier.c

   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
  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