[project @ 1997-11-25 11:50:17 by simonm]

Don't try to generate stdout files if using -accept-output.  It didn't
work anyway: a call to pop had stomped on the variable containing the
filename before it was used, setting it to the empty string.  The call
to touch then failed with a syntax error.

This behaviour seems more useful: sometimes you really don't want to
check the stdout and/or stderr, so you just don't create the file.

diff --git a/glafp-utils/runstdtest/runstdtest.prl b/glafp-utils/runstdtest/runstdtest.prl
index 55860fd..cb9084b 100644 (file)
--- a/glafp-utils/runstdtest/runstdtest.prl
+++ b/glafp-utils/runstdtest/runstdtest.prl
@@ -117,12 +117,8 @@ arg: while ($_ = $ARGV[0]) {
 foreach $out_file ( @PgmStdoutFile ) {
     if ( ! -f $out_file ) {
         #$Status++;
-        pop(@PgmStdoutFile);
-       if ( $SaveTmpFile ) {
-           system("touch $out_file");
-       } else {
-           print STDERR "$Pgm: warning: expected-stdout file missing: $out_file\n";
-       }
+       print STDERR "$Pgm: warning: expected-stdout file missing: $out_file\n";
+       pop(@PgmStdoutFile);
     }
 }