sig
  type 'a t = 'CCFormat.printer
  val unit : unit CCFormat.Dump.t
  val int : int CCFormat.Dump.t
  val string : string CCFormat.Dump.t
  val bool : bool CCFormat.Dump.t
  val float : float CCFormat.Dump.t
  val char : char CCFormat.Dump.t
  val int32 : int32 CCFormat.Dump.t
  val int64 : int64 CCFormat.Dump.t
  val nativeint : nativeint CCFormat.Dump.t
  val list : 'CCFormat.Dump.t -> 'a list CCFormat.Dump.t
  val array : 'CCFormat.Dump.t -> 'a array CCFormat.Dump.t
  val option : 'CCFormat.Dump.t -> 'a option CCFormat.Dump.t
  val pair :
    'CCFormat.Dump.t -> 'CCFormat.Dump.t -> ('a * 'b) CCFormat.Dump.t
  val triple :
    'CCFormat.Dump.t ->
    'CCFormat.Dump.t ->
    'CCFormat.Dump.t -> ('a * 'b * 'c) CCFormat.Dump.t
  val quad :
    'CCFormat.Dump.t ->
    'CCFormat.Dump.t ->
    'CCFormat.Dump.t ->
    'CCFormat.Dump.t -> ('a * 'b * 'c * 'd) CCFormat.Dump.t
end