type msg_kind =
| Error
| Warning
| Info
| Msg
| Log of int
val print : msg_kind -> ('a, Stdlib.Format.formatter, unit) Stdlib.format -> 'a
val with_basic_output : Stdlib.Format.formatter -> ('a -> 'b) -> 'a -> 'b
val with_rich_output : Stdlib.Format.formatter -> ('a -> 'b) -> 'a -> 'b