diff options
| author | Maxime Dénès | 2017-08-29 14:41:36 +0200 |
|---|---|---|
| committer | Maxime Dénès | 2017-08-29 14:41:36 +0200 |
| commit | 9326b0466cc04175436dc57cf0283c151b587e54 (patch) | |
| tree | efa25b429b80403105431c8ea21bae475dffea8e /API/API.mli | |
| parent | 57af4b4112dd0bc54badf0faebb373ef70ea2c1a (diff) | |
| parent | 414a30432119bcc878793b33144f671403132f7a (diff) | |
Merge PR #916: Fixing notation bug 5608 involving { } and a slight restructuration
Diffstat (limited to 'API/API.mli')
| -rw-r--r-- | API/API.mli | 16 |
1 files changed, 5 insertions, 11 deletions
diff --git a/API/API.mli b/API/API.mli index 1262899c5f..e7a434634c 100644 --- a/API/API.mli +++ b/API/API.mli @@ -3184,6 +3184,10 @@ sig | NCast of notation_constr * notation_constr Misctypes.cast_type type interpretation = (Names.Id.t * (subscopes * notation_var_instance_type)) list * notation_constr + type precedence = int + type parenRelation = + | L | E | Any | Prec of precedence + type tolerability = precedence * parenRelation end module Tactypes : @@ -4179,16 +4183,6 @@ sig 'a -> Notation_term.notation_constr -> Glob_term.glob_constr end -module Ppextend : -sig - - type precedence = int - type parenRelation = - | L | E | Any | Prec of precedence - type tolerability = precedence * parenRelation - -end - module Notation : sig type cases_pattern_status = bool @@ -4880,7 +4874,7 @@ sig val pr_with_comments : ?loc:Loc.t -> Pp.t -> Pp.t val pr_lident : Names.Id.t Loc.located -> Pp.t val pr_lname : Names.Name.t Loc.located -> Pp.t - val prec_less : int -> int * Ppextend.parenRelation -> bool + val prec_less : int -> int * Notation_term.parenRelation -> bool val pr_constr_expr : Constrexpr.constr_expr -> Pp.t val pr_lconstr_expr : Constrexpr.constr_expr -> Pp.t val pr_constr_pattern_expr : Constrexpr.constr_pattern_expr -> Pp.t |