type 'a t = | Input_closed | 
| Input_closed_in_the_middle_of_data of 'a Core.Unpack_buffer.t | 
| Output_closed | 
| Unpack_error of Core.Error.t | 
include sig ... endval sexp_of_t : ('a ‑> Sexplib.Sexp.t) ‑> 'a t ‑> Sexplib.Sexp.tval to_error : _ t ‑> Core.Error.t