ProofContext.export_standard;
authorwenzelm
Wed, 25 Jan 2006 00:21:42 +0100
changeset 18784 2d93559db27e
parent 18783 628e57610536
child 18785 5ae1f1c1b764
ProofContext.export_standard;
src/Pure/Isar/proof.ML
--- a/src/Pure/Isar/proof.ML	Wed Jan 25 00:21:41 2006 +0100
+++ b/src/Pure/Isar/proof.ML	Wed Jan 25 00:21:42 2006 +0100
@@ -858,7 +858,7 @@
     fun after_qed' results =
       (case target of NONE => I
       | SOME prfx => store_results (NameSpace.base prfx)
-          (map (map (ProofContext.export ctxt thy_ctxt
+          (map (map (ProofContext.export_standard ctxt thy_ctxt
             #> Drule.strip_shyps_warning)) results))
       #> after_qed results;
   in