module type Raw_typed_printer =sig
..end
val print_list : output:(string -> unit) ->
?encode:(string -> string) ->
{{<_ ..>X1 where X1 = [ (<_ ..>X1 | Char)* ]}} list -> unit
val print : output:(string -> unit) ->
?encode:(string -> string) ->
?advert:string -> {{<_ ..>X1 where X1 = [ (<_ ..>X1 | Char)* ]}} -> unit