adjusted
authorhaftmann
Mon, 20 Sep 2010 09:19:22 +0200
changeset 39540 49c319fff40c
parent 39539 90a74f43174d
child 39541 6605c1e87c7f
child 39549 346f6d79cba6
child 39552 d154f988c247
adjusted
doc-src/more_antiquote.ML
--- a/doc-src/more_antiquote.ML	Mon Sep 20 09:19:17 2010 +0200
+++ b/doc-src/more_antiquote.ML	Mon Sep 20 09:19:22 2010 +0200
@@ -29,7 +29,7 @@
   let
     val thy = ProofContext.theory_of ctxt;
     val const = Code.check_const thy raw_const;
-    val (_, eqngr) = Code_Preproc.obtain thy [const] [];
+    val (_, eqngr) = Code_Preproc.obtain true thy [const] [];
     fun holize thm = @{thm meta_eq_to_obj_eq} OF [thm];
     val thms = Code_Preproc.cert eqngr const
       |> Code.equations_of_cert thy