module Discard_printf: sig .. end
sig
end
-rectypes
val discard_printf : ('a, Format.formatter, unit) Pervasives.format -> 'a
('a, Format.formatter, unit) Pervasives.format -> 'a