([> `dialog ] as 'a) Gobject.obj -> object val obj : 'a Gobject.obj method has_separator : callback:(bool -> unit) -> GtkSignal.id method private notify : 'b. ('a, 'b) Gobject.property -> callback:('b -> unit) -> GtkSignal.id end