src/Pure/Build/export_theory.ML
changeset 80585 9c6cfac291f4
parent 80313 a828e47c867c
child 80590 505f97165f52
--- a/src/Pure/Build/export_theory.ML	Thu Jul 18 12:08:08 2024 +0200
+++ b/src/Pure/Build/export_theory.ML	Thu Jul 18 15:26:36 2024 +0200
@@ -310,7 +310,7 @@
         (prop, deps, proof) |>
           let
             open XML.Encode Term_XML.Encode;
-            val encode_proof = Proofterm.encode_standard_proof consts;
+            val encode_proof = Proofterm.encode_standard_proof thy;
           in triple encode_prop (list Thm_Name.encode) encode_proof end
       end;