Make sure output buffets are flushed before writing exit code

peterschrammel · peterschrammel · commit 96b4820e2f60 · 2019-03-29T22:24:41.000Z
This seems to work when calling bash again. Otherwise,
we can get something like:

This is half a liEXIT=123
diff --git a/regression/test.pl b/regression/test.pl
@@ -43,10 +43,7 @@ ($$$$$)
     }
   }
 
-  open my $FH, ">>$name/$output";
-  print $FH "EXIT=$exit_value\n";
-  print $FH "SIGNAL=$signal_num\n";
-  close $FH;
+  system("bash", "-c", "cd '$name' ; echo '\nEXIT=$exit_value\nSIGNAL=$signal_num\n' >> '$output'");
 
   if($signal_num == 2) {
     print "\nProgram under test interrupted; stopping\n";

Original file line number	Diff line number	Diff line change
`@@ -43,10 +43,7 @@ ($$$$$)`
`43`	`43`	`}`
`44`	`44`	`}`
`45`	`45`
`46`		`- open my $FH, ">>$name/$output";`
`47`		`- print $FH "EXIT=$exit_value\n";`
`48`		`- print $FH "SIGNAL=$signal_num\n";`
`49`		`- close $FH;`
	`46`	`+ system("bash", "-c", "cd '$name' ; echo '\nEXIT=$exit_value\nSIGNAL=$signal_num\n' >> '$output'");`
`50`	`47`
`51`	`48`	`if($signal_num == 2) {`
`52`	`49`	`print "\nProgram under test interrupted; stopping\n";`