diff options
| author | Arnaud Spiwack | 2014-09-02 18:02:26 +0200 |
|---|---|---|
| committer | Arnaud Spiwack | 2014-09-04 10:25:54 +0200 |
| commit | ac2fdfb222083faa9c3893194e020bed38555ddb (patch) | |
| tree | df170292bb8d960469a3653d8f7481b42599fbf9 /intf | |
| parent | c907f31fd8f4b12bf2d7df2078603dbe804475a2 (diff) | |
Add a [Variant] declaration which allows to write non-recursive variant types.
Just like the [Record] keyword allows only non-recursive records.
Diffstat (limited to 'intf')
| -rw-r--r-- | intf/vernacexpr.mli | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/intf/vernacexpr.mli b/intf/vernacexpr.mli index 238eeb82e3..7f3417443e 100644 --- a/intf/vernacexpr.mli +++ b/intf/vernacexpr.mli @@ -176,7 +176,7 @@ type local_decl_expr = | AssumExpr of lname * constr_expr | DefExpr of lname * constr_expr * constr_expr option -type inductive_kind = Inductive_kw | CoInductive | Record | Structure | Class of bool (* true = definitional, false = inductive *) +type inductive_kind = Inductive_kw | CoInductive | Variant | Record | Structure | Class of bool (* true = definitional, false = inductive *) type decl_notation = lstring * constr_expr * scope_name option type simple_binder = lident list * constr_expr type class_binder = lident * constr_expr list |