Mercurial Mercurial > repos > isabelle / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/Pure/General/scan.ML
changeset 18683 a8f9c192f6d1
parent 16803 014090d1e64b
child 19291 798192b86c41 
--- a/src/Pure/General/scan.ML	Sat Jan 14 17:14:15 2006 +0100
+++ b/src/Pure/General/scan.ML	Sat Jan 14 17:14:16 2006 +0100
@@ -243,7 +243,7 @@
 fun force scan xs = scan xs handle MORE _ => raise FAIL NONE;
 fun prompt str scan xs = scan xs handle MORE NONE => raise MORE (SOME str);
 fun catch scan xs = scan xs handle ABORT msg => raise FAIL (SOME msg);
-fun error scan xs = scan xs handle ABORT msg => Output.error msg;
+fun error scan xs = scan xs handle ABORT msg => Library.error msg;
 
 
 (* finite scans *)
@@ -284,7 +284,7 @@
 
     fun drain_loop recover inp =
       drain_with (catch scanner) inp handle FAIL msg =>
-        (error_msg (if_none msg "Syntax error."); drain_with recover inp);
+        (Output.error_msg (if_none msg "Syntax error."); drain_with recover inp);
 
     val ((ys, (state', xs')), src') =
       (case (get def_prmpt src, opt_recover) of
isabelle