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 /embed.pl | |
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 'embed.pl')
-rwxr-xr-x | embed.pl | 7 |
1 files changed, 0 insertions, 7 deletions
@@ -37,7 +37,6 @@ sub readsyms (\%$) { } readsyms %global, 'global.sym'; -readsyms %interp, 'interp.sym'; sub readvars(\%$$) { my ($syms, $file,$pre) = @_; @@ -80,12 +79,6 @@ foreach my $sym (sort keys %globvar) } } -foreach my $sym (keys %interp) - { - warn "extra $sym in interp.sym\n" - unless exists $intrp{$sym} || exists $thread{$sym}; - } - foreach my $sym (sort keys %thread) { warn "$sym in intrpvar.h\n" if exists $intrp{$sym}; |