Change entry for Eritrea.
[kopensolaris-gnu/glibc.git] / dlfcn / defaultmod1.c
1 #include <dlfcn.h>
2 #include <stdio.h>
3
4 extern int found_in_mod1 (void);
5 int
6 found_in_mod1 (void)
7 {
8   return 1;
9 }
10
11
12 extern int test_in_mod1 (void *mainp);
13 int
14 test_in_mod1 (void *mainp)
15 {
16   int (*ifp) (void);
17   void *p;
18   int result = 0;
19
20   /* Find function `main'.  */
21   p = dlsym (RTLD_DEFAULT, "main");
22   if (p == NULL)
23     {
24       printf ("%s: main not found\n", __FILE__);
25       result = 1;
26     }
27   else if (p != mainp)
28     {
29       printf ("%s: wrong address returned for main\n", __FILE__);
30       result = 1;
31     }
32   else
33     printf ("%s: main correctly found\n", __FILE__);
34
35   ifp = dlsym (RTLD_DEFAULT, "found_in_mod1");
36   if ((void *) ifp == NULL)
37     {
38       printf ("%s: found_in_mod1 not found\n", __FILE__);
39       result = 1;
40     }
41   else if (ifp () != 1)
42     {
43       printf ("%s: wrong address returned for found_in_mod1\n", __FILE__);
44       result = 1;
45     }
46   else
47     printf ("%s: found_in_mod1 correctly found\n", __FILE__);
48
49   ifp = dlsym (RTLD_DEFAULT, "found_in_mod2");
50   if ((void *) ifp == NULL)
51     {
52       printf ("%s: found_in_mod2 not found\n", __FILE__);
53       result = 1;
54     }
55   else if (ifp () != 2)
56     {
57       printf ("%s: wrong address returned for found_in_mod2\n", __FILE__);
58       result = 1;
59     }
60   else
61     printf ("%s: found_in_mod2 correctly found\n", __FILE__);
62
63   return result;
64 }