(root)/
gcc-13.2.0/
gcc/
testsuite/
g++.dg/
tsan/
fd_close_norace.C
#include <pthread.h>
#include <stdio.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>

void *Thread1(void *x) {
  int f = open("/dev/random", O_RDONLY);
  close(f);
  return NULL;
}

void *Thread2(void *x) {
  sleep(1);
  int f = open("/dev/random", O_RDONLY);
  close(f);
  return NULL;
}

int main() {
  pthread_t t[2];
  pthread_create(&t[0], NULL, Thread1, NULL);
  pthread_create(&t[1], NULL, Thread2, NULL);
  pthread_join(t[0], NULL);
  pthread_join(t[1], NULL);
  fprintf(stderr, "OK\n");
}

/* { dg-prune-output "WARNING: ThreadSanitizer: data race.*(\n|\r\n|\r)" } */