--- 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);