sig
  type logger = string -> unit
  val default : Pdfe.logger
  val logger : Pdfe.logger Stdlib.ref
  val log : Pdfe.logger
end