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);
}
|
