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.
Facts.add_local;
authorwenzelm
Mon, 17 Mar 2008 20:51:23 +0100
changeset 26309 fb52fe23acc4
parent 26308 73d68876ba46
child 26310 f8a7fac36e13
Facts.add_local;
src/Pure/Isar/proof_context.ML file | annotate | diff | comparison | revisions 
--- a/src/Pure/Isar/proof_context.ML	Mon Mar 17 20:51:16 2008 +0100
+++ b/src/Pure/Isar/proof_context.ML	Mon Mar 17 20:51:23 2008 +0100
@@ -838,7 +838,7 @@
 
 fun update_thms _ (bname, NONE) ctxt = ctxt |> map_facts (Facts.del (full_name ctxt bname))
   | update_thms do_props (bname, SOME ths) ctxt = ctxt |> map_facts
-      (Facts.add do_props (naming_of ctxt) (full_name ctxt bname, ths));
+      (Facts.add_local do_props (naming_of ctxt) (full_name ctxt bname, ths));
 
 fun put_thms do_props thms ctxt =
   ctxt |> map_naming (K local_naming) |> update_thms do_props thms |> restore_naming ctxt;
isabelle