sig
  val cast : 'a Gobject.obj -> Gtk.text Gtk.obj
  module P :
    sig
      val hadjustment : ([> `text ], Gtk.adjustment Gtk.obj) Gobject.property
      val vadjustment : ([> `text ], Gtk.adjustment Gtk.obj) Gobject.property
      val editable : ([> `text ], bool) Gobject.property
      val line_wrap : ([> `text ], bool) Gobject.property
      val word_wrap : ([> `text ], bool) Gobject.property
    end
  val create : Gtk.text Gobject.param list -> Gtk.text Gtk.obj
  val make_params :
    cont:(([> `text ] as 'a) Gobject.param list -> 'b) ->
    'a Gobject.param list ->
    ?hadjustment:Gtk.adjustment Gtk.obj ->
    ?vadjustment:Gtk.adjustment Gtk.obj ->
    ?editable:bool -> ?line_wrap:bool -> ?word_wrap:bool -> 'b
end