Module Flambda2_simplify.Continuation_extra_params_and_args
module Extra_arg : sig ... endtype t = private | Empty| Non_empty of {extra_params : Flambda2_bound_identifiers.Bound_parameters.t;extra_args : Extra_arg.t list Flambda2_term_basics.Or_invalid.t Flambda2_identifiers.Apply_cont_rewrite_id.Map.t;
}
val print : Format.formatter -> t -> unitval is_empty : t -> boolCreating an EPA
First way to create an EPA
val empty : tval add :
t ->
invalids:Flambda2_identifiers.Apply_cont_rewrite_id.Set.t ->
extra_param:Flambda2_bound_identifiers.Bound_parameter.t ->
extra_args:Extra_arg.t Flambda2_identifiers.Apply_cont_rewrite_id.Map.t ->
tAnother way to create an EPA
val init_with_params_only : Flambda2_bound_identifiers.Bound_parameters.t -> tval add_args_for_all_params :
t ->
Flambda2_identifiers.Apply_cont_rewrite_id.t ->
Extra_arg.t list ->
tOther functions
val replace_extra_args :
t ->
Extra_arg.t list Flambda2_term_basics.Or_invalid.t
Flambda2_identifiers.Apply_cont_rewrite_id.Map.t ->
tval extra_params : t -> Flambda2_bound_identifiers.Bound_parameters.tval extra_args :
t ->
Extra_arg.t list Flambda2_term_basics.Or_invalid.t
Flambda2_identifiers.Apply_cont_rewrite_id.Map.t