LocalTheory.pretty_consts;
authorwenzelm
Tue, 24 Jan 2006 00:43:27 +0100
changeset 18765 97911ffe9222
parent 18764 3f8bcf80dc18
child 18766 932750b85c5b
LocalTheory.pretty_consts;
src/Pure/Isar/constdefs.ML
--- a/src/Pure/Isar/constdefs.ML	Tue Jan 24 00:43:25 2006 +0100
+++ b/src/Pure/Isar/constdefs.ML	Tue Jan 24 00:43:27 2006 +0100
@@ -63,7 +63,7 @@
     val ctxt = ProofContext.init thy;
     val (structs, _) = prep_vars (map (fn (x, T) => (x, T, Structure)) raw_structs) ctxt;
     val (decls, thy') = fold_map (gen_constdef prep_vars prep_term prep_att structs) specs thy;
-  in Pretty.writeln (Specification.pretty_consts ctxt decls); thy' end;
+  in Pretty.writeln (LocalTheory.pretty_consts ctxt decls); thy' end;
 
 val add_constdefs = gen_constdefs ProofContext.read_vars_legacy
   ProofContext.read_term_legacy Attrib.attribute;