print_syntax: include local version;
authorwenzelm
Tue, 06 Nov 2001 19:26:52 +0100
changeset 12069 87fecdd74030
parent 12068 469f372d63db
child 12070 c72fe1edc9e7
print_syntax: include local version;
src/Pure/Isar/isar_cmd.ML
--- a/src/Pure/Isar/isar_cmd.ML	Tue Nov 06 19:26:32 2001 +0100
+++ b/src/Pure/Isar/isar_cmd.ML	Tue Nov 06 19:26:52 2001 +0100
@@ -183,7 +183,8 @@
   Toplevel.keep (PureThy.print_theory o Toplevel.theory_of);
 
 val print_syntax = Toplevel.unknown_theory o
-  Toplevel.keep (Display.print_syntax o Toplevel.theory_of);
+  Toplevel.keep (Display.print_syntax o Toplevel.theory_of) o
+  Toplevel.keep (ProofContext.print_syntax o Proof.context_of o Toplevel.proof_of);
 
 val print_theorems = Toplevel.unknown_theory o
   Toplevel.keep (PureThy.print_theorems o Toplevel.theory_of);