summaryrefslogtreecommitdiff
path: root/embed.pl
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>1998-08-13 01:41:37 +0300
committerGurusamy Sarathy <gsar@cpan.org>1998-09-23 07:03:16 +0000
commite4d5a464a77aaa196c56d6d73e56e8cdc9decc69 (patch)
treeb38f03ca311f8a2354fde8b798c485114c6e55fb /embed.pl
parent8d300b32a709a689cc4faaa10b28cbb610d1e846 (diff)
downloadperl-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-xembed.pl7
1 files changed, 0 insertions, 7 deletions
diff --git a/embed.pl b/embed.pl
index a7fb0eda3b..1d10c6c58a 100755
--- a/embed.pl
+++ b/embed.pl
@@ -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};