Quellcode durchsuchen

Add a rule to detect misplaced labels during check-spaces

Sebastian Hahn vor 14 Jahren
Ursprung
Commit
a64e660f0e
1 geänderte Dateien mit 4 neuen und 0 gelöschten Zeilen
  1. 4 0
      contrib/checkSpace.pl

+ 4 - 0
contrib/checkSpace.pl

@@ -20,6 +20,10 @@ for $fn (@ARGV) {
         if (/\t/) {
             print "      TAB:$fn:$.\n";
         }
+        ## Warn about markers that don't have a space in front of them
+        if (/^[a-zA-Z_][a-zA-Z_0-9]*:/) {
+            print "nosplabel:$fn:$.\n";
+        }
         ## Warn about trailing whitespace.
         if (/ +$/) {
             print "Space\@EOL:$fn:$.\n";