Module Bound_static.Pattern
type t = private | Code of Flambda2_identifiers.Code_id.t| Set_of_closures of Flambda2_identifiers.Symbol.t Flambda2_identifiers.Function_slot.Lmap.t| Block_like of Flambda2_identifiers.Symbol.t
val code : Flambda2_identifiers.Code_id.t -> tval set_of_closures :
Flambda2_identifiers.Symbol.t Flambda2_identifiers.Function_slot.Lmap.t ->
tval block_like : Flambda2_identifiers.Symbol.t -> tval print : Format.formatter -> t -> unit