Module Widget

module Widget: sig .. end

type 'a widget = 'a Rawwidget.raw_widget 
type any = Rawwidget.raw_any 
type button 
type canvas 
type checkbutton 
type entry 
type frame 
type label 
type listbox 
type menu 
type menubutton 
type message 
type radiobutton 
type scale 
type scrollbar 
type text 
type toplevel 
type ttk_labelframe 
val forget_type : 'a widget -> any widget
val coe : 'a widget -> any widget
val default_toplevel : toplevel widget
val atom : parent:'a widget -> name:string -> any widget
val name : 'a widget -> string
val known_class : 'a widget -> string
val dummy : any widget
val new_atom : parent:'a widget -> ?name:string -> string -> 'b widget
val get_atom : string -> any widget
val remove : 'a widget -> unit
val widget_any_table : string list
val widget_button_table : string list
val widget_canvas_table : string list
val widget_checkbutton_table : string list
val widget_entry_table : string list
val widget_frame_table : string list
val widget_label_table : string list
val widget_listbox_table : string list
val widget_menu_table : string list
val widget_menubutton_table : string list
val widget_message_table : string list
val widget_radiobutton_table : string list
val widget_scale_table : string list
val widget_scrollbar_table : string list
val widget_text_table : string list
val widget_toplevel_table : string list
val widget_ttk_labelframe_table : string list
val chk_sub : string -> 'a list -> 'a -> unit
val check_class : 'a widget -> string list -> unit
exception IllegalWidgetType of string