diff options
| author | Emilio Jesus Gallego Arias | 2020-02-19 15:22:36 -0500 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2020-02-19 15:22:36 -0500 |
| commit | 2b72b403d82c15d0420603142e14ab50c7e590c1 (patch) | |
| tree | a6578e3c7b4166d1cafccc3ea2352fc92a41b7a2 /vernac/vernacexpr.ml | |
| parent | 43c3c7d6f62a9bee4772242c27fbafd54770d271 (diff) | |
| parent | 509d958342764e4a676e735a3896f6ff77c07ff9 (diff) | |
Merge PR #11600: New syntax [Inductive Acc A R | x : Prop := ...]
Reviewed-by: Zimmi48
Reviewed-by: maximedenes
Reviewed-by: ppedrot
Diffstat (limited to 'vernac/vernacexpr.ml')
| -rw-r--r-- | vernac/vernacexpr.ml | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/vernac/vernacexpr.ml b/vernac/vernacexpr.ml index 3610240634..45018a246c 100644 --- a/vernac/vernacexpr.ml +++ b/vernac/vernacexpr.ml @@ -163,12 +163,15 @@ type constructor_expr = (lident * constr_expr) with_coercion type constructor_list_or_record_decl_expr = | Constructors of constructor_expr list | RecordDecl of lident option * (local_decl_expr * record_field_attr) list +type inductive_params_expr = local_binder_expr list * local_binder_expr list option +(** If the option is nonempty the "|" marker was used *) + type inductive_expr = - ident_decl with_coercion * local_binder_expr list * constr_expr option * + ident_decl with_coercion * inductive_params_expr * constr_expr option * constructor_list_or_record_decl_expr type one_inductive_expr = - lident * local_binder_expr list * constr_expr option * constructor_expr list + lident * inductive_params_expr * constr_expr option * constructor_expr list type typeclass_constraint = name_decl * Glob_term.binding_kind * constr_expr and typeclass_context = typeclass_constraint list |