From a7a3a84b9c1de53cd8076521fe5db31af73088ca Mon Sep 17 00:00:00 2001 From: herbelin Date: Tue, 19 Jun 2012 10:35:06 +0000 Subject: Fixing some inconsistencies of constr printer wrt constr parser git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15447 85f007b7-540e-0410-9357-904b9bb8a0f7 --- printing/ppconstr.mli | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'printing/ppconstr.mli') diff --git a/printing/ppconstr.mli b/printing/ppconstr.mli index 6453c26f4..304e5958e 100644 --- a/printing/ppconstr.mli +++ b/printing/ppconstr.mli @@ -81,8 +81,9 @@ val default_term_pr : term_pr (** The modular constr printer. [modular_constr_pr pr s p t] prints the head of the term [t] and calls [pr] on its subterms. - [s] is typically {!Pp.mt} and [p] is [lsimple] for "constr" printers and [ltop] - for "lconstr" printers (spiwack: we might need more specification here). + [s] is typically {!Pp.mt} and [p] is [lsimpleconstr] for "constr" printers + and [ltop] for "lconstr" printers (spiwack: we might need more + specification here). We can make a new modular constr printer by overriding certain branches, for instance if we want to build a printer which prints "Prop" as "Omega" instead we can proceed as follows: @@ -93,7 +94,7 @@ val default_term_pr : term_pr taking its fixpoint. *) type precedence -val lsimple : precedence +val lsimpleconstr : precedence val ltop : precedence val modular_constr_pr : ((unit->std_ppcmds) -> precedence -> constr_expr -> std_ppcmds) -> -- cgit v1.2.3