libomptarget/test/offloading/atomic-compare-signedness.c

// Check that omp atomic compare handles signedness of integer comparisons
// correctly.
//
// At one time, a bug sometimes reversed the signedness.

// RUN: %libomptarget-compile-generic
// RUN: %libomptarget-run-generic | %fcheck-generic
// RUN: %libomptarget-compileopt-generic -fopenmp-version=51
// RUN: %libomptarget-run-generic | %fcheck-generic

// High parallelism increases our chances of detecting a lack of atomicity.
#define NUM_THREADS_TRY 256

#include <limits.h>
#include <omp.h>
#include <stdio.h>

int main() {
  //      CHECK: signed: num_threads=[[#NUM_THREADS:]]{{$}}
  // CHECK-NEXT: signed: xs=[[#NUM_THREADS-1]]{{$}}
  int xs = -1;
  int numThreads;
#pragma omp target parallel for num_threads(NUM_THREADS_TRY)                   \
    map(tofrom : xs, numThreads)
  for (int i = 0; i < omp_get_num_threads(); ++i) {
#pragma omp atomic compare
    if (xs < i) {
      xs = i;
    }
    if (i == 0)
      numThreads = omp_get_num_threads();
  }
  printf("signed: num_threads=%d\n", numThreads);
  printf("signed: xs=%d\n", xs);

  // CHECK-NEXT: unsigned: xu=0x0{{$}}
  unsigned xu = UINT_MAX;
#pragma omp target parallel for num_threads(NUM_THREADS_TRY) map(tofrom : xu)
  for (int i = 0; i < omp_get_num_threads(); ++i) {
#pragma omp atomic compare
    if (xu > i) {
      xu = i;
    }
  }
  printf("unsigned: xu=0x%x\n", xu);
  return 0;
}