module S: sig .. end
sig
end
val close : ([> `dialog ], unit -> unit) GtkSignal.t
([> `dialog ], unit -> unit) GtkSignal.t
val response : ([> `dialog ], int -> unit) GtkSignal.t
([> `dialog ], int -> unit) GtkSignal.t