diff options
author | Hieu Hoang <fishandfrolick@gmail.com> | 2012-05-11 18:07:44 +0400 |
---|---|---|
committer | Hieu Hoang <fishandfrolick@gmail.com> | 2012-05-11 18:07:44 +0400 |
commit | 9dfa7869138ff5df9f869eef7fdf90f652f67057 (patch) | |
tree | f5becac4166613bf560e1acbb7e4d391e6733f45 /regression-testing | |
parent | 1fa8674dc28d717b5023ef86fe719f573abdafdf (diff) |
extract regression test
Diffstat (limited to 'regression-testing')
-rwxr-xr-x | regression-testing/run-test-extract.perl | 8 | ||||
-rwxr-xr-x | regression-testing/run-test-suite.perl | 1 |
2 files changed, 4 insertions, 5 deletions
diff --git a/regression-testing/run-test-extract.perl b/regression-testing/run-test-extract.perl index 261541df3..cf64f3881 100755 --- a/regression-testing/run-test-extract.perl +++ b/regression-testing/run-test-extract.perl @@ -1,4 +1,4 @@ -#!/usr/bin/perl -w +#!/usr/bin/perl -w use strict; @@ -38,7 +38,7 @@ unless (defined $results_dir) `mkdir -p $results_dir`; -my $outPath = "$results_dir/pt.half"; +my $outPath = "$results_dir"; my $extractorArgs = `cat $test_dir/$test_name/args.txt`; $_ = $extractorArgs; @@ -48,12 +48,12 @@ $extractorArgs = $_; my $cmdMain = "$extractorExe $extractorArgs \n"; `$cmdMain`; -my $truthPath = "$test_dir/$test_name/truth/results.txt"; +my $truthPath = "$test_dir/$test_name/truth/"; if (-e $outPath) { - my $cmd = "diff $outPath $truthPath | wc -l"; + my $cmd = "diff $outPath/test.txt $truthPath | wc -l"; my $numDiff = `$cmd`; diff --git a/regression-testing/run-test-suite.perl b/regression-testing/run-test-suite.perl index d079d15d2..6e33a11d5 100755 --- a/regression-testing/run-test-suite.perl +++ b/regression-testing/run-test-suite.perl @@ -11,7 +11,6 @@ use Getopt::Long; ############################################################ my @tests = qw ( extract.phrase-based - extract.hierarchical score.phrase-based score.phrase-based-inv score.phrase-based-with-alignment |