Instead of matching multiple characters before the parenthesis,
only check for a single whitespace, which is much less cpu-intensive.
This only matches a few dozen of places where they are on an separate
line, filter out those with a separate regex.
---
build-aux/check-spacing.pl | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/build-aux/check-spacing.pl b/build-aux/check-spacing.pl
index d693fbe..962eabb 100755
--- a/build-aux/check-spacing.pl
+++ b/build-aux/check-spacing.pl
@@ -118,7 +118,9 @@ foreach my $file (@ARGV) {
}
# Forbid whitespace following ( or prior to )
- if ($data =~ /\S\s+\)/ ||
+ # but allow whitespace before ) on a single line
+ # (optionally followed by a semicolon)
+ if (($data =~ /\s\)/ && not $data =~ /^\s+\);?\s*$/) ||
$data =~ /\(\s+\S/) {
print "Whitespace after '(' or before ')':\n";
print "$file:$.: $line";
--
2.7.3
--
libvir-list mailing list
libvir-list@redhat.com
https://www.redhat.com/mailman/listinfo/libvir-list
