* testsuite/libgomp.fortran/vla7.f90: Add -w to options.
[official-gcc.git] / libstdc++-v3 / testsuite / 19_diagnostics / 23591_thread-1.c
blob8c953eaed0e9f4207800234b17c7c2ff6e05238a
1 // { dg-require-sharedlib "" }
2 // { dg-options "-g -O2 -pthread -ldl -x c" { target *-*-linux* } }
4 // Copyright (C) 2005 Free Software Foundation, Inc.
5 //
6 // This file is part of the GNU ISO C++ Library. This library is free
7 // software; you can redistribute it and/or modify it under the
8 // terms of the GNU General Public License as published by the
9 // Free Software Foundation; either version 2, or (at your option)
10 // any later version.
12 // This library is distributed in the hope that it will be useful,
13 // but WITHOUT ANY WARRANTY; without even the implied warranty of
14 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 // GNU General Public License for more details.
17 // You should have received a copy of the GNU General Public License along
18 // with this library; see the file COPYING. If not, write to the Free
19 // Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
20 // USA.
22 #include <pthread.h>
23 #include <dlfcn.h>
24 #include <errno.h>
25 #include <stdio.h>
26 #include <string.h>
28 // NB: This must be compiled and linked as a "C" executable.
29 static void* run(void* arg)
31 typedef void (*function_type) (void);
32 void* lib;
33 void (*cb)();
35 lib = dlopen("./testsuite_shared.so", RTLD_NOW);
36 if (lib == NULL)
38 printf("dlopen failed: %s\n", strerror(errno));
39 return NULL;
41 cb = (function_type) dlsym(lib, "try_throw_exception");
42 if (cb == NULL)
44 printf("dlsym failed: %s\n", strerror(errno));
45 return NULL;
47 cb();
48 dlclose(lib);
49 return NULL;
52 // libstdc++/23591
53 int main(void)
55 pthread_t pt;
57 if (pthread_create(&pt, NULL, &run, NULL) != 0)
58 return 1;
59 if (pthread_join(pt, NULL) != 0)
60 return 1;
62 return 0;