From f0bb6dbac03b50177a433727e31a5b5b3ee80c17 Mon Sep 17 00:00:00 2001 From: Chris Wilson Date: Sat, 3 Nov 2007 19:41:21 +0000 Subject: Keep each test's log in a separate file for later review. --- runtest.pl.in | 13 ++++++++----- 1 file changed, 8 insertions(+), 5 deletions(-) (limited to 'runtest.pl.in') diff --git a/runtest.pl.in b/runtest.pl.in index 01003c06..0d4381a6 100755 --- a/runtest.pl.in +++ b/runtest.pl.in @@ -86,13 +86,15 @@ sub runtest $exit_code = 2; return; } + + my $logfile = "test-$t.log"; # run it my $test_res = system("cd $test_mode/test/$t ; ./t 2>&1 " . - "| tee ../../../temp.runtest"); + "| tee ../../../$logfile"); # open test results - if(open RESULTS,'temp.runtest') + if(open RESULTS, $logfile) { my $last; while() @@ -102,7 +104,7 @@ sub runtest close RESULTS; chomp $last; - push @results,"$t: $last"; + push @results, "$t: $last"; if ($last ne "PASSED") { @@ -111,10 +113,11 @@ sub runtest } else { - push @results,"$t: output not found"; + push @results, + "$t: failed to open test log file: $logfile: $!"; } # delete test results - # unlink 'temp.runtest'; + # unlink $logfile; } -- cgit v1.2.3