Module Simplify_common

val const_float_comparison_expr : Flambda.named -> Lambda.float_comparison -> float -> float -> Flambda.named * Simple_value_approx.t * Inlining_cost.Benefit.t
val swap16 : int -> int
val swap32 : int32 -> int32
val swap64 : int64 -> int64
val swapnative : nativeint -> nativeint