module Report: sig .. end
sig
end
val print : (unit -> unit) Pervasives.ref
(unit -> unit) Pervasives.ref