summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorTed Kremenek <kremenek@apple.com>2012-05-22 00:52:49 +0000
committerTed Kremenek <kremenek@apple.com>2012-05-22 00:52:49 +0000
commitc53ed2e15855a2c874797a2f5856e613db48dac6 (patch)
tree5630eae08d8e61183d1fe5fe6a45776230fffd2b
parent94442980c08049a7867d0aa2f0bf79cf751083fe (diff)
downloadbcm5719-llvm-c53ed2e15855a2c874797a2f5856e613db48dac6.tar.gz
bcm5719-llvm-c53ed2e15855a2c874797a2f5856e613db48dac6.zip
Use Perl prototypes instead of shift.
llvm-svn: 157228
-rwxr-xr-xclang/utils/analyzer/reducer.pl6
1 files changed, 3 insertions, 3 deletions
diff --git a/clang/utils/analyzer/reducer.pl b/clang/utils/analyzer/reducer.pl
index f2dac1fc10e..095d501d0a9 100755
--- a/clang/utils/analyzer/reducer.pl
+++ b/clang/utils/analyzer/reducer.pl
@@ -24,7 +24,7 @@ my $reduceOut = "$dir/reduceOut";
my $command;
if (scalar(@ARGV) > 0) { $command = \@ARGV; }
else {
- my $compiler = "/Users/kremenek/llvm-cmake-release/bin/clang";
+ my $compiler = "clang";
$command = [$compiler, "-fsyntax-only", "-Wfatal-errors", "-Wno-deprecated-declarations", "-Wimplicit-function-declaration"];
}
push @$command, $srcFile;
@@ -49,8 +49,8 @@ close(OUT);
`chmod +x $scriptFile`;
print "$prog: starting reduction\n";
-sub multidelta {
- my $level = shift @_;
+sub multidelta($) {
+ my ($level) = @_;
system("multidelta -level=$level $scriptFile $srcFile");
}
OpenPOWER on IntegriCloud