checksrc: exit error code if warnings or errors

lib/checksrc.pl

@@ -5,11 +5,21 @@ my $file=$ARGV[0];
 my $max_column = 79;
 my $indent = 2;
 
+my $warnings;
+my $errors;
+
 sub checkwarn {
     my ($num, $col, $file, $line, $msg, $error) = @_;
 
     my $w=$error?"error":"warning";
 
+    if($w) {
+        $warnings++;
+    }
+    else {
+        $errors++;
+    }
+
     $col++;
     print "$file:$num:$col: $w: $msg\n";
     print " $line\n";
@@ -116,3 +126,7 @@ if(!$copyright) {
 }
 
 close(R);
+
+if($errors || $warnings) {
+    exit 5; # return failure
+}