class gui :Inheritsstring list ->
object
..end
val mutable file_boxes : file list
method add_file_box : string option -> unit
method active_file : file option
method quit : unit -> unit
method about : unit -> unit
method new_report : unit -> unit
method close_current : unit -> unit
method open_report : unit -> unit
method on_current : (file -> unit) -> unit -> unit