Mercurial Mercurial > repos > isabelle / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/HOL/Tools/Function/fun.ML
changeset 36547 2a9d0ec8c10d
parent 36523 a294e4ebe0a3
child 36960 01594f816e3a 
--- a/src/HOL/Tools/Function/fun.ML	Thu Apr 29 23:55:43 2010 +0200
+++ b/src/HOL/Tools/Function/fun.ML	Fri Apr 30 13:47:39 2010 +0200
@@ -151,7 +151,7 @@
     lthy
     |> add fixes statements config pat_completeness_auto |> snd
     |> Local_Theory.restore
-    |> prove_termination
+    |> prove_termination |> snd
   end
 
 val add_fun = gen_add_fun Function.add_function
isabelle