module Pretty_printer: sig .. end
sig
end
val all : unit -> string list
unit -> string list
val register : string -> unit
string -> unit