mirror of
https://sourceware.org/git/glibc.git
synced 2025-08-29 06:42:03 +03:00
30 lines
470 B
C
30 lines
470 B
C
/* Check unloading modules with data in static TLS block. */
|
|
#include <dlfcn.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
|
|
|
|
static int
|
|
do_test (void)
|
|
{
|
|
int i;
|
|
for (i = 0; i < 1000;)
|
|
{
|
|
printf ("round %d\n",++i);
|
|
|
|
void *h = dlopen ("tst-tlsmod13a.so", RTLD_LAZY);
|
|
if (h == NULL)
|
|
{
|
|
printf ("cannot load: %s\n", dlerror ());
|
|
exit (1);
|
|
}
|
|
|
|
dlclose (h);
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
#define TEST_FUNCTION do_test ()
|
|
#include "../test-skeleton.c"
|