sig
  class comboTextTree :
    generator:((string, string) Environment.env -> string list) ->
    msg:(string, string) Environment.env ->
    key:string ->
    callback:(string -> unit) option ->
    packing:(GObj.widget -> unit) option ->
    object
      val mutable box : GEdit.combo_box
      val mutable childs : Widget.ComboTextTree.comboTextTree list
      val mutable choices : string list
      val mutable col : string GTree.column
      val mutable env : (string, string) Environment.env
      val initialize_packing : unit
      method add_child : Widget.ComboTextTree.comboTextTree -> unit
      method box : GEdit.combo_box
      method callback : string -> unit
      method changedAndGetActive : (string -> unit) -> unit
      method child : int -> Widget.ComboTextTree.comboTextTree
      method childs : Widget.ComboTextTree.comboTextTree list
      method childs_rebuild : unit -> unit
      method choices : string list
      method col : string GTree.column
      method env : (string, string) Environment.env
      method generator : (string, string) Environment.env -> string list
      method initialize_callbacks : unit
      method key : string
      method packing : GObj.widget -> unit
      method rebuild : (string, string) Environment.env -> unit
      method selected : string
      method set_active_value : string -> unit
      method set_box : GEdit.combo_box -> unit
      method set_childs : Widget.ComboTextTree.comboTextTree list -> unit
      method set_choices : string list -> unit
      method set_col : string GTree.column -> unit
      method set_env : (string, string) Environment.env -> unit
      method slave : Widget.ComboTextTree.comboTextTree
      method slave0 : Widget.ComboTextTree.comboTextTree
      method slave1 : Widget.ComboTextTree.comboTextTree
      method slave2 : Widget.ComboTextTree.comboTextTree
      method slave3 : Widget.ComboTextTree.comboTextTree
      method slave4 : Widget.ComboTextTree.comboTextTree
      method slave5 : Widget.ComboTextTree.comboTextTree
    end
  type choice = string
  type choices = Widget.ComboTextTree.choice list
  val make :
    generator:((string, Widget.ComboTextTree.choice) Environment.env ->
               Widget.ComboTextTree.choice list) ->
    msg:(string, Widget.ComboTextTree.choice) Environment.env ->
    key:string ->
    callback:(Widget.ComboTextTree.choice -> unit) option ->
    packing:(GObj.widget -> unit) option ->
    Widget.ComboTextTree.comboTextTree
  val fromList :
    ?key:string ->
    ?callback:(Widget.ComboTextTree.choice -> unit) option ->
    ?packing:(GObj.widget -> unit) option ->
    Widget.ComboTextTree.choices -> Widget.ComboTextTree.comboTextTree
  val fromListWithSlave :
    ?masterCallback:(Widget.ComboTextTree.choice -> unit) option ->
    ?masterPacking:(GObj.widget -> unit) option ->
    Widget.ComboTextTree.choices ->
    ?slaveCallback:(Widget.ComboTextTree.choice -> unit) option ->
    ?slavePacking:(GObj.widget -> unit) option ->
    (Widget.ComboTextTree.choice -> Widget.ComboTextTree.choices) ->
    Widget.ComboTextTree.comboTextTree
  val fromListWithSlaveWithSlave :
    ?masterCallback:(Widget.ComboTextTree.choice -> unit) option ->
    ?masterPacking:(GObj.widget -> unit) option ->
    Widget.ComboTextTree.choices ->
    ?slaveCallback:(Widget.ComboTextTree.choice -> unit) option ->
    ?slavePacking:(GObj.widget -> unit) option ->
    (Widget.ComboTextTree.choice -> Widget.ComboTextTree.choices) ->
    ?slaveSlaveCallback:(Widget.ComboTextTree.choice -> unit) option ->
    ?slaveSlavePacking:(GObj.widget -> unit) option ->
    (Widget.ComboTextTree.choice ->
     Widget.ComboTextTree.choice -> Widget.ComboTextTree.choices) ->
    Widget.ComboTextTree.comboTextTree
  val fromListWithSlaveWithSlaveWithSlave :
    ?masterCallback:(Widget.ComboTextTree.choice -> unit) option ->
    ?masterPacking:(GObj.widget -> unit) option ->
    Widget.ComboTextTree.choices ->
    ?slaveCallback:(Widget.ComboTextTree.choice -> unit) option ->
    ?slavePacking:(GObj.widget -> unit) option ->
    (Widget.ComboTextTree.choice -> Widget.ComboTextTree.choices) ->
    ?slaveSlaveCallback:(Widget.ComboTextTree.choice -> unit) option ->
    ?slaveSlavePacking:(GObj.widget -> unit) option ->
    (Widget.ComboTextTree.choice ->
     Widget.ComboTextTree.choice -> Widget.ComboTextTree.choices) ->
    ?slaveSlaveSlaveCallback:(Widget.ComboTextTree.choice -> unit) option ->
    ?slaveSlaveSlavePacking:(GObj.widget -> unit) option ->
    (Widget.ComboTextTree.choice ->
     Widget.ComboTextTree.choice ->
     Widget.ComboTextTree.choice -> Widget.ComboTextTree.choices) ->
    Widget.ComboTextTree.comboTextTree
  val fromListWithTwoSlaves :
    ?masterCallback:(Widget.ComboTextTree.choice -> unit) option ->
    ?masterPacking:(GObj.widget -> unit) option ->
    Widget.ComboTextTree.choices ->
    ?slave1Callback:(Widget.ComboTextTree.choice -> unit) option ->
    ?slave1Packing:(GObj.widget -> unit) option ->
    (Widget.ComboTextTree.choice -> Widget.ComboTextTree.choices) ->
    ?slave2Callback:(Widget.ComboTextTree.choice -> unit) option ->
    ?slave2Packing:(GObj.widget -> unit) option ->
    (Widget.ComboTextTree.choice -> Widget.ComboTextTree.choices) ->
    Widget.ComboTextTree.comboTextTree
end