diff --git a/scripts/checkincludes.pl b/scripts/checkincludes.pl index 32ebff659fccd2677782560d9fcb70c3a5930536..4bff13985ebdc7e56715b098daca17cb08463d24 100755 --- a/scripts/checkincludes.pl +++ b/scripts/checkincludes.pl @@ -3,6 +3,15 @@ # checkincludes: Find files included more than once in (other) files. # Copyright abandoned, 2000, Niels Kristian Bech Jensen . +sub usage { + print "Usage: checkincludes.pl \n"; + exit 1; +} + +if ($#ARGV < 0) { + usage(); +} + foreach $file (@ARGV) { open(FILE, $file) or die "Cannot open $file: $!.\n";