type 'a t =
| Input_closed |
| Input_closed_in_the_middle_of_data of 'a Unpack_buffer.t |
| Output_closed |
| Unpack_error of Core.Error.t |
val sexp_of_t : ('a -> Ppx_sexp_conv_lib.Sexp.t) -> 'a t -> Ppx_sexp_conv_lib.Sexp.t
val to_error : _ t -> Core.Error.t