module type Typed_printer = sig .. end
sig
end
type 'a elt
'a
type doc
type out
val print_list : ?encode:(string -> string) -> 'a elt list -> out
?encode:(string -> string) -> 'a elt list -> out
val print : ?encode:(string -> string) -> ?advert:string -> doc -> out
?encode:(string -> string) -> ?advert:string -> doc -> out