src/Pure/Isar/runtime.ML
changeset 49647 21ae8500d261
parent 48992 0518bf89c777
child 50201 c26369c9eda6
--- a/src/Pure/Isar/runtime.ML	Fri Sep 28 15:45:03 2012 +0200
+++ b/src/Pure/Isar/runtime.ML	Fri Sep 28 16:51:58 2012 +0200
@@ -76,6 +76,7 @@
             | TOPLEVEL_ERROR => "Error"
             | ERROR msg => msg
             | Fail msg => raised exn "Fail" [msg]
+            | Output.TRACING_LIMIT n => "Tracing limit exceeded: " ^ string_of_int n
             | THEORY (msg, thys) =>
                 raised exn "THEORY" (msg :: map Context.str_of_thy thys)
             | Ast.AST (msg, asts) =>