type ('a, 'b) t
val put : 'a ‑> 'b ‑> ('a, 'b) t
val continue : 'a ‑> ('a, 'b) t
val put_opt : 'a ‑> 'b option ‑> ('a, 'b) t
val put_list : 'a ‑> 'b list ‑> ('a, 'b) t
val warning : 'a ‑> msg:string ‑> ('a, 'b) t
val fatal : string ‑> ('a, 'b) t