Change 34824 by gisle@gisle-ask on 2008/11/12 14:50:14
Skip #ifdefs and other preprocessor lines when parsing the
local_patches section of patchlevel.h.
Affected files ...
... //depot/perl/utils/perlbug.PL#59 edit
Differences ...
==== //depot/perl/utils/perlbug.PL#59 (text) ====
Index: perl/utils/perlbug.PL
--- perl/utils/perlbug.PL#58~34414~ 2008-09-24 05:20:35.000000000 -0700
+++ perl/utils/perlbug.PL 2008-11-12 06:50:14.000000000 -0800
@@ -40,6 +40,7 @@
my @patches;
while (<PATCH_LEVEL>) {
last if /^\s*}/;
+ next if /^\s*#/; # preprocessor stuff
chomp;
s/^\s+,?\s*"?//;
s/"?\s*,?$//;
End of Patch.