sig
  val set_binary_io : bool -> unit
  class report_app :
    string ->
    object
      method box : GPack.box
      method changed : bool
      method close : unit
      method init_window : GWindow.window -> unit
      method reload : unit
      method save : unit
    end
end