Algorithmique Numérique Distribuée Public GIT Repository
 author Arnaud Giersch Tue, 27 May 2014 13:00:02 +0000 (15:00 +0200) committer Arnaud Giersch Tue, 27 May 2014 13:00:02 +0000 (15:00 +0200)

index 0b819b1..ec72da1 100755 (executable)
@@ -373,10 +373,14 @@ sub parse_out {
# Check the result of execution
###
my \$diff;
-  if (!defined(\$cmd{'output ignore'})){
+  if (defined(\$cmd{'output display'})){
+    print "[Tesh/INFO] Here is the (ignored) command output:\n";
+    map { print "||\$_\n" } \@got;
+  }
+  elsif (!defined(\$cmd{'output ignore'})){
\$diff = build_diff(\@{\$cmd{'out'}}, \@got);
}else{
-  print "(ignoring the output of <\$cmd{'file'}:\$cmd{'line'}> as requested)\n"
+    print "(ignoring the output of <\$cmd{'file'}:\$cmd{'line'}> as requested)\n"
}
if (length \$diff) {
print "Output of <\$cmd{'file'}:\$cmd{'line'}> mismatch:\n";
@@ -522,6 +526,13 @@ LINE: while (not \$finished and not \$error) {
}
\$cmd{'output ignore'} = 1;
}
+  elsif(\$line =~ /^!\s*output display/){    #output display
+    if (defined(\$cmd{'cmd'})) {
+      exec_cmd(\%cmd);
+      %cmd = ();
+    }
+    \$cmd{'output display'} = 1;
+  }
elsif(\$line =~ /^!\s*expect signal (\w*)/) {#expect signal SIGABRT
if (defined(\$cmd{'cmd'})) {
exec_cmd(\%cmd);