Add check for double-semi-colons at the end of a line

This commit is contained in:
Edmund Wong 2017-09-18 15:33:24 +08:00
parent d6568bad5e
commit f0e87ff9eb
1 changed files with 4 additions and 0 deletions

View File

@ -123,6 +123,10 @@ for my $fn (@ARGV) {
if (/([^\s'])\{/) {
msg " $1\{:$fn:$.\n";
}
## Warn about double semi-colons at the end of a line.
if (/;;$/) {
msg " double semi-colons at the end of $. in $fn\n"
}
## Warn about multiple internal spaces.
#if (/[^\s,:]\s{2,}[^\s\\=]/) {
# msg " X X:$fn:$.\n";