diff options
Diffstat (limited to 'intf')
| -rw-r--r-- | intf/constrexpr.mli | 4 | ||||
| -rw-r--r-- | intf/glob_term.mli | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/intf/constrexpr.mli b/intf/constrexpr.mli index bc2f7df248..f6660ff691 100644 --- a/intf/constrexpr.mli +++ b/intf/constrexpr.mli @@ -81,8 +81,8 @@ type constr_expr = | CIf of Loc.t * constr_expr * (Name.t located option * constr_expr option) * constr_expr * constr_expr | CHole of Loc.t * Evar_kinds.t option * Genarg.raw_generic_argument option - | CPatVar of Loc.t * (bool * patvar) - | CEvar of Loc.t * Glob_term.existential_name * (Id.t * constr_expr) list option + | CPatVar of Loc.t * patvar + | CEvar of Loc.t * Glob_term.existential_name * (Id.t * constr_expr) list | CSort of Loc.t * glob_sort | CCast of Loc.t * constr_expr * constr_expr cast_type | CNotation of Loc.t * notation * constr_notation_substitution diff --git a/intf/glob_term.mli b/intf/glob_term.mli index 9aca2306a0..237d033662 100644 --- a/intf/glob_term.mli +++ b/intf/glob_term.mli @@ -32,7 +32,7 @@ type cases_pattern = type glob_constr = | GRef of (Loc.t * global_reference * glob_level list option) | GVar of (Loc.t * Id.t) - | GEvar of Loc.t * existential_name * (Id.t * glob_constr) list option + | GEvar of Loc.t * existential_name * (Id.t * glob_constr) list | GPatVar of Loc.t * (bool * patvar) (** Used for patterns only *) | GApp of Loc.t * glob_constr * glob_constr list | GLambda of Loc.t * Name.t * binding_kind * glob_constr * glob_constr |