summaryrefslogtreecommitdiff
path: root/embed.pl
diff options
context:
space:
mode:
authorHugo van der Sanden <hv@crypt.org>2003-02-17 09:06:44 +0000
committerhv <hv@crypt.org>2003-02-17 09:06:44 +0000
commit47e67c64769a7911dc3162f9a36c195bd4b4278c (patch)
tree5a58400a77c6ba7e3eaca8f4755d1e126aea944f /embed.pl
parentd3050d9ddc948efe78c52984619d71727ece2e61 (diff)
downloadperl-47e67c64769a7911dc3162f9a36c195bd4b4278c.tar.gz
Suppress empty #ifdef blocks in embed.pl
p4raw-id: //depot/perl@18734
Diffstat (limited to 'embed.pl')
-rwxr-xr-xembed.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/embed.pl b/embed.pl
index 9e5c62b482..598ebcc0cd 100755
--- a/embed.pl
+++ b/embed.pl
@@ -344,7 +344,7 @@ walk_table {
$ret .= hide($func,"Perl_$func");
}
}
- unless ($flags =~ /A/) {
+ if ($ret ne '' && $flags !~ /A/) {
if ($flags =~ /E/) {
$ret = "#if defined(PERL_CORE) || defined(PERL_EXT)\n$ret#endif\n";
} else {