Commit | Line | Data |
---|---|---|
a0d0e21e LW |
1 | #!/bin/sh |
2 | ||
75f92628 AD |
3 | # Written: Nov 1994 Wayne Scott (wscott@ichips.intel.com) |
4 | ||
a0d0e21e LW |
5 | # Create the export list for perl. |
6 | # Needed by AIX to do dynamic linking. | |
7 | ||
8 | # This simple program relys on 'global.sym' being up to date | |
9 | # with all of the global symbols that a dynamicly link library | |
10 | # might want to access. | |
11 | ||
12 | echo "Extracting perl.exp" | |
13 | ||
14 | echo "#!" > perl.exp | |
15 | ||
16 | sed -n "/^[A-Za-z]/ p" global.sym >> perl.exp | |
17 | ||
75f92628 AD |
18 | # also add symbols from interp.sym |
19 | # They are only needed if -DMULTIPLICITY is not set but it | |
20 | # doesn't hurt to include them anyway. | |
21 | sed -n "/^[A-Za-z]/ p" interp.sym >> perl.exp | |
22 | ||
23 | # extra globals not included above. | |
a0d0e21e LW |
24 | cat <<END >> perl.exp |
25 | perl_init_ext | |
26 | perl_alloc | |
27 | perl_construct | |
28 | perl_destruct | |
29 | perl_free | |
30 | perl_parse | |
31 | perl_run | |
32 | perl_get_sv | |
33 | perl_get_av | |
34 | perl_get_hv | |
35 | perl_get_cv | |
36 | perl_call_argv | |
37 | perl_call_pv | |
38 | perl_call_method | |
39 | perl_call_sv | |
40 | perl_requirepv | |
1aef975c AD |
41 | safemalloc |
42 | saferealloc | |
43 | safefree | |
a0d0e21e | 44 | END |