Module Unpack_sequence.Result

module Result: sig .. end

type ('a, 'b) t =

`\|`	`Input_closed`
`\|`	`Input_closed_in_the_middle_of_data of ('a, 'b) Core.Std.Unpack_buffer.t`
`\|`	`Output_closed of 'a Core.Std.Queue.t * ('a, 'b) Core.Std.Unpack_buffer.t`
`\|`	`Unpack_error of Core.Std.Error.t`

val to_error : ('a, 'b) t -> Core.Std.Error.t

val sexp_of_t : ('a -> Sexplib.Sexp.t) ->
       ('b -> Sexplib.Sexp.t) -> ('a, 'b) t -> Sexplib.Sexp.t