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/lexicographic_order.ML
changeset 39125 f45d332a90e3
parent 36521 73ed9f18fdd3
child 39926 4b3b384d3de3 
--- a/src/HOL/Tools/Function/lexicographic_order.ML	Fri Sep 03 20:39:38 2010 +0200
+++ b/src/HOL/Tools/Function/lexicographic_order.ML	Fri Sep 03 21:13:53 2010 +0200
@@ -135,7 +135,8 @@
 (** Error reporting **)
 
 fun pr_goals ctxt st =
-  Goal_Display.pretty_goals ctxt {total = true, main = false, maxgoals = Thm.nprems_of st} st
+  Goal_Display.pretty_goals
+    (Config.put Goal_Display.goals_limit (Thm.nprems_of st) ctxt) st
   |> Pretty.chunks
   |> Pretty.string_of
isabelle