2009-06-12 Tristan Gingold <gingold@adacore.com>
[binutils.git] / gold / testsuite / tls_test_c.c
blob730e46ddad8bb9d435c90192d55fbc8a9895fd51
1 /* tls_test_c.c -- test TLS common symbol
3 Copyright 2008 Free Software Foundation, Inc.
4 Written by Ian Lance Taylor <iant@google.com>
6 This file is part of gold.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
21 MA 02110-1301, USA. */
23 /* The only way I know to get gcc to generate a TLS common symbol is
24 to use a C file and an OpenMP directive. */
26 #include <stdio.h>
27 #include "config.h"
29 #define CHECK_EQ_OR_RETURN(var, expected) \
30 do \
31 { \
32 if ((var) != (expected)) \
33 { \
34 printf(#var ": expected %d, found %d\n", expected, var); \
35 return 0; \
36 } \
37 } \
38 while (0)
40 #ifdef HAVE_OMP_SUPPORT
41 int v7;
42 #pragma omp threadprivate (v7)
43 #endif
45 int t11(void);
46 int t11_last(void);
48 int
49 t11(void)
51 #ifdef HAVE_OMP_SUPPORT
52 CHECK_EQ_OR_RETURN(v7, 0);
53 v7 = 70;
54 #endif
55 return 1;
58 int
59 t11_last(void)
61 #ifdef HAVE_OMP_SUPPORT
62 CHECK_EQ_OR_RETURN(v7, 70);
63 #endif
64 return 1;