diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 1998-07-22 01:53:54 +0300 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-22 07:53:53 +0000 |
commit | 8c3ad6a18eed4decec506dcaa734e6a7dbcf5553 (patch) | |
tree | f92da0af7b166148b1ad0bfbedecf200ae9308f5 /perl_exp.SH | |
parent | fc360e464b2c0ad9f690711276bbd836ab5c39af (diff) | |
download | perl-8c3ad6a18eed4decec506dcaa734e6a7dbcf5553.tar.gz |
fix AIX hints for PL_* changes
Message-Id: <199807211953.WAA55724@vipunen.hut.fi>
Subject: Re: _76 fails to link B extension on AIX 414
p4raw-id: //depot/perl@1633
Diffstat (limited to 'perl_exp.SH')
-rw-r--r-- | perl_exp.SH | 31 |
1 files changed, 21 insertions, 10 deletions
diff --git a/perl_exp.SH b/perl_exp.SH index a874e5c13d..b8b2907024 100644 --- a/perl_exp.SH +++ b/perl_exp.SH @@ -1,18 +1,28 @@ #!/bin/sh # -# Written: Nov 1994 Wayne Scott (wscott@ichips.intel.com) +# Written: Nov 1994 Wayne Scott <wscott@ichips.intel.com> +# +# Updated: 1997-8 Jarkko Hietaniemi <jhi@iki.fi> # # Create the export list for perl. # Needed by AIX to do dynamic linking. # -# This simple program relys on 'global.sym' and other *.sym files -# being up to date with all of the global symbols that a dynamic -# link library might want to access. +# This simple program relies on 'global.sym' and few other *.sym files +# and the *var*.h files being up to date with all of the global +# symbols that a dynamic link library might want to access. # -# Most symbols have a Perl_ prefix because that's what embed.h sticks -# in front of them. Variations depend on binary compatibility with -# Perl 5.003. +# Most symbols have a Perl_ or PL_prefix because that's what embed.h +# sticks in front of them. # +# AIX requires the list of external symbols (variables or functions) +# that are made available for another executable object file the import. +# The list is called the export file and it is a simple text file. +# The first line must be +#! +# That is, hash-bang, pound-shout, however you want to call it. +# The remainder of the file are the names of the symbols, one per line. +# The file is then given to the system loader (cc/xlc command line) +# as -bE:export.file. case $CONFIG in '') @@ -42,10 +52,11 @@ echo "#!" > perl.exp # perlio.sym will added below if needed. syms="global.sym interp.sym thread.sym" -sed -n '/^[A-Za-z]/ s/^/Perl_/p' $syms >> perl.exp +sed -n '/^[A-Za-z]/ s/^/Perl_/p' $syms >> perl.exp -sed -n 's/^PERLVAR.*(G\([^[,]*\).*/Perl_\1/p' perlvars.h >> perl.exp -sed -n 's/^PERLVAR.*(T\([^[,]*\).*/Perl_\1/p' thrdvar.h >> perl.exp +sed -n 's/^PERLVAR.*(G\([^[,]*\).*/PL_\1/p' perlvars.h >> perl.exp +sed -n 's/^PERLVAR.*(I\([^[,]*\).*/PL_\1/p' intrpvar.h >> perl.exp +sed -n 's/^PERLVAR.*(T\([^[,]*\).*/PL_\1/p' thrdvar.h >> perl.exp # # If we use the PerlIO abstraction layer, add its symbols |