From 8c7004a016a6e4c89292dc4daeb6cd96fc7e47f0 Mon Sep 17 00:00:00 2001 From: "Luis R. Rodriguez" Date: Fri, 18 Sep 2009 12:49:26 -0700 Subject: [PATCH] --- yaml --- r: 165571 b: refs/heads/master c: f9d490ab374236a115440c771ecf0fb2890eb929 h: refs/heads/master i: 165569: a9bc40149fa4d97fca6da335874bfd8fad8a1a53 165567: 872d2eb53b0a65dc695bb2f0dd56c2d7c14ab9a1 v: v3 --- [refs] | 2 +- trunk/scripts/checkincludes.pl | 9 +++++++++ 2 files changed, 10 insertions(+), 1 deletion(-) diff --git a/[refs] b/[refs] index a8b847dd61ed..ace1bcf2508e 100644 --- a/[refs] +++ b/[refs] @@ -1,2 +1,2 @@ --- -refs/heads/master: d9a7a2bd07ed3b838d95559d547061afcf3e45f6 +refs/heads/master: f9d490ab374236a115440c771ecf0fb2890eb929 diff --git a/trunk/scripts/checkincludes.pl b/trunk/scripts/checkincludes.pl index 32ebff659fcc..4bff13985ebd 100755 --- a/trunk/scripts/checkincludes.pl +++ b/trunk/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";