Home | History | Annotate | Download | only in Darwin
      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 
      6 long global;
      7 
      8 int main(int argc, const char *argv[]) {
      9   fprintf(stderr, "Hello world.\n");
     10 
     11   dispatch_queue_t q = dispatch_queue_create("my.queue", DISPATCH_QUEUE_SERIAL);
     12   dispatch_semaphore_t sem = dispatch_semaphore_create(0);
     13   dispatch_source_t timer = dispatch_source_create(DISPATCH_SOURCE_TYPE_TIMER, 0, 0, q);
     14   long long interval_ms = 10;
     15   dispatch_source_set_timer(timer, dispatch_time(DISPATCH_TIME_NOW, 0), interval_ms * NSEC_PER_MSEC, 0);
     16   dispatch_source_set_event_handler(timer, ^{
     17     fprintf(stderr, "timer\n");
     18     global++;
     19 
     20     if (global > 50) {
     21       dispatch_semaphore_signal(sem);
     22     }
     23   });
     24   dispatch_resume(timer);
     25 
     26   dispatch_semaphore_wait(sem, DISPATCH_TIME_FOREVER);
     27 
     28   fprintf(stderr, "Done.\n");
     29 }
     30 
     31 // CHECK: Hello world.
     32 // CHECK-NOT: WARNING: ThreadSanitizer
     33 // CHECK: Done.
     34