[gdb/testsuite] Factor out lib/valgrind.exp
[external/binutils.git] / gdb / testsuite / gdb.base / gcore-tls-pie.c
1 /* Copyright 2013-2018 Free Software Foundation, Inc.
2
3    This file is part of GDB.
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 /* The size of these variables is chosen so that gold will add some padding
19    to the TLS program header (total size of 16 bytes on x86_64) which strip
20    will remove (bringing it down to 9 bytes).  */
21
22 __thread long j;
23 __thread char i;
24
25 void
26 break_here (void)
27 {
28   *(int *) 0 = 0;
29 }
30
31 void
32 foo (void)
33 {
34   break_here ();
35 }
36
37 void
38 bar (void)
39 {
40   foo ();
41 }
42
43 int
44 main (void)
45 {
46   bar ();
47   return 0;
48 }