ComCoercion
Classes and coercions.
val try_add_new_coercion_with_target : Names.GlobRef.t -> local:bool -> poly:bool ->
nonuniform:bool -> reversible:bool -> source:Coercionops.cl_typ -> target:Coercionops.cl_typ -> unit
try_add_new_coercion_with_target ref s src tg
declares ref
as a coercion from src
to tg
val try_add_new_coercion : Names.GlobRef.t -> local:bool -> poly:bool -> nonuniform:bool ->
reversible:bool -> unit
try_add_new_coercion ref s
declares ref
, assumed to be of type (x1:T1)...(xn:Tn)src->tg
, as a coercion from src
to tg
val try_add_new_coercion_subclass : Coercionops.cl_typ -> local:bool -> poly:bool -> nonuniform:bool ->
reversible:bool -> unit
try_add_new_coercion_subclass cst s
expects that cst
denotes a transparent constant which unfolds to some class tg
; it declares an identity coercion from cst
to tg
, named something like "Id_cst_tg"
val try_add_new_coercion_with_source : Names.GlobRef.t -> local:bool -> poly:bool ->
nonuniform:bool -> reversible:bool -> source:Coercionops.cl_typ -> unit
try_add_new_coercion_with_source ref s src
declares ref
as a coercion from src
to tg
where the target is inferred from the type of ref
val try_add_new_identity_coercion : Names.Id.t -> local:bool -> poly:bool -> source:Coercionops.cl_typ -> target:Coercionops.cl_typ
-> unit
try_add_new_identity_coercion id s src tg
enriches the environment with a new definition of name id
declared as an identity coercion from src
to tg
val add_coercion_hook : poly:bool -> nonuniform:bool -> reversible:bool -> Declare.Hook.t
val add_subclass_hook : poly:bool -> reversible:bool -> Declare.Hook.t
val class_of_global : Names.GlobRef.t -> Coercionops.cl_typ
val nonuniform : bool option Attributes.attribute
Attribute to silence warning for coercions that don't satisfy the uniform inheritance condition.
val change_reverse : Names.GlobRef.t -> reversible:bool -> unit