diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1998-08-13 01:41:37 +0300 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-09-23 07:03:16 +0000 |
| commit | e4d5a464a77aaa196c56d6d73e56e8cdc9decc69 (patch) | |
| tree | b38f03ca311f8a2354fde8b798c485114c6e55fb /perl_exp.SH | |
| parent | 8d300b32a709a689cc4faaa10b28cbb610d1e846 (diff) | |
| download | perl-e4d5a464a77aaa196c56d6d73e56e8cdc9decc69.tar.gz | |
5.004_50 or 5.005_02: get rid of interp.sym because not even AIX needs it
Message-Id: <199808121941.WAA06263@alpha.hut.fi>
p4raw-id: //depot/perl@1826
Diffstat (limited to 'perl_exp.SH')
| -rw-r--r-- | perl_exp.SH | 24 |
1 files changed, 20 insertions, 4 deletions
diff --git a/perl_exp.SH b/perl_exp.SH index b8b2907024..a210173a99 100644 --- a/perl_exp.SH +++ b/perl_exp.SH @@ -49,8 +49,10 @@ rm -f perl.exp echo "#!" > perl.exp # No compat3 since 5.004_50. -# perlio.sym will added below if needed. -syms="global.sym interp.sym thread.sym" +# No interp.sym since 5.005_03. +# perlio.sym will added later if needed. + +syms="global.sym thread.sym" sed -n '/^[A-Za-z]/ s/^/Perl_/p' $syms >> perl.exp @@ -59,7 +61,7 @@ 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 +# If we use the PerlIO abstraction layer, add its symbols. # if [ $useperlio = "define" ] @@ -72,7 +74,7 @@ fi # not actually be defined, but there's no harm in that). # -cat <<END >> perl.exp +cat >>perl.exp <<END perl_init_i18nl10n perl_init_i18nl14n perl_new_collate @@ -97,15 +99,29 @@ perl_call_sv perl_eval_pv perl_eval_sv perl_require_pv +END + +case "$ccflags" in +*-DHIDEMYMALLOC*) + cat >>perl.exp <<END Mymalloc Mycalloc Myremalloc Myfree +END + ;; +esac + +case "$ccflags" in +*-DEMBEDMYMALLOC*) + cat >>perl.exp <<END Perl_malloc Perl_calloc Perl_realloc Perl_free END + ;; +esac # The shebang line nicely sorts as the first one. sort -o perl.exp -u perl.exp |