diff options
author | Jeroen Vermeulen <jtv@precisiontranslationtools.com> | 2015-05-17 16:04:04 +0300 |
---|---|---|
committer | Jeroen Vermeulen <jtv@precisiontranslationtools.com> | 2015-05-17 16:04:04 +0300 |
commit | a25193cc5da6a271c4676e843db80ee19221822a (patch) | |
tree | db764696f2e663016a9ab87a95846501c585b4aa /regression-testing | |
parent | 108da163745699e724f581c3d33b1e8a5e26a9e9 (diff) |
Fix a lot of lint, mostly trailing whitespace.
This is lint reported by the new lint-checking functionality in beautify.py.
(We can change to a different lint checker if we have a better one, but it
would probably still flag these same problems.)
Lint checking can help a lot, but only if we get the lint under control.
Diffstat (limited to 'regression-testing')
-rwxr-xr-x | regression-testing/run-test-detokenizer.perl | 4 | ||||
-rwxr-xr-x | regression-testing/run-test-extract.perl | 12 | ||||
-rwxr-xr-x | regression-testing/run-test-misc.perl | 12 | ||||
-rwxr-xr-x | regression-testing/run-test-scorer.perl | 10 |
4 files changed, 19 insertions, 19 deletions
diff --git a/regression-testing/run-test-detokenizer.perl b/regression-testing/run-test-detokenizer.perl index e297b90be..9e5888ed0 100755 --- a/regression-testing/run-test-detokenizer.perl +++ b/regression-testing/run-test-detokenizer.perl @@ -166,12 +166,12 @@ sub runDetokenizerTest { unless (mkdir($testOutputDir)) { return fail($testCase->getName().": Failed to create output directory ".$testOutputDir." [".$!."]"); } - + open TOK, ">".$tokenizedFile; binmode TOK, ":utf8"; print TOK $testCase->getTokenizedText(); close TOK; - + open TRUTH, ">".$expectedFile; binmode TRUTH, ":utf8"; print TRUTH $testCase->getRightAnswer(); diff --git a/regression-testing/run-test-extract.perl b/regression-testing/run-test-extract.perl index bc0dc0cf9..e03502434 100755 --- a/regression-testing/run-test-extract.perl +++ b/regression-testing/run-test-extract.perl @@ -1,10 +1,10 @@ -#!/usr/bin/perl -w +#!/usr/bin/perl -w use strict; BEGIN { -use Cwd qw/ abs_path /; -use File::Basename; +use Cwd qw/ abs_path /; +use File::Basename; my $script_dir = dirname(abs_path($0)); print STDERR "script_dir=$script_dir\n"; push @INC, $script_dir; @@ -30,10 +30,10 @@ GetOptions("extractor=s" => \$extractorExe, ) or exit 1; # output dir -unless (defined $results_dir) -{ +unless (defined $results_dir) +{ my $ts = get_timestamp($extractorExe); - $results_dir = "$data_dir/results/$test_name/$ts"; + $results_dir = "$data_dir/results/$test_name/$ts"; } `mkdir -p $results_dir`; diff --git a/regression-testing/run-test-misc.perl b/regression-testing/run-test-misc.perl index da79c94e8..9b65115c1 100755 --- a/regression-testing/run-test-misc.perl +++ b/regression-testing/run-test-misc.perl @@ -1,10 +1,10 @@ -#!/usr/bin/perl -w +#!/usr/bin/perl -w use strict; BEGIN { -use Cwd qw/ abs_path cwd /; -use File::Basename; +use Cwd qw/ abs_path cwd /; +use File::Basename; my $script_dir = dirname(abs_path($0)); print STDERR "script_dir=$script_dir\n"; push @INC, $script_dir; @@ -27,10 +27,10 @@ GetOptions("moses-root=s" => \$mosesRoot, ) or exit 1; # output dir -unless (defined $results_dir) -{ +unless (defined $results_dir) +{ my $ts = get_timestamp($mosesRoot); - $results_dir = "$data_dir/results/$test_name/$ts"; + $results_dir = "$data_dir/results/$test_name/$ts"; } `mkdir -p $results_dir`; diff --git a/regression-testing/run-test-scorer.perl b/regression-testing/run-test-scorer.perl index 6bd95ad55..9f4f15d9e 100755 --- a/regression-testing/run-test-scorer.perl +++ b/regression-testing/run-test-scorer.perl @@ -3,8 +3,8 @@ use strict; BEGIN { -use Cwd qw/ abs_path /; -use File::Basename; +use Cwd qw/ abs_path /; +use File::Basename; my $script_dir = dirname(abs_path($0)); print STDERR "script_dir=$script_dir\n"; push @INC, $script_dir; @@ -30,10 +30,10 @@ GetOptions("scorer=s" => \$scoreExe, ) or exit 1; # output dir -unless (defined $results_dir) -{ +unless (defined $results_dir) +{ my $ts = get_timestamp($scoreExe); - $results_dir = "$data_dir/results/$test_name/$ts"; + $results_dir = "$data_dir/results/$test_name/$ts"; } `mkdir -p $results_dir`; |