This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
makedepend.SH: Preprocessor directives don't have to start at column 1
authorKarl Williamson <public@khwilliamson.com>
Sat, 23 Feb 2013 22:38:55 +0000 (15:38 -0700)
committerKarl Williamson <public@khwilliamson.com>
Mon, 25 Feb 2013 03:20:40 +0000 (20:20 -0700)
Like, apparently, the person(s) who originally wrote this script, I
thought all preprocessor directives had to start in column 1.

It turns out that restriction was relaxed in C89; so that they may be
indented.

Spotted by John Goodyear.

makedepend.SH

index f06a483..14c546f 100755 (executable)
@@ -135,7 +135,7 @@ for file in `$cat .clist`; do
       $sed -n <$file \
        -e "/^${filebase}_init(/q" \
        -e '/^#line/d' \
-       -e '/^#/{' \
+       -e '/^[  ]*#/{' \
        -e 's|/\*.*$||' \
        -e 's|\\$||' \
        -e p \