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
Thu, 30 May 2013 13:20:04 +0200
changeset 52233 eb84dab7d4c1
parent 52232 a2d4ae3e04a2
child 52234 6ffcce211047
tuned;
src/HOL/Prolog/prolog.ML file | annotate | diff | comparison | revisions 
--- a/src/HOL/Prolog/prolog.ML	Thu May 30 13:07:23 2013 +0200
+++ b/src/HOL/Prolog/prolog.ML	Thu May 30 13:20:04 2013 +0200
@@ -59,8 +59,7 @@
 in map zero_var_indexes (at thm) end;
 
 val atomize_ss =
-  (Simplifier.global_context @{theory} empty_ss
-    |> Simplifier.set_mksimps (mksimps mksimps_pairs))
+  (empty_simpset @{context} |> Simplifier.set_mksimps (mksimps mksimps_pairs))
   addsimps [
         @{thm all_conj_distrib}, (* "(! x. P x & Q x) = ((! x. P x) & (! x. Q x))" *)
         @{thm imp_conjL} RS sym, (* "(D :- G1 :- G2) = (D :- G1 & G2)" *)
isabelle