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.
tuned;
authorwenzelm
Tue, 15 Jan 2013 16:34:19 +0100
changeset 50901 f4a6c360af35
parent 50900 6d80709ab862
child 50902 cb2b940e2fdf
tuned;
src/HOL/Tools/Sledgehammer/sledgehammer_shrink.ML file | annotate | diff | comparison | revisions 
--- a/src/HOL/Tools/Sledgehammer/sledgehammer_shrink.ML	Tue Jan 15 12:45:19 2013 +0100
+++ b/src/HOL/Tools/Sledgehammer/sledgehammer_shrink.ML	Tue Jan 15 16:34:19 2013 +0100
@@ -68,8 +68,8 @@
       val metis_fail = ref false
     in
       fun handle_metis_fail try_metis () =
-        try_metis () handle exp =>
-          (if Exn.is_interrupt exp orelse debug then reraise exp 
+        try_metis () handle exn =>
+          (if Exn.is_interrupt exn orelse debug then reraise exn
            else metis_fail := true; SOME Time.zeroTime)
       fun get_time lazy_time =
         if !metis_fail then SOME Time.zeroTime else Lazy.force lazy_time
isabelle