diff options
| author | herbelin | 2005-02-18 20:40:58 +0000 |
|---|---|---|
| committer | herbelin | 2005-02-18 20:40:58 +0000 |
| commit | e82afc13a01cb5e370545ee379d727df1c65d6c2 (patch) | |
| tree | aa5c8044216a4911402339f20dd0f0211a146d02 /dev | |
| parent | 29a737745a3df0f93aafdaf34a1d3e86bf75570b (diff) | |
Ajout constant printer
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6735 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'dev')
| -rw-r--r-- | dev/base_include | 1 | ||||
| -rw-r--r-- | dev/db | 1 | ||||
| -rw-r--r-- | dev/top_printers.ml | 1 |
3 files changed, 3 insertions, 0 deletions
diff --git a/dev/base_include b/dev/base_include index 1d2a55ef18..5aa5537849 100644 --- a/dev/base_include +++ b/dev/base_include @@ -26,6 +26,7 @@ #install_printer (* section_path *) prsp;; #install_printer (* qualid *) prqualid;; #install_printer (* kernel_name *) prkn;; +#install_printer (* constant *) prcon;; #install_printer (* constr *) print_pure_constr;; #install_printer (* patch *) ppripos;; #install_printer (* values *) ppvalues;; @@ -8,6 +8,7 @@ install_printer Top_printers.prmbid install_printer Top_printers.prdir install_printer Top_printers.prmp install_printer Top_printers.prkn +install_printer Top_printers.prcon install_printer Top_printers.prsp install_printer Top_printers.prqualid install_printer Top_printers.prast diff --git a/dev/top_printers.ml b/dev/top_printers.ml index cef2ab9798..05059bd1ba 100644 --- a/dev/top_printers.ml +++ b/dev/top_printers.ml @@ -36,6 +36,7 @@ let prmsid msid = pp (str (debug_string_of_msid msid)) let prmbid mbid = pp (str (debug_string_of_mbid mbid)) let prdir dir = pp (pr_dirpath dir) let prmp mp = pp(str (string_of_mp mp)) +let prcon con = pp(pr_con con) let prkn kn = pp(pr_kn kn) let prsp sp = pp(pr_sp sp) let prqualid qid = pp(pr_qualid qid) |