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.
   6 # Needed by AIX to do dynamic linking.
   7
   8 # NOTE: If you're using 'old_embed.pl', don't use this script!
   9 #       Use 'old_perl_exp.SH' instead.
  10
  11 # This simple program relys on 'global.sym' being up to date
  12 # with all of the global symbols that a dynamicly link library
  13 # might want to access.
  14
  15 # All symbols have a Perl_ prefix because that's what embed.h
  16 # sticks in front of them.
  17
  18 echo "Extracting perl.exp"
  19
  20 rm -f perl.exp
  21 echo "#!" > perl.exp
  22
  23 sed -n '/^[A-Za-z]/ s/^/Perl_/p' global.sym >> perl.exp
  24
  25 #
  26 # also add symbols from interp.sym
  27 # They are only needed if -DMULTIPLICITY is not set but it
  28 # doesn't hurt to include them anyway.
  29 sed -n '/^[A-Za-z]/ s/^/Perl_/p' interp.sym >> perl.exp
  30
  31 # extra globals not included above.
  32 cat <<END >> perl.exp
  33 perl_init_i18nl10n
  34 perl_init_i18nl14n
  35 perl_new_collate
  36 perl_new_ctype
  37 perl_new_numeric
  38 perl_numeric_local
  39 perl_numeric_standard
  40 perl_alloc
  41 perl_construct
  42 perl_destruct
  43 perl_free
  44 perl_parse
  45 perl_run
  46 perl_get_sv
  47 perl_get_av
  48 perl_get_hv
  49 perl_get_cv
  50 perl_call_argv
  51 perl_call_pv
  52 perl_call_method
  53 perl_call_sv
  54 perl_requirepv
  55 END