`sig
val cast : 'a Gobject.obj -> Gtk.message_dialog Gtk.obj
module P = GtkBaseProps.MessageDialog.P
external create :
?parent:[> `window ] Gtk.obj ->
message_type:Gtk.Tags.message_type ->
buttons:Gtk.Tags.buttons ->
message:string -> unit -> Gtk.message_dialog Gtk.obj
= "ml_gtk_message_dialog_new"
external set_markup : [> `messagedialog ] Gtk.obj -> string -> unit
= "ml_gtk_message_dialog_set_markup"
end`