1// RUN: %clang_tsan %s -o %t -framework Foundation
2// RUN: %env_tsan_opts=ignore_interceptors_accesses=1 %run %t 2>&1 | FileCheck %s
3
4#import <Foundation/Foundation.h>
5
6long global;
7
8int main(int argc, const char *argv[]) {
9  dispatch_queue_t queue =
10      dispatch_queue_create("my.queue", DISPATCH_QUEUE_CONCURRENT);
11
12  dispatch_source_t source =
13      dispatch_source_create(DISPATCH_SOURCE_TYPE_TIMER, 0, 0, queue);
14
15  dispatch_source_set_timer(source, dispatch_walltime(NULL, 0), 1e9, 5);
16
17  global = 42;
18
19  dispatch_source_set_cancel_handler(source, ^{
20    fprintf(stderr, "global = %ld\n", global);
21
22    dispatch_sync(dispatch_get_main_queue(), ^{
23      CFRunLoopStop(CFRunLoopGetCurrent());
24    });
25  });
26
27  dispatch_resume(source);
28  dispatch_cancel(source);
29
30  CFRunLoopRun();
31
32  return 0;
33}
34
35// CHECK: global = 42
36// CHECK-NOT: WARNING: ThreadSanitizer
37