Inlining_cost
module Threshold : sig ... end
val can_inline : Flambda.t -> Threshold.t -> bonus:int -> bool
val can_try_inlining :
Flambda.t ->
Threshold.t ->
number_of_arguments:int ->
size_from_approximation:int option ->
Threshold.t
module Benefit : sig ... end
module Whether_sufficient_benefit : sig ... end
val lambda_smaller' : Flambda.expr -> than:int -> int option
val lambda_size : Flambda.expr -> int