sig type t = [ `SETTING ] Gdk.event val cast : any -> t external action : GdkEvent.Setting.t -> Gdk.Tags.setting_action = "ml_GdkEventSetting_action" external name : GdkEvent.Setting.t -> string = "ml_GdkEventSetting_name" end