sig
  val cast : 'Gobject.obj -> Gtk.spin_button Gtk.obj
  module P = GtkEditProps.SpinButton.P
  module S = GtkEditProps.SpinButton.S
  val create : Gtk.spin_button Gobject.param list -> Gtk.spin_button Gtk.obj
  external spin : [> `spinbutton ] Gtk.obj -> Gtk.Tags.spin_type -> unit
    = "ml_gtk_spin_button_spin"
  external update : [> `spinbutton ] Gtk.obj -> unit
    = "ml_gtk_spin_button_update"
  val make_params :
    cont:(([> `spinbutton ] as 'a) Gobject.param list -> 'b) ->
    'Gobject.param list ->
    ?adjustment:Gtk.adjustment Gtk.obj ->
    ?rate:float ->
    ?digits:int ->
    ?numeric:bool ->
    ?snap_to_ticks:bool ->
    ?update_policy:GtkEnums.spin_button_update_policy ->
    ?value:float -> ?wrap:bool -> 'b
  val get_value_as_int : [> `spinbutton ] Gobject.obj -> int
end