src/Pure/install_pp.ML
author lcp
Tue Jul 25 17:03:16 1995 +0200 (1995-07-25 ago)
changeset 1194 563ecd14c1d8
parent 619 a0342b27b38e
child 1528 608dd813b437
permissions -rw-r--r--
Added weak_eq_thm and forall_intr_vars (thanks to Mark Staples)
wenzelm@19
     1
(*  Title:      Pure/install_pp.ML
clasohm@0
     2
    ID:         $Id$
clasohm@0
     3
wenzelm@619
     4
Set up automatic toplevel pretty printing.
clasohm@0
     5
*)
clasohm@0
     6
wenzelm@619
     7
fun init_pps () =
wenzelm@619
     8
  use_string
wenzelm@619
     9
   ["install_pp (make_pp [\"Thm\", \"thm\"] pprint_thm);",
wenzelm@619
    10
    "install_pp (make_pp [\"Thm\", \"theory\"] pprint_theory);",
wenzelm@619
    11
    "install_pp (make_pp [\"Thm\", \"cterm\"] pprint_cterm);",
wenzelm@619
    12
    "install_pp (make_pp [\"Thm\", \"ctyp\"] pprint_ctyp);",
wenzelm@619
    13
    "install_pp (make_pp [\"Sign\", \"sg\"] Sign.pprint_sg);",
wenzelm@619
    14
    "install_pp (make_pp [\"Syntax\", \"ast\"] Syntax.pprint_ast);",
wenzelm@619
    15
    "install_pp (make_pp [\"typ\"] Syntax.simple_pprint_typ);"];
clasohm@0
    16
wenzelm@619
    17
init_pps ();
wenzelm@254
    18