diff options
Diffstat (limited to 'toplevel/record.mli')
-rw-r--r-- | toplevel/record.mli | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/toplevel/record.mli b/toplevel/record.mli index 26eb3378b..525326237 100644 --- a/toplevel/record.mli +++ b/toplevel/record.mli @@ -24,7 +24,9 @@ val declare_projections : coercion_flag list -> manual_explicitation list list -> Context.Rel.t -> (Name.t * bool) list * constant option list -val declare_structure : Decl_kinds.recursivity_kind -> +val declare_structure : + bool -> (** check positivity? *) + Decl_kinds.recursivity_kind -> bool (** polymorphic?*) -> Univ.universe_context -> Id.t -> Id.t -> manual_explicitation list -> Context.Rel.t -> (** params *) constr -> (** arity *) @@ -37,6 +39,7 @@ val declare_structure : Decl_kinds.recursivity_kind -> inductive val definition_structure : + bool -> (** check positivity? *) inductive_kind * Decl_kinds.polymorphic * Decl_kinds.recursivity_kind * plident with_coercion * local_binder list * (local_decl_expr with_instance with_priority with_notation) list * Id.t * constr_expr option -> global_reference |