sig
  type uint = int
  val uvint_of_uint : ?buf:Bi_outbuf.t -> Bi_vint.uint -> string
  val svint_of_int : ?buf:Bi_outbuf.t -> int -> string
  val uint_of_uvint : string -> Bi_vint.uint
  val int_of_svint : string -> int
  val write_uvint : Bi_outbuf.t -> Bi_vint.uint -> unit
  val write_svint : Bi_outbuf.t -> int -> unit
  val read_uvint : Bi_inbuf.t -> Bi_vint.uint
  val read_svint : Bi_inbuf.t -> int
end