--- a/src/Pure/install_pp.ML Thu Feb 03 13:55:20 1994 +0100
+++ b/src/Pure/install_pp.ML Thu Feb 03 13:55:42 1994 +0100
@@ -1,17 +1,19 @@
(* Title: Pure/install_pp.ML
ID: $Id$
-Set up automatic toplevel printing
+Set up automatic toplevel printing.
*)
-install_pp (make_pp ["Thm", "thm"] pprint_thm);
-install_pp (make_pp ["Thm", "theory"] pprint_theory);
-install_pp (make_pp ["Thm", "cterm"] pprint_cterm);
-install_pp (make_pp ["Thm", "ctyp"] pprint_ctyp);
-install_pp (make_pp ["Sign", "sg"] pprint_sg);
-install_pp (make_pp ["Syntax", "ast"] Syntax.pprint_ast);
+install_pp (make_pp ["Thm", "thm"] pprint_thm);
+install_pp (make_pp ["Thm", "theory"] pprint_theory);
+install_pp (make_pp ["Thm", "cterm"] pprint_cterm);
+install_pp (make_pp ["Thm", "ctyp"] pprint_ctyp);
+install_pp (make_pp ["Sign", "sg"] Sign.pprint_sg);
+install_pp (make_pp ["Syntax", "ast"] Syntax.pprint_ast);
+install_pp (make_pp ["typ"] Syntax.simple_pprint_typ);
(*
install_pp (make_pp ["term"] pprint_term);
install_pp (make_pp ["typ"] pprint_typ);
*)
+