compiler-libs.optcomp
Flambda2_simplify.Non_recursive_handler
compiler-libs.bytecomp
compiler-libs.common
compiler-libs.toplevel
dynlink
eval
jit
runtime_events
stdlib
stdlib_alpha
stdlib_beta
stdlib_stable
stdlib_upstream_compatible
str
threads
unix
type t = private {
cont : Flambda2_identifiers.Continuation.t;
params : Flambda2_bound_identifiers.Bound_parameters.t;
lifted_params : Lifted_cont_params.t;
handler : Flambda2_terms.Flambda.Expr.t;
is_exn_handler : bool;
can_be_lifted : bool;
is_cold : bool;
}
val create : cont:Flambda2_identifiers.Continuation.t -> params:Flambda2_bound_identifiers.Bound_parameters.t -> lifted_params:Lifted_cont_params.t -> handler:Flambda2_terms.Flambda.Expr.t -> is_exn_handler:bool -> can_be_lifted:bool -> is_cold:bool -> t
val print : Format.formatter -> t -> unit
val with_handler : Flambda2_terms.Flambda.Expr.t -> t -> t
val rename_params : t -> t
val with_can_be_lifted : bool -> t -> t