tuned formatting of error message
authorChristian Sternagel
Fri, 02 Aug 2013 12:11:02 +0900
changeset 52892 9ce4d52c9176
parent 52891 b8dede3a4f1d
child 52893 aa2afbafd983
tuned formatting of error message
src/Tools/adhoc_overloading.ML
--- a/src/Tools/adhoc_overloading.ML	Wed Aug 07 14:47:50 2013 +0200
+++ b/src/Tools/adhoc_overloading.ML	Fri Aug 02 12:11:02 2013 +0900
@@ -41,7 +41,7 @@
       "in term " ::
       quote (Syntax.string_of_term ctxt' t) ::
       (if null instances then "no instances" else "multiple instances:") ::
-    map (Syntax.string_of_term ctxt') instances)
+    map (Markup.markup Markup.item o Syntax.string_of_term ctxt') instances)
     |> error
   end;