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.
replaced warning by error_msg;
authorwenzelm
Thu, 18 Jun 1998 11:20:54 +0200
changeset 5048 2af6b01e7ab6
parent 5047 585fa380df1a
child 5049 bde086cfa597
replaced warning by error_msg;
src/Pure/Syntax/scan.ML file | annotate | diff | comparison | revisions 
--- a/src/Pure/Syntax/scan.ML	Thu Jun 18 10:52:34 1998 +0200
+++ b/src/Pure/Syntax/scan.ML	Thu Jun 18 11:20:54 1998 +0200
@@ -193,7 +193,7 @@
 
     fun drain_loop recover inp =
       drain_with (catch scanner) inp handle FAIL msg =>
-        (warning (if_none msg "Syntax error."); warning "Trying to recover ...";
+        (error_msg (if_none msg "Syntax error."); error_msg "Trying to recover ...";
           drain_loop recover (apfst snd (drain_with recover inp)));
 
     val ((ys, (state', xs')), src') =
isabelle