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