sig
  exception Error of string
  val error : string -> 'a
  val string8_of_int : int -> string
  val string4_of_int : int -> string
  val print_bits : ?pos:int -> ?len:int -> string -> string
end