diff options
Diffstat (limited to 'toplevel/record.mli')
-rw-r--r-- | toplevel/record.mli | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/toplevel/record.mli b/toplevel/record.mli index 04691f920..e7e3330b8 100644 --- a/toplevel/record.mli +++ b/toplevel/record.mli @@ -19,15 +19,15 @@ open Globnames as coercions accordingly to [coers]; it returns the absolute names of projections *) val declare_projections : - inductive -> ?kind:Decl_kinds.definition_object_kind -> ?name:identifier -> + inductive -> ?kind:Decl_kinds.definition_object_kind -> ?name:Id.t -> coercion_flag list -> manual_explicitation list list -> rel_context -> (name * bool) list * constant option list val declare_structure : Decl_kinds.recursivity_kind -> - bool (**infer?*) -> identifier -> identifier -> + bool (**infer?*) -> Id.t -> Id.t -> manual_explicitation list -> rel_context -> (** params *) constr -> (** arity *) Impargs.manual_explicitation list list -> rel_context -> (** fields *) - ?kind:Decl_kinds.definition_object_kind -> ?name:identifier -> + ?kind:Decl_kinds.definition_object_kind -> ?name:Id.t -> bool -> (** coercion? *) bool list -> (** field coercions *) Evd.evar_map -> @@ -36,4 +36,4 @@ val declare_structure : Decl_kinds.recursivity_kind -> val definition_structure : inductive_kind * Decl_kinds.recursivity_kind * bool(**infer?*)* lident with_coercion * local_binder list * (local_decl_expr with_instance with_priority with_notation) list * - identifier * constr_expr option -> global_reference + Id.t * constr_expr option -> global_reference |