diff options
Diffstat (limited to 'intf')
| -rw-r--r-- | intf/extend.mli | 2 | ||||
| -rw-r--r-- | intf/pattern.mli | 4 | ||||
| -rw-r--r-- | intf/tactypes.mli | 4 |
3 files changed, 5 insertions, 5 deletions
diff --git a/intf/extend.mli b/intf/extend.mli index 7ba332f709..99401d06f0 100644 --- a/intf/extend.mli +++ b/intf/extend.mli @@ -8,7 +8,7 @@ (** Entry keys for constr notations *) -type 'a entry = 'a Compat.GrammarMake(CLexer).entry +type 'a entry = 'a Grammar.GMake(CLexer).Entry.e type side = Left | Right diff --git a/intf/pattern.mli b/intf/pattern.mli index a32e7e4b94..48381cacdc 100644 --- a/intf/pattern.mli +++ b/intf/pattern.mli @@ -43,11 +43,11 @@ open Misctypes could be inferred. We also loose the ability of typing ltac variables before calling the right-hand-side of ltac matching clauses. *) -type constr_under_binders = Id.t list * constr +type constr_under_binders = Id.t list * EConstr.constr (** Types of substitutions with or w/o bound variables *) -type patvar_map = constr Id.Map.t +type patvar_map = EConstr.constr Id.Map.t type extended_patvar_map = constr_under_binders Id.Map.t (** {5 Patterns} *) diff --git a/intf/tactypes.mli b/intf/tactypes.mli index b96cb67df8..02cfc44e29 100644 --- a/intf/tactypes.mli +++ b/intf/tactypes.mli @@ -26,8 +26,8 @@ type glob_constr_pattern_and_expr = Id.Set.t * glob_constr_and_expr * constr_pat type 'a delayed_open = { delayed : 'r. Environ.env -> 'r Sigma.t -> ('a, 'r) Sigma.sigma } -type delayed_open_constr = Term.constr delayed_open -type delayed_open_constr_with_bindings = Term.constr with_bindings delayed_open +type delayed_open_constr = EConstr.constr delayed_open +type delayed_open_constr_with_bindings = EConstr.constr with_bindings delayed_open type intro_pattern = delayed_open_constr intro_pattern_expr located type intro_patterns = delayed_open_constr intro_pattern_expr located list |