llvm-project/compiler-rt/test/tsan/Darwin/gcd-apply.mm

49 lines
1.0 KiB
Plaintext

// RUN: %clang_tsan %s -o %t -framework Foundation
// RUN: %run %t 2>&1 | FileCheck %s
#import <Foundation/Foundation.h>
#import "../test.h"
long global;
long array[2];
void callback(void *context, size_t i) {
long n = global;
array[i] = n + i;
barrier_wait(&barrier);
}
int main(int argc, const char *argv[]) {
barrier_init(&barrier, 2);
fprintf(stderr, "start\n");
// Warm up GCD (workaround for macOS Sierra where dispatch_apply might run single-threaded).
dispatch_sync(dispatch_get_global_queue(DISPATCH_QUEUE_PRIORITY_DEFAULT, 0), ^{ });
dispatch_queue_t q = dispatch_queue_create("my.queue", DISPATCH_QUEUE_CONCURRENT);
global = 42;
dispatch_apply(100, q, ^(size_t i) {
long n = global;
array[i] = n + i;
barrier_wait(&barrier);
});
for (int i = 0; i < 100; i++) {
fprintf(stderr, "array[%d] = %ld\n", i, array[i]);
}
global = 43;
dispatch_apply_f(100, q, NULL, &callback);
fprintf(stderr, "done\n");
return 0;
}
// CHECK: start
// CHECK: done
// CHECK-NOT: WARNING: ThreadSanitizer