Mercurial Mercurial > repos > isabelle / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | gz | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
tuned error message;
authorwenzelm
Thu, 11 Nov 2010 18:55:17 +0100
changeset 40480 d695d258dfbc
parent 40479 cc06f5528bb1
child 40481 da2c56aaaa68
tuned error message;
lib/scripts/run-polyml file | annotate | diff | comparison | revisions 
--- a/lib/scripts/run-polyml	Thu Nov 11 17:07:05 2010 +0100
+++ b/lib/scripts/run-polyml	Thu Nov 11 18:55:17 2010 +0100
@@ -47,7 +47,7 @@
   EXIT="fun exit 0 = (OS.Process.exit OS.Process.success): unit | exit _ = OS.Process.exit OS.Process.failure;"
 else
   check_file "$INFILE"
-  INIT="(Signal.signal (2, Signal.SIG_HANDLE (fn _ => Process.interruptConsoleProcesses ())); PolyML.SaveState.loadState \"$INFILE\" handle Fail msg => (TextIO.output (TextIO.stdErr, msg ^ \"\\n\"); OS.Process.exit OS.Process.failure));"
+  INIT="(Signal.signal (2, Signal.SIG_HANDLE (fn _ => Process.interruptConsoleProcesses ())); PolyML.SaveState.loadState \"$INFILE\" handle Fail msg => (TextIO.output (TextIO.stdErr, msg ^ \": $INFILE\\n\"); OS.Process.exit OS.Process.failure));"
   EXIT=""
 fi
 
@@ -78,3 +78,5 @@
 [ -n "$OUTFILE" -a -f "$OUTFILE" -a -n "$NOWRITE" ] && chmod -w "$OUTFILE"
 
 exit "$RC"
+
+#:wrap=soft:maxLineLen=100:
isabelle