sig
type channel
type document
val pretty :
float ->
int ->
PPrintRenderer.RENDERER.channel ->
PPrintRenderer.RENDERER.document -> unit
val compact :
PPrintRenderer.RENDERER.channel ->
PPrintRenderer.RENDERER.document -> unit
end