sig
  val cast : 'a Gobject.obj -> [ `giu ] Gobject.obj
  external _ref_sink : [> `giu ] Gobject.obj -> unit = "ml_g_object_ref_sink"
  val make :
    classe:string -> ([> `giu ] as 'a) Gobject.param list -> 'a Gobject.obj
  val try_cast : 'a Gobject.obj -> string -> 'b Gobject.obj
end