old_perl_exp.SH

   1 #!/bin/sh
   2
   3 # Written: Nov 1994 Wayne Scott (wscott@ichips.intel.com)
   4
   5 # Create the export list for perl based on 'old_global.sym'.
   6 # Needed by AIX to do dynamic linking.
   7
   8 # This simple program relys on 'old_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 # All symbols have a Perl_ prefix because that's what embed.h
  13 # sticks in front of them.
  14
  15 echo "Extracting perl.exp"
  16
  17 rm -f perl.exp
  18 echo "#!" > perl.exp
  19
  20 sed -n '/^[A-Za-z]/ s/^/Perl_/p' old_global.sym >> perl.exp
  21
  22 #
  23 # also add symbols from interp.sym
  24 # They are only needed if -DMULTIPLICITY is not set but it
  25 # doesn't hurt to include them anyway.
  26 sed -n '/^[A-Za-z]/ p' interp.sym >> perl.exp
  27
  28 # extra globals not included above.
  29 cat <<END >> perl.exp
  30 perl_init_i18nl10n
  31 perl_init_i18nl14n
  32 perl_new_collate
  33 perl_new_ctype
  34 perl_new_numeric
  35 perl_numeric_local
  36 perl_numeric_standard
  37 perl_alloc
  38 perl_construct
  39 perl_destruct
  40 perl_free
  41 perl_parse
  42 perl_run
  43 perl_get_sv
  44 perl_get_av
  45 perl_get_hv
  46 perl_get_cv
  47 perl_call_argv
  48 perl_call_pv
  49 perl_call_method
  50 perl_call_sv
  51 perl_requirepv
  52 END