From: sof <unknown>
Date: Fri, 20 Jun 1997 09:07:57 +0000 (+0000)
Subject: [project @ 1997-06-20 09:07:57 by sof]
X-Git-Tag: Approximately_1000_patches_recorded~297
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=2dd8be597a17c01f7af21841ebba3b35d4344a00;p=ghc-hetmet.git

[project @ 1997-06-20 09:07:57 by sof]
documented -accept-output
---

diff --git a/glafp-utils/runstdtest/runstdtest.prl b/glafp-utils/runstdtest/runstdtest.prl
index f66943e..34f7c1d 100644
--- a/glafp-utils/runstdtest/runstdtest.prl
+++ b/glafp-utils/runstdtest/runstdtest.prl
@@ -34,6 +34,11 @@
 # 
 # (This is supposed to be a "prettier" replacement for runstdtest.)
 #
+#	Flags
+#	~~~~~
+#	-accept-output	replace output files with the ones actually generated by running
+#			the program
+#
 ($Pgm = $0) =~ s|.*/||;
 $Verbose = 0;
 $SaveTmpFile = 0;
@@ -213,7 +218,7 @@ $TimeCmd /bin/sh -c \'$ToRun $TimingMagic @PgmArgs < $PgmStdinFile 1> $TmpPrefix
 progexit=\$?
 if [ \$progexit -ne $PgmExitStatus ]; then
     echo $ToRun @PgmArgs \\< $PgmStdinFile
-    echo expected exit status $PgmExitStatus not seen \\; got \$progexit
+    echo "****" expected exit status $PgmExitStatus not seen \\; got \$progexit
     myexit=1
 else
     $PostScriptLines