]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - gold/testsuite/tls_test_c.c
Update year range in copyright notice of binutils files
[thirdparty/binutils-gdb.git] / gold / testsuite / tls_test_c.c
CommitLineData
155a0dd7
ILT
1/* tls_test_c.c -- test TLS common symbol
2
250d07de 3 Copyright (C) 2008-2021 Free Software Foundation, Inc.
155a0dd7
ILT
4 Written by Ian Lance Taylor <iant@google.com>
5
6 This file is part of gold.
7
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.
12
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.
17
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. */
22
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. */
25
155a0dd7 26#include "config.h"
e550e1a2 27#include <stdio.h>
155a0dd7
ILT
28
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)
39
40#ifdef HAVE_OMP_SUPPORT
41int v7;
42#pragma omp threadprivate (v7)
43#endif
44
e0bb29a5
CS
45int t11(void);
46int t11_last(void);
47
155a0dd7 48int
e0bb29a5 49t11(void)
155a0dd7
ILT
50{
51#ifdef HAVE_OMP_SUPPORT
52 CHECK_EQ_OR_RETURN(v7, 0);
53 v7 = 70;
54#endif
55 return 1;
56}
57
58int
e0bb29a5 59t11_last(void)
155a0dd7
ILT
60{
61#ifdef HAVE_OMP_SUPPORT
62 CHECK_EQ_OR_RETURN(v7, 70);
63#endif
64 return 1;
65}