xref: /netbsd-src/external/gpl3/gdb.old/dist/gdb/testsuite/gdb.threads/tls-so_extern_main.c (revision 6881a4007f077b54e5f51159c52b9b25f57deb0d)
1 /* This testcase is part of GDB, the GNU debugger.
2 
3    Copyright 2015-2023 Free Software Foundation, Inc.
4 
5    This program is free software; you can redistribute it and/or modify
6    it under the terms of the GNU General Public License as published by
7    the Free Software Foundation; either version 3 of the License, or
8    (at your option) any later version.
9 
10    This program is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13    GNU General Public License for more details.
14 
15    You should have received a copy of the GNU General Public License
16    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
17 
18 #include <pthread.h>
19 
20 extern __thread void *so_extern;
21 extern __thread void *so_extern2;
22 
23 static void *
24 tls_ptr (void *p)
25 {
26    so_extern = &so_extern;
27    so_extern2 = &so_extern2; /* break here to check result */
28 
29    return NULL;
30 }
31 
32 int
33 main (void)
34 {
35    pthread_t threads[2];
36 
37    tls_ptr (NULL);
38 
39    pthread_create (&threads[0], NULL, tls_ptr, NULL);
40    pthread_create (&threads[1], NULL, tls_ptr, NULL);
41 
42    pthread_join (threads[0], NULL);
43    pthread_join (threads[1], NULL);
44 
45    tls_ptr (NULL);
46 
47    return 0;
48 }
49 
50