aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/gcc.dg/c23-complit-4.c
blob: 22ec19c12134d8f07750cc719319ae11d4ef6252 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
/* Test C23 storage class specifiers in compound literals.  Thread-local
   cases, execution tests.  */
/* { dg-do run } */
/* { dg-options "-pthread -std=gnu23 -pedantic-errors" } */
/* { dg-require-effective-target pthread_h } */
/* { dg-require-effective-target pthread } */
/* { dg-require-effective-target tls_runtime } */
/* { dg-add-options tls } */

#include <pthread.h>

extern void abort (void);
extern void exit (int);

int *
thread_addr ()
{
  return (static thread_local int []) { 1, 2 };
}

int *volatile p, *volatile q, r;

void *
thread_fn (void *)
{
  q = thread_addr ();
  if (q[0] != 1 || q[1] != 2)
    return NULL;
  q[0] = 5;
  q[1] = 6;
  return &r;
}

int
main ()
{
  int i;
  pthread_t tid;
  void *ret;
  p = thread_addr ();
  if (p[0] != 1 || p[1] != 2)
    abort ();
  p[0] = 3;
  p[1] = 4;
  if (p != thread_addr ())
    abort ();
  i = pthread_create (&tid, NULL, thread_fn, NULL);
  if (p != thread_addr ())
    abort ();
  i = pthread_join (tid, &ret);
  if (i != 0)
    abort ();
  if (ret != &r)
    abort ();
  if (p != thread_addr ())
    abort ();
  if (p[0] != 3 || p[1] != 4)
    abort ();
  exit (0);
}