Genprintval.S
type t
val outval_of_untyped_exception : t -> Outcometree.out_value
val outval_of_value : int -> int -> (int -> t -> Types.type_expr -> Outcometree.out_value option) -> Env.t -> t -> Types.type_expr -> Outcometree.out_value