Add more tests of atanh.
[glibc.git] / nptl / tst-once1.c
bloba211a20a87b7e78b63ded7355df788858be4e270
1 /* Copyright (C) 2002-2015 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Ulrich Drepper <drepper@redhat.com>, 2002.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library 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 GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
19 #include <pthread.h>
20 #include <stdio.h>
23 static pthread_once_t once = PTHREAD_ONCE_INIT;
25 static int global;
27 static void
28 once_handler (void)
30 ++global;
34 static int
35 do_test (void)
37 pthread_once (&once, once_handler);
38 pthread_once (&once, once_handler);
40 if (global != 1)
42 printf ("global = %d, expected 1\n", global);
43 return 1;
46 return 0;
49 #define TEST_FUNCTION do_test ()
50 #include "../test-skeleton.c"