File: pdfe.ml

package info (click to toggle)

camlpdf 2.9-1

file content (8 lines) | stat: -rw-r--r-- 138 bytes

(* Errors. *)
type logger = string -> unit

let default s = prerr_string s; flush stderr

let logger = ref default

let log s = !logger s