diff options
author | Arnaud Spiwack <arnaud@spiwack.net> | 2014-09-02 18:02:26 +0200 |
---|---|---|
committer | Arnaud Spiwack <arnaud@spiwack.net> | 2014-09-04 10:25:54 +0200 |
commit | ac2fdfb222083faa9c3893194e020bed38555ddb (patch) | |
tree | df170292bb8d960469a3653d8f7481b42599fbf9 /intf/vernacexpr.mli | |
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/vernacexpr.mli')
-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 238eeb82e..7f3417443 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 |