Module Flambda2_simplify.Non_recursive_handler
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 ->
tval print : Format.formatter -> t -> unitval with_handler : Flambda2_terms.Flambda.Expr.t -> t -> t