sig
  type ('d, 'w) iobuf
  type t
  val window : ('a, 'b) Iobuf_intf.Bound.iobuf -> Iobuf_intf.Bound.t
  val limit : ('a, 'b) Iobuf_intf.Bound.iobuf -> Iobuf_intf.Bound.t
  val restore :
    Iobuf_intf.Bound.t ->
    ('a, Iobuf_intf.seek) Iobuf_intf.Bound.iobuf -> unit
  val sexp_of_t : Iobuf_intf.Bound.t -> Sexplib.Sexp.t
end