class gui :Inherits?quit_on_destroy:bool -> ?on_close_file:string -> unit -> ?default_file:bool -> string list ->object..end
val mutable file_boxes : file listmethod add_file_box : string option -> unitmethod active_file : file optionmethod quit : unit -> unitmethod about : unit -> unitmethod new_file : unit -> unitmethod close_current : unit -> unitmethod open_file : unit -> unitmethod on_current : (file -> unit) -> unit -> unit