Change 34824: Skip #ifdefs and other preprocessor lines when parsing the

[Gisle Aas]

Change 34824 by [EMAIL PROTECTED] 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.