diff options
| author | msozeau | 2008-02-08 16:51:00 +0000 |
|---|---|---|
| committer | msozeau | 2008-02-08 16:51:00 +0000 |
| commit | a1a7cb88e85c33204dfb022cb5b9eb5c435366b1 (patch) | |
| tree | 464f986148704d91c10c2be95898c062828f5b28 /dev/top_printers.ml | |
| parent | 09580d08476cfa3f50b8c9a347293525c9f022fc (diff) | |
Add printer for Pp.std_ppcmds...
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10531 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'dev/top_printers.ml')
| -rw-r--r-- | dev/top_printers.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/dev/top_printers.ml b/dev/top_printers.ml index 27577c79cf..07dda42b85 100644 --- a/dev/top_printers.ml +++ b/dev/top_printers.ml @@ -34,6 +34,9 @@ let _ = Constrextern.print_evar_arguments := true let _ = set_bool_option_value (SecondaryTable ("Printing","Matching")) false let _ = Detyping.set_detype_anonymous (fun _ _ -> raise Not_found) +(* std_ppcmds *) +let pppp x = pp x + (* name printers *) let ppid id = pp (pr_id id) let pplab l = pp (pr_lab l) |