View (GT.View)

type er = Buffer.t -> unit

type viewer = er

val toString : viewer -> string

val empty : viewer

val concat : viewer -> viewer -> viewer

val unit : unit -> viewer

val string : string -> viewer

val int : int -> viewer

val float : float -> viewer

val bool : bool -> viewer

val char : char -> viewer

val semicolon : viewer

val comma : viewer

val space : viewer

val break : viewer

val seq : viewer list -> viewer

val seqa : viewer array -> viewer

val listBy : viewer -> viewer list -> viewer

val list : viewer list -> viewer

val arrayBy : viewer -> viewer array -> viewer

val array : viewer array -> viewer

val inbr : viewer -> viewer -> viewer -> viewer

val inrbr : viewer -> viewer

val insqbr : viewer -> viewer

val incvbr : viewer -> viewer

module type Viewable = sig ... end

module type Concat = sig ... end

module ListC (C : Concat) (X : Viewable) : sig ... end

module ArrayC (C : Concat) (X : Viewable) : sig ... end

module SetC (C : Concat) (S : Set.S) (V : sig ... end) : sig ... end

module MapC
  (C : Concat)
  (M : Map.S)
  (K : sig ... end)
  (V : Viewable) : 
  sig ... end

module HashtblC
  (C : Concat)
  (M : Hashtbl.S)
  (K : sig ... end)
  (V : Viewable) : 
  sig ... end

module List (X : Viewable) : sig ... end

module Array (X : Viewable) : sig ... end

module Set (S : Set.S) (V : sig ... end) : sig ... end

module Map (M : Map.S) (K : sig ... end) (V : Viewable) : sig ... end

module Hashtbl (M : Hashtbl.S) (K : sig ... end) (V : Viewable) : sig ... end

module NamedPair (N : sig ... end) (F : Viewable) (S : Viewable) : sig ... end

module Pair (F : Viewable) (S : Viewable) : sig ... end

module String : sig ... end

module Integer : sig ... end

module Float : sig ... end

module Bool : sig ... end

module Char : sig ... end

module Unit : sig ... end

module Exn : sig ... end

module Int32 : sig ... end

module Int64 : sig ... end

module Nativeint : sig ... end

val concatWithDelimiter : string -> string -> string -> string

val concatWithComma : string -> string -> string

val concatWithSemicolon : string -> string -> string