diff options
Diffstat (limited to 'ide/wg_Command.mli')
-rw-r--r-- | ide/wg_Command.mli | 42 |
1 files changed, 36 insertions, 6 deletions
diff --git a/ide/wg_Command.mli b/ide/wg_Command.mli index 2245befe7..92ad858f4 100644 --- a/ide/wg_Command.mli +++ b/ide/wg_Command.mli @@ -6,13 +6,43 @@ (* * GNU Lesser General Public License Version 2.1 *) (************************************************************************) -class command_window : Coq.coqtop -> - mark_as_broken:(Stateid.t list -> unit) -> - mark_as_processed:(Stateid.t list -> unit) -> - cur_state:(unit -> Stateid.t) -> +class type detachable_signals = object - method new_command : ?command:string -> ?term:string -> unit -> unit - method frame : GBin.frame + inherit GContainer.container_signals + method attached : callback:(GObj.widget -> unit) -> unit + method detached : callback:(GObj.widget -> unit) -> unit + end + +class detachable : ([> Gtk.box] as 'a) Gobject.obj -> + object + inherit GPack.box_skel + val obj : Gtk.box Gobject.obj + method connect : detachable_signals + method child : GObj.widget + method show : unit + method hide : unit + method visible : bool + method title : string + method set_title : string -> unit + + end + +val detachable : + ?title:string -> + ?homogeneous:bool -> + ?spacing:int -> + ?border_width:int -> + ?width:int -> + ?height:int -> + ?packing:(GObj.widget -> unit) -> ?show:bool -> unit -> detachable + +class command_window : string -> Coq.coqtop -> + object + method new_query : ?command:string -> ?term:string -> unit -> unit + method pack_in : (GObj.widget -> unit) -> unit method refresh_font : unit -> unit method refresh_color : unit -> unit + method show : unit + method hide : unit + method visible : bool end |