Output.escape_malformed;
authorwenzelm
Wed, 11 Jul 2007 00:29:50 +0200
changeset 23728 8409a0cd5b04
parent 23727 39f8d1480d55
child 23729 d1ba656978c5
Output.escape_malformed;
src/Pure/General/symbol.ML
--- a/src/Pure/General/symbol.ML	Wed Jul 11 00:29:49 2007 +0200
+++ b/src/Pure/General/symbol.ML	Wed Jul 11 00:29:50 2007 +0200
@@ -115,8 +115,8 @@
 val malformed = "[[";
 val end_malformed = "]]";
 
-fun malformed_msg s =  (*Output.escape avoids looping errors*)
-  "Malformed symbolic character: " ^ quote (Output.escape s);
+fun malformed_msg s =
+  "Malformed symbolic character: " ^ quote (Output.escape_malformed s);
 
 
 (* ascii symbols *)