src/Tools/try.ML
changeset 58848 fd0c85d7da38
parent 58843 521cea5fa777
child 58892 20aa19ecf2cc
--- a/src/Tools/try.ML	Fri Oct 31 16:56:23 2014 +0100
+++ b/src/Tools/try.ML	Fri Oct 31 17:08:54 2014 +0100
@@ -91,17 +91,6 @@
                            | _ => NONE)
   |> the_default state
 
-val _ = Context.>> (Specification.add_theorem_hook (fn interact => fn state =>
-  let
-    val auto_time_limit = Options.default_real @{system_option auto_time_limit}
-  in
-    if interact andalso not (!Toplevel.quiet) andalso auto_time_limit > 0.0 then
-      TimeLimit.timeLimit (seconds auto_time_limit) auto_try state
-      handle TimeLimit.TimeOut => state
-    else
-      state
-  end))
-
 
 (* asynchronous print function (PIDE) *)