Module Record.Internal

type projection_flags = {
pf_coercion : bool;
pf_reversible : bool;
pf_instance : bool;
pf_priority : int option;
pf_locality : Goptions.option_locality;
pf_canonical : bool;
}
val declare_projections : Names.inductive -> kind:Decls.definition_object_kind -> inhabitant_id:Names.Id.t -> projection_flags list -> ?fieldlocs:Loc.t option list -> Impargs.manual_implicits list -> Structures.Structure.projection list
val declare_structure_entry : Structures.Structure.t -> unit