X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/4716eb134de74f09bda227c6f3bdea71924acc8c..40332cc6ef577eeec81b14a84b1b3ebccf3f7de7:/tools/tesh/tesh.pl diff --git a/tools/tesh/tesh.pl b/tools/tesh/tesh.pl index 739b37ed35..cb4c46f4e2 100755 --- a/tools/tesh/tesh.pl +++ b/tools/tesh/tesh.pl @@ -177,7 +177,7 @@ by the lexicographical sort. The solution is to prefix each line of your output with temporal information so that lines can be grouped by timestamps. The -lexicographical sort then only applies to lines that occured at the +lexicographical sort then only applies to lines that occurred at the same timestamp. Here is a SimGrid example: # Sort only lines depending on the first 19 chars @@ -373,8 +373,7 @@ sub exec_cmd { my @cmdline; if(defined $ENV{VALGRIND_COMMAND}) { push @cmdline, $ENV{VALGRIND_COMMAND}; - my $noquotes = substr $ENV{VALGRIND_OPTIONS}, 1, -1; - push @cmdline, split(" ", $noquotes); + push @cmdline, split(" ", $ENV{VALGRIND_OPTIONS}); if($cmd{'timeout'} ne 'no'){ $cmd{'timeout'}=$cmd{'timeout'}*20 } @@ -404,7 +403,7 @@ sub analyze_result { eval { finish( $cmd{'job'} ); }; - if ($@) { # deal with the errors that occured in the child process + if ($@) { # deal with the errors that occurred in the child process if ($@ =~ /timeout/) { $cmd{'job'}->kill_kill; $cmd{'timeouted'} = 1;