{- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 Maintainer : Iñaki García Etxebarria (inaki@blueleaf.cc) A 'GI.Gtk.Objects.SpinButton.SpinButton' is an ideal way to allow the user to set the value of some attribute. Rather than having to directly type a number into a 'GI.Gtk.Objects.Entry.Entry', GtkSpinButton allows the user to click on one of two arrows to increment or decrement the displayed value. A value can still be typed in, with the bonus that it can be checked to ensure it is in a given range. The main properties of a GtkSpinButton are through an adjustment. See the 'GI.Gtk.Objects.Adjustment.Adjustment' section for more details about an adjustment\'s properties. Note that GtkSpinButton will by default make its entry large enough to accomodate the lower and upper bounds of the adjustment, which can lead to surprising results. Best practice is to set both the 'GI.Gtk.Objects.Entry.Entry':@/width-chars/@ and 'GI.Gtk.Objects.Entry.Entry':@/max-width-chars/@ poperties to the desired number of characters to display in the entry. = CSS nodes === /plain code/ > >spinbutton.horizontal >├── undershoot.left >├── undershoot.right >├── entry >│ ╰── ... >├── button.down >╰── button.up === /plain code/ > >spinbutton.vertical >├── undershoot.left >├── undershoot.right >├── button.up >├── entry >│ ╰── ... >╰── button.down GtkSpinButtons main CSS node has the name spinbutton. It creates subnodes for the entry and the two buttons, with these names. The button nodes have the style classes .up and .down. The GtkEntry subnodes (if present) are put below the entry node. The orientation of the spin button is reflected in the .vertical or .horizontal style class on the main node. == Using a GtkSpinButton to get an integer === /C code/ > >// Provides a function to retrieve an integer value from a GtkSpinButton >// and creates a spin button to model percentage values. > >gint >grab_int_value (GtkSpinButton *button, > gpointer user_data) >{ > return gtk_spin_button_get_value_as_int (button); >} > >void >create_integer_spin_button (void) >{ > > GtkWidget *window, *button; > GtkAdjustment *adjustment; > > adjustment = gtk_adjustment_new (50.0, 0.0, 100.0, 1.0, 5.0, 0.0); > > window = gtk_window_new (GTK_WINDOW_TOPLEVEL); > gtk_container_set_border_width (GTK_CONTAINER (window), 5); > > // creates the spinbutton, with no decimal places > button = gtk_spin_button_new (adjustment, 1.0, 0); > gtk_container_add (GTK_CONTAINER (window), button); > > gtk_widget_show_all (window); >} == Using a GtkSpinButton to get a floating point value === /C code/ > >// Provides a function to retrieve a floating point value from a >// GtkSpinButton, and creates a high precision spin button. > >gfloat >grab_float_value (GtkSpinButton *button, > gpointer user_data) >{ > return gtk_spin_button_get_value (button); >} > >void >create_floating_spin_button (void) >{ > GtkWidget *window, *button; > GtkAdjustment *adjustment; > > adjustment = gtk_adjustment_new (2.500, 0.0, 5.0, 0.001, 0.1, 0.0); > > window = gtk_window_new (GTK_WINDOW_TOPLEVEL); > gtk_container_set_border_width (GTK_CONTAINER (window), 5); > > // creates the spinbutton, with three decimal places > button = gtk_spin_button_new (adjustment, 0.001, 3); > gtk_container_add (GTK_CONTAINER (window), button); > > gtk_widget_show_all (window); >} -} #define ENABLE_OVERLOADING (MIN_VERSION_haskell_gi_overloading(1,0,0) \ && !defined(__HADDOCK_VERSION__)) module GI.Gtk.Objects.SpinButton ( -- * Exported types SpinButton(..) , IsSpinButton , toSpinButton , noSpinButton , -- * Methods -- ** configure #method:configure# #if ENABLE_OVERLOADING SpinButtonConfigureMethodInfo , #endif spinButtonConfigure , -- ** getAdjustment #method:getAdjustment# #if ENABLE_OVERLOADING SpinButtonGetAdjustmentMethodInfo , #endif spinButtonGetAdjustment , -- ** getDigits #method:getDigits# #if ENABLE_OVERLOADING SpinButtonGetDigitsMethodInfo , #endif spinButtonGetDigits , -- ** getIncrements #method:getIncrements# #if ENABLE_OVERLOADING SpinButtonGetIncrementsMethodInfo , #endif spinButtonGetIncrements , -- ** getNumeric #method:getNumeric# #if ENABLE_OVERLOADING SpinButtonGetNumericMethodInfo , #endif spinButtonGetNumeric , -- ** getRange #method:getRange# #if ENABLE_OVERLOADING SpinButtonGetRangeMethodInfo , #endif spinButtonGetRange , -- ** getSnapToTicks #method:getSnapToTicks# #if ENABLE_OVERLOADING SpinButtonGetSnapToTicksMethodInfo , #endif spinButtonGetSnapToTicks , -- ** getUpdatePolicy #method:getUpdatePolicy# #if ENABLE_OVERLOADING SpinButtonGetUpdatePolicyMethodInfo , #endif spinButtonGetUpdatePolicy , -- ** getValue #method:getValue# #if ENABLE_OVERLOADING SpinButtonGetValueMethodInfo , #endif spinButtonGetValue , -- ** getValueAsInt #method:getValueAsInt# #if ENABLE_OVERLOADING SpinButtonGetValueAsIntMethodInfo , #endif spinButtonGetValueAsInt , -- ** getWrap #method:getWrap# #if ENABLE_OVERLOADING SpinButtonGetWrapMethodInfo , #endif spinButtonGetWrap , -- ** new #method:new# spinButtonNew , -- ** newWithRange #method:newWithRange# spinButtonNewWithRange , -- ** setAdjustment #method:setAdjustment# #if ENABLE_OVERLOADING SpinButtonSetAdjustmentMethodInfo , #endif spinButtonSetAdjustment , -- ** setDigits #method:setDigits# #if ENABLE_OVERLOADING SpinButtonSetDigitsMethodInfo , #endif spinButtonSetDigits , -- ** setIncrements #method:setIncrements# #if ENABLE_OVERLOADING SpinButtonSetIncrementsMethodInfo , #endif spinButtonSetIncrements , -- ** setNumeric #method:setNumeric# #if ENABLE_OVERLOADING SpinButtonSetNumericMethodInfo , #endif spinButtonSetNumeric , -- ** setRange #method:setRange# #if ENABLE_OVERLOADING SpinButtonSetRangeMethodInfo , #endif spinButtonSetRange , -- ** setSnapToTicks #method:setSnapToTicks# #if ENABLE_OVERLOADING SpinButtonSetSnapToTicksMethodInfo , #endif spinButtonSetSnapToTicks , -- ** setUpdatePolicy #method:setUpdatePolicy# #if ENABLE_OVERLOADING SpinButtonSetUpdatePolicyMethodInfo , #endif spinButtonSetUpdatePolicy , -- ** setValue #method:setValue# #if ENABLE_OVERLOADING SpinButtonSetValueMethodInfo , #endif spinButtonSetValue , -- ** setWrap #method:setWrap# #if ENABLE_OVERLOADING SpinButtonSetWrapMethodInfo , #endif spinButtonSetWrap , -- ** spin #method:spin# #if ENABLE_OVERLOADING SpinButtonSpinMethodInfo , #endif spinButtonSpin , -- ** update #method:update# #if ENABLE_OVERLOADING SpinButtonUpdateMethodInfo , #endif spinButtonUpdate , -- * Properties -- ** adjustment #attr:adjustment# {- | /No description available in the introspection data./ -} #if ENABLE_OVERLOADING SpinButtonAdjustmentPropertyInfo , #endif constructSpinButtonAdjustment , getSpinButtonAdjustment , setSpinButtonAdjustment , #if ENABLE_OVERLOADING spinButtonAdjustment , #endif -- ** climbRate #attr:climbRate# {- | /No description available in the introspection data./ -} #if ENABLE_OVERLOADING SpinButtonClimbRatePropertyInfo , #endif constructSpinButtonClimbRate , getSpinButtonClimbRate , setSpinButtonClimbRate , #if ENABLE_OVERLOADING spinButtonClimbRate , #endif -- ** digits #attr:digits# {- | /No description available in the introspection data./ -} #if ENABLE_OVERLOADING SpinButtonDigitsPropertyInfo , #endif constructSpinButtonDigits , getSpinButtonDigits , setSpinButtonDigits , #if ENABLE_OVERLOADING spinButtonDigits , #endif -- ** numeric #attr:numeric# {- | /No description available in the introspection data./ -} #if ENABLE_OVERLOADING SpinButtonNumericPropertyInfo , #endif constructSpinButtonNumeric , getSpinButtonNumeric , setSpinButtonNumeric , #if ENABLE_OVERLOADING spinButtonNumeric , #endif -- ** snapToTicks #attr:snapToTicks# {- | /No description available in the introspection data./ -} #if ENABLE_OVERLOADING SpinButtonSnapToTicksPropertyInfo , #endif constructSpinButtonSnapToTicks , getSpinButtonSnapToTicks , setSpinButtonSnapToTicks , #if ENABLE_OVERLOADING spinButtonSnapToTicks , #endif -- ** updatePolicy #attr:updatePolicy# {- | /No description available in the introspection data./ -} #if ENABLE_OVERLOADING SpinButtonUpdatePolicyPropertyInfo , #endif constructSpinButtonUpdatePolicy , getSpinButtonUpdatePolicy , setSpinButtonUpdatePolicy , #if ENABLE_OVERLOADING spinButtonUpdatePolicy , #endif -- ** value #attr:value# {- | /No description available in the introspection data./ -} #if ENABLE_OVERLOADING SpinButtonValuePropertyInfo , #endif constructSpinButtonValue , getSpinButtonValue , setSpinButtonValue , #if ENABLE_OVERLOADING spinButtonValue , #endif -- ** wrap #attr:wrap# {- | /No description available in the introspection data./ -} #if ENABLE_OVERLOADING SpinButtonWrapPropertyInfo , #endif constructSpinButtonWrap , getSpinButtonWrap , setSpinButtonWrap , #if ENABLE_OVERLOADING spinButtonWrap , #endif -- * Signals -- ** changeValue #signal:changeValue# C_SpinButtonChangeValueCallback , SpinButtonChangeValueCallback , #if ENABLE_OVERLOADING SpinButtonChangeValueSignalInfo , #endif afterSpinButtonChangeValue , genClosure_SpinButtonChangeValue , mk_SpinButtonChangeValueCallback , noSpinButtonChangeValueCallback , onSpinButtonChangeValue , wrap_SpinButtonChangeValueCallback , -- ** input #signal:input# C_SpinButtonInputCallback , SpinButtonInputCallback , #if ENABLE_OVERLOADING SpinButtonInputSignalInfo , #endif afterSpinButtonInput , genClosure_SpinButtonInput , mk_SpinButtonInputCallback , noSpinButtonInputCallback , onSpinButtonInput , wrap_SpinButtonInputCallback , -- ** output #signal:output# C_SpinButtonOutputCallback , SpinButtonOutputCallback , #if ENABLE_OVERLOADING SpinButtonOutputSignalInfo , #endif afterSpinButtonOutput , genClosure_SpinButtonOutput , mk_SpinButtonOutputCallback , noSpinButtonOutputCallback , onSpinButtonOutput , wrap_SpinButtonOutputCallback , -- ** valueChanged #signal:valueChanged# C_SpinButtonValueChangedCallback , SpinButtonValueChangedCallback , #if ENABLE_OVERLOADING SpinButtonValueChangedSignalInfo , #endif afterSpinButtonValueChanged , genClosure_SpinButtonValueChanged , mk_SpinButtonValueChangedCallback , noSpinButtonValueChangedCallback , onSpinButtonValueChanged , wrap_SpinButtonValueChangedCallback , -- ** wrapped #signal:wrapped# C_SpinButtonWrappedCallback , SpinButtonWrappedCallback , #if ENABLE_OVERLOADING SpinButtonWrappedSignalInfo , #endif afterSpinButtonWrapped , genClosure_SpinButtonWrapped , mk_SpinButtonWrappedCallback , noSpinButtonWrappedCallback , onSpinButtonWrapped , wrap_SpinButtonWrappedCallback , ) where import Data.GI.Base.ShortPrelude import qualified Data.GI.Base.ShortPrelude as SP import qualified Data.GI.Base.Overloading as O import qualified Prelude as P import qualified Data.GI.Base.Attributes as GI.Attributes import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr import qualified Data.GI.Base.GClosure as B.GClosure import qualified Data.GI.Base.GError as B.GError import qualified Data.GI.Base.GVariant as B.GVariant import qualified Data.GI.Base.GValue as B.GValue import qualified Data.GI.Base.GParamSpec as B.GParamSpec import qualified Data.GI.Base.CallStack as B.CallStack import qualified Data.GI.Base.Properties as B.Properties import qualified Data.Text as T import qualified Data.ByteString.Char8 as B import qualified Data.Map as Map import qualified Foreign.Ptr as FP import qualified GHC.OverloadedLabels as OL import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface import qualified GI.GObject.Objects.Object as GObject.Object import {-# SOURCE #-} qualified GI.Gtk.Enums as Gtk.Enums import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable import {-# SOURCE #-} qualified GI.Gtk.Interfaces.CellEditable as Gtk.CellEditable import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Editable as Gtk.Editable import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Orientable as Gtk.Orientable import {-# SOURCE #-} qualified GI.Gtk.Objects.Adjustment as Gtk.Adjustment import {-# SOURCE #-} qualified GI.Gtk.Objects.Entry as Gtk.Entry import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget -- | Memory-managed wrapper type. newtype SpinButton = SpinButton (ManagedPtr SpinButton) foreign import ccall "gtk_spin_button_get_type" c_gtk_spin_button_get_type :: IO GType instance GObject SpinButton where gobjectType = c_gtk_spin_button_get_type -- | Type class for types which can be safely cast to `SpinButton`, for instance with `toSpinButton`. class (GObject o, O.IsDescendantOf SpinButton o) => IsSpinButton o instance (GObject o, O.IsDescendantOf SpinButton o) => IsSpinButton o instance O.HasParentTypes SpinButton type instance O.ParentTypes SpinButton = '[Gtk.Entry.Entry, Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Buildable.Buildable, Gtk.CellEditable.CellEditable, Gtk.Editable.Editable, Gtk.Orientable.Orientable] -- | Cast to `SpinButton`, for types for which this is known to be safe. For general casts, use `Data.GI.Base.ManagedPtr.castTo`. toSpinButton :: (MonadIO m, IsSpinButton o) => o -> m SpinButton toSpinButton = liftIO . unsafeCastTo SpinButton -- | A convenience alias for `Nothing` :: `Maybe` `SpinButton`. noSpinButton :: Maybe SpinButton noSpinButton = Nothing #if ENABLE_OVERLOADING type family ResolveSpinButtonMethod (t :: Symbol) (o :: *) :: * where ResolveSpinButtonMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo ResolveSpinButtonMethod "addAccelerator" o = Gtk.Widget.WidgetAddAcceleratorMethodInfo ResolveSpinButtonMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo ResolveSpinButtonMethod "addDeviceEvents" o = Gtk.Widget.WidgetAddDeviceEventsMethodInfo ResolveSpinButtonMethod "addEvents" o = Gtk.Widget.WidgetAddEventsMethodInfo ResolveSpinButtonMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo ResolveSpinButtonMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo ResolveSpinButtonMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo ResolveSpinButtonMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo ResolveSpinButtonMethod "canActivateAccel" o = Gtk.Widget.WidgetCanActivateAccelMethodInfo ResolveSpinButtonMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo ResolveSpinButtonMethod "childNotify" o = Gtk.Widget.WidgetChildNotifyMethodInfo ResolveSpinButtonMethod "classPath" o = Gtk.Widget.WidgetClassPathMethodInfo ResolveSpinButtonMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo ResolveSpinButtonMethod "configure" o = SpinButtonConfigureMethodInfo ResolveSpinButtonMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo ResolveSpinButtonMethod "copyClipboard" o = Gtk.Editable.EditableCopyClipboardMethodInfo ResolveSpinButtonMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo ResolveSpinButtonMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo ResolveSpinButtonMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo ResolveSpinButtonMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo ResolveSpinButtonMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo ResolveSpinButtonMethod "cutClipboard" o = Gtk.Editable.EditableCutClipboardMethodInfo ResolveSpinButtonMethod "deleteSelection" o = Gtk.Editable.EditableDeleteSelectionMethodInfo ResolveSpinButtonMethod "deleteText" o = Gtk.Editable.EditableDeleteTextMethodInfo ResolveSpinButtonMethod "destroy" o = Gtk.Widget.WidgetDestroyMethodInfo ResolveSpinButtonMethod "destroyed" o = Gtk.Widget.WidgetDestroyedMethodInfo ResolveSpinButtonMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo ResolveSpinButtonMethod "dragBegin" o = Gtk.Widget.WidgetDragBeginMethodInfo ResolveSpinButtonMethod "dragBeginWithCoordinates" o = Gtk.Widget.WidgetDragBeginWithCoordinatesMethodInfo ResolveSpinButtonMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo ResolveSpinButtonMethod "dragDestAddImageTargets" o = Gtk.Widget.WidgetDragDestAddImageTargetsMethodInfo ResolveSpinButtonMethod "dragDestAddTextTargets" o = Gtk.Widget.WidgetDragDestAddTextTargetsMethodInfo ResolveSpinButtonMethod "dragDestAddUriTargets" o = Gtk.Widget.WidgetDragDestAddUriTargetsMethodInfo ResolveSpinButtonMethod "dragDestFindTarget" o = Gtk.Widget.WidgetDragDestFindTargetMethodInfo ResolveSpinButtonMethod "dragDestGetTargetList" o = Gtk.Widget.WidgetDragDestGetTargetListMethodInfo ResolveSpinButtonMethod "dragDestGetTrackMotion" o = Gtk.Widget.WidgetDragDestGetTrackMotionMethodInfo ResolveSpinButtonMethod "dragDestSet" o = Gtk.Widget.WidgetDragDestSetMethodInfo ResolveSpinButtonMethod "dragDestSetProxy" o = Gtk.Widget.WidgetDragDestSetProxyMethodInfo ResolveSpinButtonMethod "dragDestSetTargetList" o = Gtk.Widget.WidgetDragDestSetTargetListMethodInfo ResolveSpinButtonMethod "dragDestSetTrackMotion" o = Gtk.Widget.WidgetDragDestSetTrackMotionMethodInfo ResolveSpinButtonMethod "dragDestUnset" o = Gtk.Widget.WidgetDragDestUnsetMethodInfo ResolveSpinButtonMethod "dragGetData" o = Gtk.Widget.WidgetDragGetDataMethodInfo ResolveSpinButtonMethod "dragHighlight" o = Gtk.Widget.WidgetDragHighlightMethodInfo ResolveSpinButtonMethod "dragSourceAddImageTargets" o = Gtk.Widget.WidgetDragSourceAddImageTargetsMethodInfo ResolveSpinButtonMethod "dragSourceAddTextTargets" o = Gtk.Widget.WidgetDragSourceAddTextTargetsMethodInfo ResolveSpinButtonMethod "dragSourceAddUriTargets" o = Gtk.Widget.WidgetDragSourceAddUriTargetsMethodInfo ResolveSpinButtonMethod "dragSourceGetTargetList" o = Gtk.Widget.WidgetDragSourceGetTargetListMethodInfo ResolveSpinButtonMethod "dragSourceSet" o = Gtk.Widget.WidgetDragSourceSetMethodInfo ResolveSpinButtonMethod "dragSourceSetIconGicon" o = Gtk.Widget.WidgetDragSourceSetIconGiconMethodInfo ResolveSpinButtonMethod "dragSourceSetIconName" o = Gtk.Widget.WidgetDragSourceSetIconNameMethodInfo ResolveSpinButtonMethod "dragSourceSetIconPixbuf" o = Gtk.Widget.WidgetDragSourceSetIconPixbufMethodInfo ResolveSpinButtonMethod "dragSourceSetIconStock" o = Gtk.Widget.WidgetDragSourceSetIconStockMethodInfo ResolveSpinButtonMethod "dragSourceSetTargetList" o = Gtk.Widget.WidgetDragSourceSetTargetListMethodInfo ResolveSpinButtonMethod "dragSourceUnset" o = Gtk.Widget.WidgetDragSourceUnsetMethodInfo ResolveSpinButtonMethod "dragUnhighlight" o = Gtk.Widget.WidgetDragUnhighlightMethodInfo ResolveSpinButtonMethod "draw" o = Gtk.Widget.WidgetDrawMethodInfo ResolveSpinButtonMethod "editingDone" o = Gtk.CellEditable.CellEditableEditingDoneMethodInfo ResolveSpinButtonMethod "ensureStyle" o = Gtk.Widget.WidgetEnsureStyleMethodInfo ResolveSpinButtonMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo ResolveSpinButtonMethod "event" o = Gtk.Widget.WidgetEventMethodInfo ResolveSpinButtonMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo ResolveSpinButtonMethod "freezeChildNotify" o = Gtk.Widget.WidgetFreezeChildNotifyMethodInfo ResolveSpinButtonMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo ResolveSpinButtonMethod "getv" o = GObject.Object.ObjectGetvMethodInfo ResolveSpinButtonMethod "grabAdd" o = Gtk.Widget.WidgetGrabAddMethodInfo ResolveSpinButtonMethod "grabDefault" o = Gtk.Widget.WidgetGrabDefaultMethodInfo ResolveSpinButtonMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo ResolveSpinButtonMethod "grabFocusWithoutSelecting" o = Gtk.Entry.EntryGrabFocusWithoutSelectingMethodInfo ResolveSpinButtonMethod "grabRemove" o = Gtk.Widget.WidgetGrabRemoveMethodInfo ResolveSpinButtonMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo ResolveSpinButtonMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo ResolveSpinButtonMethod "hasGrab" o = Gtk.Widget.WidgetHasGrabMethodInfo ResolveSpinButtonMethod "hasRcStyle" o = Gtk.Widget.WidgetHasRcStyleMethodInfo ResolveSpinButtonMethod "hasScreen" o = Gtk.Widget.WidgetHasScreenMethodInfo ResolveSpinButtonMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo ResolveSpinButtonMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo ResolveSpinButtonMethod "hideOnDelete" o = Gtk.Widget.WidgetHideOnDeleteMethodInfo ResolveSpinButtonMethod "imContextFilterKeypress" o = Gtk.Entry.EntryImContextFilterKeypressMethodInfo ResolveSpinButtonMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo ResolveSpinButtonMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo ResolveSpinButtonMethod "inputShapeCombineRegion" o = Gtk.Widget.WidgetInputShapeCombineRegionMethodInfo ResolveSpinButtonMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo ResolveSpinButtonMethod "insertText" o = Gtk.Editable.EditableInsertTextMethodInfo ResolveSpinButtonMethod "intersect" o = Gtk.Widget.WidgetIntersectMethodInfo ResolveSpinButtonMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo ResolveSpinButtonMethod "isComposited" o = Gtk.Widget.WidgetIsCompositedMethodInfo ResolveSpinButtonMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo ResolveSpinButtonMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo ResolveSpinButtonMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo ResolveSpinButtonMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo ResolveSpinButtonMethod "isToplevel" o = Gtk.Widget.WidgetIsToplevelMethodInfo ResolveSpinButtonMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo ResolveSpinButtonMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo ResolveSpinButtonMethod "layoutIndexToTextIndex" o = Gtk.Entry.EntryLayoutIndexToTextIndexMethodInfo ResolveSpinButtonMethod "listAccelClosures" o = Gtk.Widget.WidgetListAccelClosuresMethodInfo ResolveSpinButtonMethod "listActionPrefixes" o = Gtk.Widget.WidgetListActionPrefixesMethodInfo ResolveSpinButtonMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo ResolveSpinButtonMethod "map" o = Gtk.Widget.WidgetMapMethodInfo ResolveSpinButtonMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo ResolveSpinButtonMethod "modifyBase" o = Gtk.Widget.WidgetModifyBaseMethodInfo ResolveSpinButtonMethod "modifyBg" o = Gtk.Widget.WidgetModifyBgMethodInfo ResolveSpinButtonMethod "modifyCursor" o = Gtk.Widget.WidgetModifyCursorMethodInfo ResolveSpinButtonMethod "modifyFg" o = Gtk.Widget.WidgetModifyFgMethodInfo ResolveSpinButtonMethod "modifyFont" o = Gtk.Widget.WidgetModifyFontMethodInfo ResolveSpinButtonMethod "modifyStyle" o = Gtk.Widget.WidgetModifyStyleMethodInfo ResolveSpinButtonMethod "modifyText" o = Gtk.Widget.WidgetModifyTextMethodInfo ResolveSpinButtonMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo ResolveSpinButtonMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo ResolveSpinButtonMethod "overrideBackgroundColor" o = Gtk.Widget.WidgetOverrideBackgroundColorMethodInfo ResolveSpinButtonMethod "overrideColor" o = Gtk.Widget.WidgetOverrideColorMethodInfo ResolveSpinButtonMethod "overrideCursor" o = Gtk.Widget.WidgetOverrideCursorMethodInfo ResolveSpinButtonMethod "overrideFont" o = Gtk.Widget.WidgetOverrideFontMethodInfo ResolveSpinButtonMethod "overrideSymbolicColor" o = Gtk.Widget.WidgetOverrideSymbolicColorMethodInfo ResolveSpinButtonMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo ResolveSpinButtonMethod "pasteClipboard" o = Gtk.Editable.EditablePasteClipboardMethodInfo ResolveSpinButtonMethod "path" o = Gtk.Widget.WidgetPathMethodInfo ResolveSpinButtonMethod "progressPulse" o = Gtk.Entry.EntryProgressPulseMethodInfo ResolveSpinButtonMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo ResolveSpinButtonMethod "queueComputeExpand" o = Gtk.Widget.WidgetQueueComputeExpandMethodInfo ResolveSpinButtonMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo ResolveSpinButtonMethod "queueDrawArea" o = Gtk.Widget.WidgetQueueDrawAreaMethodInfo ResolveSpinButtonMethod "queueDrawRegion" o = Gtk.Widget.WidgetQueueDrawRegionMethodInfo ResolveSpinButtonMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo ResolveSpinButtonMethod "queueResizeNoRedraw" o = Gtk.Widget.WidgetQueueResizeNoRedrawMethodInfo ResolveSpinButtonMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo ResolveSpinButtonMethod "ref" o = GObject.Object.ObjectRefMethodInfo ResolveSpinButtonMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo ResolveSpinButtonMethod "regionIntersect" o = Gtk.Widget.WidgetRegionIntersectMethodInfo ResolveSpinButtonMethod "registerWindow" o = Gtk.Widget.WidgetRegisterWindowMethodInfo ResolveSpinButtonMethod "removeAccelerator" o = Gtk.Widget.WidgetRemoveAcceleratorMethodInfo ResolveSpinButtonMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo ResolveSpinButtonMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo ResolveSpinButtonMethod "removeWidget" o = Gtk.CellEditable.CellEditableRemoveWidgetMethodInfo ResolveSpinButtonMethod "renderIcon" o = Gtk.Widget.WidgetRenderIconMethodInfo ResolveSpinButtonMethod "renderIconPixbuf" o = Gtk.Widget.WidgetRenderIconPixbufMethodInfo ResolveSpinButtonMethod "reparent" o = Gtk.Widget.WidgetReparentMethodInfo ResolveSpinButtonMethod "resetImContext" o = Gtk.Entry.EntryResetImContextMethodInfo ResolveSpinButtonMethod "resetRcStyles" o = Gtk.Widget.WidgetResetRcStylesMethodInfo ResolveSpinButtonMethod "resetStyle" o = Gtk.Widget.WidgetResetStyleMethodInfo ResolveSpinButtonMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo ResolveSpinButtonMethod "selectRegion" o = Gtk.Editable.EditableSelectRegionMethodInfo ResolveSpinButtonMethod "sendExpose" o = Gtk.Widget.WidgetSendExposeMethodInfo ResolveSpinButtonMethod "sendFocusChange" o = Gtk.Widget.WidgetSendFocusChangeMethodInfo ResolveSpinButtonMethod "shapeCombineRegion" o = Gtk.Widget.WidgetShapeCombineRegionMethodInfo ResolveSpinButtonMethod "show" o = Gtk.Widget.WidgetShowMethodInfo ResolveSpinButtonMethod "showAll" o = Gtk.Widget.WidgetShowAllMethodInfo ResolveSpinButtonMethod "showNow" o = Gtk.Widget.WidgetShowNowMethodInfo ResolveSpinButtonMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo ResolveSpinButtonMethod "sizeAllocateWithBaseline" o = Gtk.Widget.WidgetSizeAllocateWithBaselineMethodInfo ResolveSpinButtonMethod "sizeRequest" o = Gtk.Widget.WidgetSizeRequestMethodInfo ResolveSpinButtonMethod "spin" o = SpinButtonSpinMethodInfo ResolveSpinButtonMethod "startEditing" o = Gtk.CellEditable.CellEditableStartEditingMethodInfo ResolveSpinButtonMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo ResolveSpinButtonMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo ResolveSpinButtonMethod "styleAttach" o = Gtk.Widget.WidgetStyleAttachMethodInfo ResolveSpinButtonMethod "styleGetProperty" o = Gtk.Widget.WidgetStyleGetPropertyMethodInfo ResolveSpinButtonMethod "textIndexToLayoutIndex" o = Gtk.Entry.EntryTextIndexToLayoutIndexMethodInfo ResolveSpinButtonMethod "thawChildNotify" o = Gtk.Widget.WidgetThawChildNotifyMethodInfo ResolveSpinButtonMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo ResolveSpinButtonMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo ResolveSpinButtonMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo ResolveSpinButtonMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo ResolveSpinButtonMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo ResolveSpinButtonMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo ResolveSpinButtonMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo ResolveSpinButtonMethod "unregisterWindow" o = Gtk.Widget.WidgetUnregisterWindowMethodInfo ResolveSpinButtonMethod "unsetInvisibleChar" o = Gtk.Entry.EntryUnsetInvisibleCharMethodInfo ResolveSpinButtonMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo ResolveSpinButtonMethod "update" o = SpinButtonUpdateMethodInfo ResolveSpinButtonMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo ResolveSpinButtonMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo ResolveSpinButtonMethod "getActionGroup" o = Gtk.Widget.WidgetGetActionGroupMethodInfo ResolveSpinButtonMethod "getActivatesDefault" o = Gtk.Entry.EntryGetActivatesDefaultMethodInfo ResolveSpinButtonMethod "getAdjustment" o = SpinButtonGetAdjustmentMethodInfo ResolveSpinButtonMethod "getAlignment" o = Gtk.Entry.EntryGetAlignmentMethodInfo ResolveSpinButtonMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo ResolveSpinButtonMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo ResolveSpinButtonMethod "getAllocatedSize" o = Gtk.Widget.WidgetGetAllocatedSizeMethodInfo ResolveSpinButtonMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo ResolveSpinButtonMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo ResolveSpinButtonMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo ResolveSpinButtonMethod "getAppPaintable" o = Gtk.Widget.WidgetGetAppPaintableMethodInfo ResolveSpinButtonMethod "getAttributes" o = Gtk.Entry.EntryGetAttributesMethodInfo ResolveSpinButtonMethod "getBuffer" o = Gtk.Entry.EntryGetBufferMethodInfo ResolveSpinButtonMethod "getCanDefault" o = Gtk.Widget.WidgetGetCanDefaultMethodInfo ResolveSpinButtonMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo ResolveSpinButtonMethod "getChars" o = Gtk.Editable.EditableGetCharsMethodInfo ResolveSpinButtonMethod "getChildRequisition" o = Gtk.Widget.WidgetGetChildRequisitionMethodInfo ResolveSpinButtonMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo ResolveSpinButtonMethod "getClip" o = Gtk.Widget.WidgetGetClipMethodInfo ResolveSpinButtonMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo ResolveSpinButtonMethod "getCompletion" o = Gtk.Entry.EntryGetCompletionMethodInfo ResolveSpinButtonMethod "getCompositeName" o = Gtk.Widget.WidgetGetCompositeNameMethodInfo ResolveSpinButtonMethod "getCurrentIconDragSource" o = Gtk.Entry.EntryGetCurrentIconDragSourceMethodInfo ResolveSpinButtonMethod "getCursorHadjustment" o = Gtk.Entry.EntryGetCursorHadjustmentMethodInfo ResolveSpinButtonMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo ResolveSpinButtonMethod "getDeviceEnabled" o = Gtk.Widget.WidgetGetDeviceEnabledMethodInfo ResolveSpinButtonMethod "getDeviceEvents" o = Gtk.Widget.WidgetGetDeviceEventsMethodInfo ResolveSpinButtonMethod "getDigits" o = SpinButtonGetDigitsMethodInfo ResolveSpinButtonMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo ResolveSpinButtonMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo ResolveSpinButtonMethod "getDoubleBuffered" o = Gtk.Widget.WidgetGetDoubleBufferedMethodInfo ResolveSpinButtonMethod "getEditable" o = Gtk.Editable.EditableGetEditableMethodInfo ResolveSpinButtonMethod "getEvents" o = Gtk.Widget.WidgetGetEventsMethodInfo ResolveSpinButtonMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo ResolveSpinButtonMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo ResolveSpinButtonMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo ResolveSpinButtonMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo ResolveSpinButtonMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo ResolveSpinButtonMethod "getHasFrame" o = Gtk.Entry.EntryGetHasFrameMethodInfo ResolveSpinButtonMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo ResolveSpinButtonMethod "getHasWindow" o = Gtk.Widget.WidgetGetHasWindowMethodInfo ResolveSpinButtonMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo ResolveSpinButtonMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo ResolveSpinButtonMethod "getIconActivatable" o = Gtk.Entry.EntryGetIconActivatableMethodInfo ResolveSpinButtonMethod "getIconArea" o = Gtk.Entry.EntryGetIconAreaMethodInfo ResolveSpinButtonMethod "getIconAtPos" o = Gtk.Entry.EntryGetIconAtPosMethodInfo ResolveSpinButtonMethod "getIconGicon" o = Gtk.Entry.EntryGetIconGiconMethodInfo ResolveSpinButtonMethod "getIconName" o = Gtk.Entry.EntryGetIconNameMethodInfo ResolveSpinButtonMethod "getIconPixbuf" o = Gtk.Entry.EntryGetIconPixbufMethodInfo ResolveSpinButtonMethod "getIconSensitive" o = Gtk.Entry.EntryGetIconSensitiveMethodInfo ResolveSpinButtonMethod "getIconStock" o = Gtk.Entry.EntryGetIconStockMethodInfo ResolveSpinButtonMethod "getIconStorageType" o = Gtk.Entry.EntryGetIconStorageTypeMethodInfo ResolveSpinButtonMethod "getIconTooltipMarkup" o = Gtk.Entry.EntryGetIconTooltipMarkupMethodInfo ResolveSpinButtonMethod "getIconTooltipText" o = Gtk.Entry.EntryGetIconTooltipTextMethodInfo ResolveSpinButtonMethod "getIncrements" o = SpinButtonGetIncrementsMethodInfo ResolveSpinButtonMethod "getInnerBorder" o = Gtk.Entry.EntryGetInnerBorderMethodInfo ResolveSpinButtonMethod "getInputHints" o = Gtk.Entry.EntryGetInputHintsMethodInfo ResolveSpinButtonMethod "getInputPurpose" o = Gtk.Entry.EntryGetInputPurposeMethodInfo ResolveSpinButtonMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo ResolveSpinButtonMethod "getInvisibleChar" o = Gtk.Entry.EntryGetInvisibleCharMethodInfo ResolveSpinButtonMethod "getLayout" o = Gtk.Entry.EntryGetLayoutMethodInfo ResolveSpinButtonMethod "getLayoutOffsets" o = Gtk.Entry.EntryGetLayoutOffsetsMethodInfo ResolveSpinButtonMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo ResolveSpinButtonMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo ResolveSpinButtonMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo ResolveSpinButtonMethod "getMarginLeft" o = Gtk.Widget.WidgetGetMarginLeftMethodInfo ResolveSpinButtonMethod "getMarginRight" o = Gtk.Widget.WidgetGetMarginRightMethodInfo ResolveSpinButtonMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo ResolveSpinButtonMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo ResolveSpinButtonMethod "getMaxLength" o = Gtk.Entry.EntryGetMaxLengthMethodInfo ResolveSpinButtonMethod "getMaxWidthChars" o = Gtk.Entry.EntryGetMaxWidthCharsMethodInfo ResolveSpinButtonMethod "getModifierMask" o = Gtk.Widget.WidgetGetModifierMaskMethodInfo ResolveSpinButtonMethod "getModifierStyle" o = Gtk.Widget.WidgetGetModifierStyleMethodInfo ResolveSpinButtonMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo ResolveSpinButtonMethod "getNoShowAll" o = Gtk.Widget.WidgetGetNoShowAllMethodInfo ResolveSpinButtonMethod "getNumeric" o = SpinButtonGetNumericMethodInfo ResolveSpinButtonMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo ResolveSpinButtonMethod "getOrientation" o = Gtk.Orientable.OrientableGetOrientationMethodInfo ResolveSpinButtonMethod "getOverwriteMode" o = Gtk.Entry.EntryGetOverwriteModeMethodInfo ResolveSpinButtonMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo ResolveSpinButtonMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo ResolveSpinButtonMethod "getParentWindow" o = Gtk.Widget.WidgetGetParentWindowMethodInfo ResolveSpinButtonMethod "getPath" o = Gtk.Widget.WidgetGetPathMethodInfo ResolveSpinButtonMethod "getPlaceholderText" o = Gtk.Entry.EntryGetPlaceholderTextMethodInfo ResolveSpinButtonMethod "getPointer" o = Gtk.Widget.WidgetGetPointerMethodInfo ResolveSpinButtonMethod "getPosition" o = Gtk.Editable.EditableGetPositionMethodInfo ResolveSpinButtonMethod "getPreferredHeight" o = Gtk.Widget.WidgetGetPreferredHeightMethodInfo ResolveSpinButtonMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.Widget.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo ResolveSpinButtonMethod "getPreferredHeightForWidth" o = Gtk.Widget.WidgetGetPreferredHeightForWidthMethodInfo ResolveSpinButtonMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo ResolveSpinButtonMethod "getPreferredWidth" o = Gtk.Widget.WidgetGetPreferredWidthMethodInfo ResolveSpinButtonMethod "getPreferredWidthForHeight" o = Gtk.Widget.WidgetGetPreferredWidthForHeightMethodInfo ResolveSpinButtonMethod "getProgressFraction" o = Gtk.Entry.EntryGetProgressFractionMethodInfo ResolveSpinButtonMethod "getProgressPulseStep" o = Gtk.Entry.EntryGetProgressPulseStepMethodInfo ResolveSpinButtonMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo ResolveSpinButtonMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo ResolveSpinButtonMethod "getRange" o = SpinButtonGetRangeMethodInfo ResolveSpinButtonMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo ResolveSpinButtonMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo ResolveSpinButtonMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo ResolveSpinButtonMethod "getRequisition" o = Gtk.Widget.WidgetGetRequisitionMethodInfo ResolveSpinButtonMethod "getRootWindow" o = Gtk.Widget.WidgetGetRootWindowMethodInfo ResolveSpinButtonMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo ResolveSpinButtonMethod "getScreen" o = Gtk.Widget.WidgetGetScreenMethodInfo ResolveSpinButtonMethod "getSelectionBounds" o = Gtk.Editable.EditableGetSelectionBoundsMethodInfo ResolveSpinButtonMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo ResolveSpinButtonMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo ResolveSpinButtonMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo ResolveSpinButtonMethod "getSnapToTicks" o = SpinButtonGetSnapToTicksMethodInfo ResolveSpinButtonMethod "getState" o = Gtk.Widget.WidgetGetStateMethodInfo ResolveSpinButtonMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo ResolveSpinButtonMethod "getStyle" o = Gtk.Widget.WidgetGetStyleMethodInfo ResolveSpinButtonMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo ResolveSpinButtonMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo ResolveSpinButtonMethod "getTabs" o = Gtk.Entry.EntryGetTabsMethodInfo ResolveSpinButtonMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo ResolveSpinButtonMethod "getText" o = Gtk.Entry.EntryGetTextMethodInfo ResolveSpinButtonMethod "getTextArea" o = Gtk.Entry.EntryGetTextAreaMethodInfo ResolveSpinButtonMethod "getTextLength" o = Gtk.Entry.EntryGetTextLengthMethodInfo ResolveSpinButtonMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo ResolveSpinButtonMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo ResolveSpinButtonMethod "getTooltipWindow" o = Gtk.Widget.WidgetGetTooltipWindowMethodInfo ResolveSpinButtonMethod "getToplevel" o = Gtk.Widget.WidgetGetToplevelMethodInfo ResolveSpinButtonMethod "getUpdatePolicy" o = SpinButtonGetUpdatePolicyMethodInfo ResolveSpinButtonMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo ResolveSpinButtonMethod "getValignWithBaseline" o = Gtk.Widget.WidgetGetValignWithBaselineMethodInfo ResolveSpinButtonMethod "getValue" o = SpinButtonGetValueMethodInfo ResolveSpinButtonMethod "getValueAsInt" o = SpinButtonGetValueAsIntMethodInfo ResolveSpinButtonMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo ResolveSpinButtonMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo ResolveSpinButtonMethod "getVisibility" o = Gtk.Entry.EntryGetVisibilityMethodInfo ResolveSpinButtonMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo ResolveSpinButtonMethod "getVisual" o = Gtk.Widget.WidgetGetVisualMethodInfo ResolveSpinButtonMethod "getWidthChars" o = Gtk.Entry.EntryGetWidthCharsMethodInfo ResolveSpinButtonMethod "getWindow" o = Gtk.Widget.WidgetGetWindowMethodInfo ResolveSpinButtonMethod "getWrap" o = SpinButtonGetWrapMethodInfo ResolveSpinButtonMethod "setAccelPath" o = Gtk.Widget.WidgetSetAccelPathMethodInfo ResolveSpinButtonMethod "setActivatesDefault" o = Gtk.Entry.EntrySetActivatesDefaultMethodInfo ResolveSpinButtonMethod "setAdjustment" o = SpinButtonSetAdjustmentMethodInfo ResolveSpinButtonMethod "setAlignment" o = Gtk.Entry.EntrySetAlignmentMethodInfo ResolveSpinButtonMethod "setAllocation" o = Gtk.Widget.WidgetSetAllocationMethodInfo ResolveSpinButtonMethod "setAppPaintable" o = Gtk.Widget.WidgetSetAppPaintableMethodInfo ResolveSpinButtonMethod "setAttributes" o = Gtk.Entry.EntrySetAttributesMethodInfo ResolveSpinButtonMethod "setBuffer" o = Gtk.Entry.EntrySetBufferMethodInfo ResolveSpinButtonMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo ResolveSpinButtonMethod "setCanDefault" o = Gtk.Widget.WidgetSetCanDefaultMethodInfo ResolveSpinButtonMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo ResolveSpinButtonMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo ResolveSpinButtonMethod "setClip" o = Gtk.Widget.WidgetSetClipMethodInfo ResolveSpinButtonMethod "setCompletion" o = Gtk.Entry.EntrySetCompletionMethodInfo ResolveSpinButtonMethod "setCompositeName" o = Gtk.Widget.WidgetSetCompositeNameMethodInfo ResolveSpinButtonMethod "setCursorHadjustment" o = Gtk.Entry.EntrySetCursorHadjustmentMethodInfo ResolveSpinButtonMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo ResolveSpinButtonMethod "setDeviceEnabled" o = Gtk.Widget.WidgetSetDeviceEnabledMethodInfo ResolveSpinButtonMethod "setDeviceEvents" o = Gtk.Widget.WidgetSetDeviceEventsMethodInfo ResolveSpinButtonMethod "setDigits" o = SpinButtonSetDigitsMethodInfo ResolveSpinButtonMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo ResolveSpinButtonMethod "setDoubleBuffered" o = Gtk.Widget.WidgetSetDoubleBufferedMethodInfo ResolveSpinButtonMethod "setEditable" o = Gtk.Editable.EditableSetEditableMethodInfo ResolveSpinButtonMethod "setEvents" o = Gtk.Widget.WidgetSetEventsMethodInfo ResolveSpinButtonMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo ResolveSpinButtonMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo ResolveSpinButtonMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo ResolveSpinButtonMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo ResolveSpinButtonMethod "setHasFrame" o = Gtk.Entry.EntrySetHasFrameMethodInfo ResolveSpinButtonMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo ResolveSpinButtonMethod "setHasWindow" o = Gtk.Widget.WidgetSetHasWindowMethodInfo ResolveSpinButtonMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo ResolveSpinButtonMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo ResolveSpinButtonMethod "setIconActivatable" o = Gtk.Entry.EntrySetIconActivatableMethodInfo ResolveSpinButtonMethod "setIconDragSource" o = Gtk.Entry.EntrySetIconDragSourceMethodInfo ResolveSpinButtonMethod "setIconFromGicon" o = Gtk.Entry.EntrySetIconFromGiconMethodInfo ResolveSpinButtonMethod "setIconFromIconName" o = Gtk.Entry.EntrySetIconFromIconNameMethodInfo ResolveSpinButtonMethod "setIconFromPixbuf" o = Gtk.Entry.EntrySetIconFromPixbufMethodInfo ResolveSpinButtonMethod "setIconFromStock" o = Gtk.Entry.EntrySetIconFromStockMethodInfo ResolveSpinButtonMethod "setIconSensitive" o = Gtk.Entry.EntrySetIconSensitiveMethodInfo ResolveSpinButtonMethod "setIconTooltipMarkup" o = Gtk.Entry.EntrySetIconTooltipMarkupMethodInfo ResolveSpinButtonMethod "setIconTooltipText" o = Gtk.Entry.EntrySetIconTooltipTextMethodInfo ResolveSpinButtonMethod "setIncrements" o = SpinButtonSetIncrementsMethodInfo ResolveSpinButtonMethod "setInnerBorder" o = Gtk.Entry.EntrySetInnerBorderMethodInfo ResolveSpinButtonMethod "setInputHints" o = Gtk.Entry.EntrySetInputHintsMethodInfo ResolveSpinButtonMethod "setInputPurpose" o = Gtk.Entry.EntrySetInputPurposeMethodInfo ResolveSpinButtonMethod "setInvisibleChar" o = Gtk.Entry.EntrySetInvisibleCharMethodInfo ResolveSpinButtonMethod "setMapped" o = Gtk.Widget.WidgetSetMappedMethodInfo ResolveSpinButtonMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo ResolveSpinButtonMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo ResolveSpinButtonMethod "setMarginLeft" o = Gtk.Widget.WidgetSetMarginLeftMethodInfo ResolveSpinButtonMethod "setMarginRight" o = Gtk.Widget.WidgetSetMarginRightMethodInfo ResolveSpinButtonMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo ResolveSpinButtonMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo ResolveSpinButtonMethod "setMaxLength" o = Gtk.Entry.EntrySetMaxLengthMethodInfo ResolveSpinButtonMethod "setMaxWidthChars" o = Gtk.Entry.EntrySetMaxWidthCharsMethodInfo ResolveSpinButtonMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo ResolveSpinButtonMethod "setNoShowAll" o = Gtk.Widget.WidgetSetNoShowAllMethodInfo ResolveSpinButtonMethod "setNumeric" o = SpinButtonSetNumericMethodInfo ResolveSpinButtonMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo ResolveSpinButtonMethod "setOrientation" o = Gtk.Orientable.OrientableSetOrientationMethodInfo ResolveSpinButtonMethod "setOverwriteMode" o = Gtk.Entry.EntrySetOverwriteModeMethodInfo ResolveSpinButtonMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo ResolveSpinButtonMethod "setParentWindow" o = Gtk.Widget.WidgetSetParentWindowMethodInfo ResolveSpinButtonMethod "setPlaceholderText" o = Gtk.Entry.EntrySetPlaceholderTextMethodInfo ResolveSpinButtonMethod "setPosition" o = Gtk.Editable.EditableSetPositionMethodInfo ResolveSpinButtonMethod "setProgressFraction" o = Gtk.Entry.EntrySetProgressFractionMethodInfo ResolveSpinButtonMethod "setProgressPulseStep" o = Gtk.Entry.EntrySetProgressPulseStepMethodInfo ResolveSpinButtonMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo ResolveSpinButtonMethod "setRange" o = SpinButtonSetRangeMethodInfo ResolveSpinButtonMethod "setRealized" o = Gtk.Widget.WidgetSetRealizedMethodInfo ResolveSpinButtonMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo ResolveSpinButtonMethod "setRedrawOnAllocate" o = Gtk.Widget.WidgetSetRedrawOnAllocateMethodInfo ResolveSpinButtonMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo ResolveSpinButtonMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo ResolveSpinButtonMethod "setSnapToTicks" o = SpinButtonSetSnapToTicksMethodInfo ResolveSpinButtonMethod "setState" o = Gtk.Widget.WidgetSetStateMethodInfo ResolveSpinButtonMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo ResolveSpinButtonMethod "setStyle" o = Gtk.Widget.WidgetSetStyleMethodInfo ResolveSpinButtonMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo ResolveSpinButtonMethod "setTabs" o = Gtk.Entry.EntrySetTabsMethodInfo ResolveSpinButtonMethod "setText" o = Gtk.Entry.EntrySetTextMethodInfo ResolveSpinButtonMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo ResolveSpinButtonMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo ResolveSpinButtonMethod "setTooltipWindow" o = Gtk.Widget.WidgetSetTooltipWindowMethodInfo ResolveSpinButtonMethod "setUpdatePolicy" o = SpinButtonSetUpdatePolicyMethodInfo ResolveSpinButtonMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo ResolveSpinButtonMethod "setValue" o = SpinButtonSetValueMethodInfo ResolveSpinButtonMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo ResolveSpinButtonMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo ResolveSpinButtonMethod "setVisibility" o = Gtk.Entry.EntrySetVisibilityMethodInfo ResolveSpinButtonMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo ResolveSpinButtonMethod "setVisual" o = Gtk.Widget.WidgetSetVisualMethodInfo ResolveSpinButtonMethod "setWidthChars" o = Gtk.Entry.EntrySetWidthCharsMethodInfo ResolveSpinButtonMethod "setWindow" o = Gtk.Widget.WidgetSetWindowMethodInfo ResolveSpinButtonMethod "setWrap" o = SpinButtonSetWrapMethodInfo ResolveSpinButtonMethod l o = O.MethodResolutionFailed l o instance (info ~ ResolveSpinButtonMethod t SpinButton, O.MethodInfo info SpinButton p) => OL.IsLabel t (SpinButton -> p) where #if MIN_VERSION_base(4,10,0) fromLabel = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info) #else fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info) #endif #endif -- signal SpinButton::change-value {- | The ::change-value signal is a [keybinding signal][GtkBindingSignal] which gets emitted when the user initiates a value change. Applications should not connect to it, but may emit it with @/g_signal_emit_by_name()/@ if they need to control the cursor programmatically. The default bindings for this signal are Up\/Down and PageUp and\/PageDown. -} type SpinButtonChangeValueCallback = Gtk.Enums.ScrollType {- ^ /@scroll@/: a 'GI.Gtk.Enums.ScrollType' to specify the speed and amount of change -} -> IO () -- | A convenience synonym for @`Nothing` :: `Maybe` `SpinButtonChangeValueCallback`@. noSpinButtonChangeValueCallback :: Maybe SpinButtonChangeValueCallback noSpinButtonChangeValueCallback = Nothing -- | Type for the callback on the (unwrapped) C side. type C_SpinButtonChangeValueCallback = Ptr () -> -- object CUInt -> Ptr () -> -- user_data IO () -- | Generate a function pointer callable from C code, from a `C_SpinButtonChangeValueCallback`. foreign import ccall "wrapper" mk_SpinButtonChangeValueCallback :: C_SpinButtonChangeValueCallback -> IO (FunPtr C_SpinButtonChangeValueCallback) -- | Wrap the callback into a `GClosure`. genClosure_SpinButtonChangeValue :: MonadIO m => SpinButtonChangeValueCallback -> m (GClosure C_SpinButtonChangeValueCallback) genClosure_SpinButtonChangeValue cb = liftIO $ do let cb' = wrap_SpinButtonChangeValueCallback cb mk_SpinButtonChangeValueCallback cb' >>= B.GClosure.newGClosure -- | Wrap a `SpinButtonChangeValueCallback` into a `C_SpinButtonChangeValueCallback`. wrap_SpinButtonChangeValueCallback :: SpinButtonChangeValueCallback -> C_SpinButtonChangeValueCallback wrap_SpinButtonChangeValueCallback _cb _ scroll _ = do let scroll' = (toEnum . fromIntegral) scroll _cb scroll' {- | Connect a signal handler for the “@change-value@” signal, to be run before the default handler. When is enabled, this is equivalent to @ 'Data.GI.Base.Signals.on' spinButton #changeValue callback @ -} onSpinButtonChangeValue :: (IsSpinButton a, MonadIO m) => a -> SpinButtonChangeValueCallback -> m SignalHandlerId onSpinButtonChangeValue obj cb = liftIO $ do let cb' = wrap_SpinButtonChangeValueCallback cb cb'' <- mk_SpinButtonChangeValueCallback cb' connectSignalFunPtr obj "change-value" cb'' SignalConnectBefore {- | Connect a signal handler for the “@change-value@” signal, to be run after the default handler. When is enabled, this is equivalent to @ 'Data.GI.Base.Signals.after' spinButton #changeValue callback @ -} afterSpinButtonChangeValue :: (IsSpinButton a, MonadIO m) => a -> SpinButtonChangeValueCallback -> m SignalHandlerId afterSpinButtonChangeValue obj cb = liftIO $ do let cb' = wrap_SpinButtonChangeValueCallback cb cb'' <- mk_SpinButtonChangeValueCallback cb' connectSignalFunPtr obj "change-value" cb'' SignalConnectAfter -- signal SpinButton::input {- | The ::input signal can be used to influence the conversion of the users input into a double value. The signal handler is expected to use 'GI.Gtk.Objects.Entry.entryGetText' to retrieve the text of the entry and set /@newValue@/ to the new value. The default conversion uses 'GI.GLib.Functions.strtod'. -} type SpinButtonInputCallback = IO ((Int32, Double)) {- ^ __Returns:__ 'True' for a successful conversion, 'False' if the input was not handled, and 'GI.Gtk.Constants.INPUT_ERROR' if the conversion failed. -} -- | A convenience synonym for @`Nothing` :: `Maybe` `SpinButtonInputCallback`@. noSpinButtonInputCallback :: Maybe SpinButtonInputCallback noSpinButtonInputCallback = Nothing -- | Type for the callback on the (unwrapped) C side. type C_SpinButtonInputCallback = Ptr () -> -- object Ptr CDouble -> Ptr () -> -- user_data IO Int32 -- | Generate a function pointer callable from C code, from a `C_SpinButtonInputCallback`. foreign import ccall "wrapper" mk_SpinButtonInputCallback :: C_SpinButtonInputCallback -> IO (FunPtr C_SpinButtonInputCallback) -- | Wrap the callback into a `GClosure`. genClosure_SpinButtonInput :: MonadIO m => SpinButtonInputCallback -> m (GClosure C_SpinButtonInputCallback) genClosure_SpinButtonInput cb = liftIO $ do let cb' = wrap_SpinButtonInputCallback cb mk_SpinButtonInputCallback cb' >>= B.GClosure.newGClosure -- | Wrap a `SpinButtonInputCallback` into a `C_SpinButtonInputCallback`. wrap_SpinButtonInputCallback :: SpinButtonInputCallback -> C_SpinButtonInputCallback wrap_SpinButtonInputCallback _cb _ newValue _ = do (result, outnewValue) <- _cb let outnewValue' = realToFrac outnewValue poke newValue outnewValue' return result {- | Connect a signal handler for the “@input@” signal, to be run before the default handler. When is enabled, this is equivalent to @ 'Data.GI.Base.Signals.on' spinButton #input callback @ -} onSpinButtonInput :: (IsSpinButton a, MonadIO m) => a -> SpinButtonInputCallback -> m SignalHandlerId onSpinButtonInput obj cb = liftIO $ do let cb' = wrap_SpinButtonInputCallback cb cb'' <- mk_SpinButtonInputCallback cb' connectSignalFunPtr obj "input" cb'' SignalConnectBefore {- | Connect a signal handler for the “@input@” signal, to be run after the default handler. When is enabled, this is equivalent to @ 'Data.GI.Base.Signals.after' spinButton #input callback @ -} afterSpinButtonInput :: (IsSpinButton a, MonadIO m) => a -> SpinButtonInputCallback -> m SignalHandlerId afterSpinButtonInput obj cb = liftIO $ do let cb' = wrap_SpinButtonInputCallback cb cb'' <- mk_SpinButtonInputCallback cb' connectSignalFunPtr obj "input" cb'' SignalConnectAfter -- signal SpinButton::output {- | The ::output signal can be used to change to formatting of the value that is displayed in the spin buttons entry. === /C code/ > >// show leading zeros >static gboolean >on_output (GtkSpinButton *spin, > gpointer data) >{ > GtkAdjustment *adjustment; > gchar *text; > int value; > > adjustment = gtk_spin_button_get_adjustment (spin); > value = (int)gtk_adjustment_get_value (adjustment); > text = g_strdup_printf ("%02d", value); > gtk_entry_set_text (GTK_ENTRY (spin), text); > g_free (text); > > return TRUE; >} -} type SpinButtonOutputCallback = IO Bool {- ^ __Returns:__ 'True' if the value has been displayed -} -- | A convenience synonym for @`Nothing` :: `Maybe` `SpinButtonOutputCallback`@. noSpinButtonOutputCallback :: Maybe SpinButtonOutputCallback noSpinButtonOutputCallback = Nothing -- | Type for the callback on the (unwrapped) C side. type C_SpinButtonOutputCallback = Ptr () -> -- object Ptr () -> -- user_data IO CInt -- | Generate a function pointer callable from C code, from a `C_SpinButtonOutputCallback`. foreign import ccall "wrapper" mk_SpinButtonOutputCallback :: C_SpinButtonOutputCallback -> IO (FunPtr C_SpinButtonOutputCallback) -- | Wrap the callback into a `GClosure`. genClosure_SpinButtonOutput :: MonadIO m => SpinButtonOutputCallback -> m (GClosure C_SpinButtonOutputCallback) genClosure_SpinButtonOutput cb = liftIO $ do let cb' = wrap_SpinButtonOutputCallback cb mk_SpinButtonOutputCallback cb' >>= B.GClosure.newGClosure -- | Wrap a `SpinButtonOutputCallback` into a `C_SpinButtonOutputCallback`. wrap_SpinButtonOutputCallback :: SpinButtonOutputCallback -> C_SpinButtonOutputCallback wrap_SpinButtonOutputCallback _cb _ _ = do result <- _cb let result' = (fromIntegral . fromEnum) result return result' {- | Connect a signal handler for the “@output@” signal, to be run before the default handler. When is enabled, this is equivalent to @ 'Data.GI.Base.Signals.on' spinButton #output callback @ -} onSpinButtonOutput :: (IsSpinButton a, MonadIO m) => a -> SpinButtonOutputCallback -> m SignalHandlerId onSpinButtonOutput obj cb = liftIO $ do let cb' = wrap_SpinButtonOutputCallback cb cb'' <- mk_SpinButtonOutputCallback cb' connectSignalFunPtr obj "output" cb'' SignalConnectBefore {- | Connect a signal handler for the “@output@” signal, to be run after the default handler. When is enabled, this is equivalent to @ 'Data.GI.Base.Signals.after' spinButton #output callback @ -} afterSpinButtonOutput :: (IsSpinButton a, MonadIO m) => a -> SpinButtonOutputCallback -> m SignalHandlerId afterSpinButtonOutput obj cb = liftIO $ do let cb' = wrap_SpinButtonOutputCallback cb cb'' <- mk_SpinButtonOutputCallback cb' connectSignalFunPtr obj "output" cb'' SignalConnectAfter -- signal SpinButton::value-changed {- | The ::value-changed signal is emitted when the value represented by /@spinbutton@/ changes. Also see the 'GI.Gtk.Objects.SpinButton.SpinButton'::@/output/@ signal. -} type SpinButtonValueChangedCallback = IO () -- | A convenience synonym for @`Nothing` :: `Maybe` `SpinButtonValueChangedCallback`@. noSpinButtonValueChangedCallback :: Maybe SpinButtonValueChangedCallback noSpinButtonValueChangedCallback = Nothing -- | Type for the callback on the (unwrapped) C side. type C_SpinButtonValueChangedCallback = Ptr () -> -- object Ptr () -> -- user_data IO () -- | Generate a function pointer callable from C code, from a `C_SpinButtonValueChangedCallback`. foreign import ccall "wrapper" mk_SpinButtonValueChangedCallback :: C_SpinButtonValueChangedCallback -> IO (FunPtr C_SpinButtonValueChangedCallback) -- | Wrap the callback into a `GClosure`. genClosure_SpinButtonValueChanged :: MonadIO m => SpinButtonValueChangedCallback -> m (GClosure C_SpinButtonValueChangedCallback) genClosure_SpinButtonValueChanged cb = liftIO $ do let cb' = wrap_SpinButtonValueChangedCallback cb mk_SpinButtonValueChangedCallback cb' >>= B.GClosure.newGClosure -- | Wrap a `SpinButtonValueChangedCallback` into a `C_SpinButtonValueChangedCallback`. wrap_SpinButtonValueChangedCallback :: SpinButtonValueChangedCallback -> C_SpinButtonValueChangedCallback wrap_SpinButtonValueChangedCallback _cb _ _ = do _cb {- | Connect a signal handler for the “@value-changed@” signal, to be run before the default handler. When is enabled, this is equivalent to @ 'Data.GI.Base.Signals.on' spinButton #valueChanged callback @ -} onSpinButtonValueChanged :: (IsSpinButton a, MonadIO m) => a -> SpinButtonValueChangedCallback -> m SignalHandlerId onSpinButtonValueChanged obj cb = liftIO $ do let cb' = wrap_SpinButtonValueChangedCallback cb cb'' <- mk_SpinButtonValueChangedCallback cb' connectSignalFunPtr obj "value-changed" cb'' SignalConnectBefore {- | Connect a signal handler for the “@value-changed@” signal, to be run after the default handler. When is enabled, this is equivalent to @ 'Data.GI.Base.Signals.after' spinButton #valueChanged callback @ -} afterSpinButtonValueChanged :: (IsSpinButton a, MonadIO m) => a -> SpinButtonValueChangedCallback -> m SignalHandlerId afterSpinButtonValueChanged obj cb = liftIO $ do let cb' = wrap_SpinButtonValueChangedCallback cb cb'' <- mk_SpinButtonValueChangedCallback cb' connectSignalFunPtr obj "value-changed" cb'' SignalConnectAfter -- signal SpinButton::wrapped {- | The ::wrapped signal is emitted right after the spinbutton wraps from its maximum to minimum value or vice-versa. /Since: 2.10/ -} type SpinButtonWrappedCallback = IO () -- | A convenience synonym for @`Nothing` :: `Maybe` `SpinButtonWrappedCallback`@. noSpinButtonWrappedCallback :: Maybe SpinButtonWrappedCallback noSpinButtonWrappedCallback = Nothing -- | Type for the callback on the (unwrapped) C side. type C_SpinButtonWrappedCallback = Ptr () -> -- object Ptr () -> -- user_data IO () -- | Generate a function pointer callable from C code, from a `C_SpinButtonWrappedCallback`. foreign import ccall "wrapper" mk_SpinButtonWrappedCallback :: C_SpinButtonWrappedCallback -> IO (FunPtr C_SpinButtonWrappedCallback) -- | Wrap the callback into a `GClosure`. genClosure_SpinButtonWrapped :: MonadIO m => SpinButtonWrappedCallback -> m (GClosure C_SpinButtonWrappedCallback) genClosure_SpinButtonWrapped cb = liftIO $ do let cb' = wrap_SpinButtonWrappedCallback cb mk_SpinButtonWrappedCallback cb' >>= B.GClosure.newGClosure -- | Wrap a `SpinButtonWrappedCallback` into a `C_SpinButtonWrappedCallback`. wrap_SpinButtonWrappedCallback :: SpinButtonWrappedCallback -> C_SpinButtonWrappedCallback wrap_SpinButtonWrappedCallback _cb _ _ = do _cb {- | Connect a signal handler for the “@wrapped@” signal, to be run before the default handler. When is enabled, this is equivalent to @ 'Data.GI.Base.Signals.on' spinButton #wrapped callback @ -} onSpinButtonWrapped :: (IsSpinButton a, MonadIO m) => a -> SpinButtonWrappedCallback -> m SignalHandlerId onSpinButtonWrapped obj cb = liftIO $ do let cb' = wrap_SpinButtonWrappedCallback cb cb'' <- mk_SpinButtonWrappedCallback cb' connectSignalFunPtr obj "wrapped" cb'' SignalConnectBefore {- | Connect a signal handler for the “@wrapped@” signal, to be run after the default handler. When is enabled, this is equivalent to @ 'Data.GI.Base.Signals.after' spinButton #wrapped callback @ -} afterSpinButtonWrapped :: (IsSpinButton a, MonadIO m) => a -> SpinButtonWrappedCallback -> m SignalHandlerId afterSpinButtonWrapped obj cb = liftIO $ do let cb' = wrap_SpinButtonWrappedCallback cb cb'' <- mk_SpinButtonWrappedCallback cb' connectSignalFunPtr obj "wrapped" cb'' SignalConnectAfter -- VVV Prop "adjustment" -- Type: TInterface (Name {namespace = "Gtk", name = "Adjustment"}) -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Just False) {- | Get the value of the “@adjustment@” property. When is enabled, this is equivalent to @ 'Data.GI.Base.Attributes.get' spinButton #adjustment @ -} getSpinButtonAdjustment :: (MonadIO m, IsSpinButton o) => o -> m Gtk.Adjustment.Adjustment getSpinButtonAdjustment obj = liftIO $ checkUnexpectedNothing "getSpinButtonAdjustment" $ B.Properties.getObjectPropertyObject obj "adjustment" Gtk.Adjustment.Adjustment {- | Set the value of the “@adjustment@” property. When is enabled, this is equivalent to @ 'Data.GI.Base.Attributes.set' spinButton [ #adjustment 'Data.GI.Base.Attributes.:=' value ] @ -} setSpinButtonAdjustment :: (MonadIO m, IsSpinButton o, Gtk.Adjustment.IsAdjustment a) => o -> a -> m () setSpinButtonAdjustment obj val = liftIO $ B.Properties.setObjectPropertyObject obj "adjustment" (Just val) {- | Construct a `GValueConstruct` with valid value for the “@adjustment@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`. -} constructSpinButtonAdjustment :: (IsSpinButton o, Gtk.Adjustment.IsAdjustment a) => a -> IO (GValueConstruct o) constructSpinButtonAdjustment val = B.Properties.constructObjectPropertyObject "adjustment" (Just val) #if ENABLE_OVERLOADING data SpinButtonAdjustmentPropertyInfo instance AttrInfo SpinButtonAdjustmentPropertyInfo where type AttrAllowedOps SpinButtonAdjustmentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint SpinButtonAdjustmentPropertyInfo = Gtk.Adjustment.IsAdjustment type AttrBaseTypeConstraint SpinButtonAdjustmentPropertyInfo = IsSpinButton type AttrGetType SpinButtonAdjustmentPropertyInfo = Gtk.Adjustment.Adjustment type AttrLabel SpinButtonAdjustmentPropertyInfo = "adjustment" type AttrOrigin SpinButtonAdjustmentPropertyInfo = SpinButton attrGet _ = getSpinButtonAdjustment attrSet _ = setSpinButtonAdjustment attrConstruct _ = constructSpinButtonAdjustment attrClear _ = undefined #endif -- VVV Prop "climb-rate" -- Type: TBasicType TDouble -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Nothing,Nothing) {- | Get the value of the “@climb-rate@” property. When is enabled, this is equivalent to @ 'Data.GI.Base.Attributes.get' spinButton #climbRate @ -} getSpinButtonClimbRate :: (MonadIO m, IsSpinButton o) => o -> m Double getSpinButtonClimbRate obj = liftIO $ B.Properties.getObjectPropertyDouble obj "climb-rate" {- | Set the value of the “@climb-rate@” property. When is enabled, this is equivalent to @ 'Data.GI.Base.Attributes.set' spinButton [ #climbRate 'Data.GI.Base.Attributes.:=' value ] @ -} setSpinButtonClimbRate :: (MonadIO m, IsSpinButton o) => o -> Double -> m () setSpinButtonClimbRate obj val = liftIO $ B.Properties.setObjectPropertyDouble obj "climb-rate" val {- | Construct a `GValueConstruct` with valid value for the “@climb-rate@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`. -} constructSpinButtonClimbRate :: (IsSpinButton o) => Double -> IO (GValueConstruct o) constructSpinButtonClimbRate val = B.Properties.constructObjectPropertyDouble "climb-rate" val #if ENABLE_OVERLOADING data SpinButtonClimbRatePropertyInfo instance AttrInfo SpinButtonClimbRatePropertyInfo where type AttrAllowedOps SpinButtonClimbRatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint SpinButtonClimbRatePropertyInfo = (~) Double type AttrBaseTypeConstraint SpinButtonClimbRatePropertyInfo = IsSpinButton type AttrGetType SpinButtonClimbRatePropertyInfo = Double type AttrLabel SpinButtonClimbRatePropertyInfo = "climb-rate" type AttrOrigin SpinButtonClimbRatePropertyInfo = SpinButton attrGet _ = getSpinButtonClimbRate attrSet _ = setSpinButtonClimbRate attrConstruct _ = constructSpinButtonClimbRate attrClear _ = undefined #endif -- VVV Prop "digits" -- Type: TBasicType TUInt -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Just False) {- | Get the value of the “@digits@” property. When is enabled, this is equivalent to @ 'Data.GI.Base.Attributes.get' spinButton #digits @ -} getSpinButtonDigits :: (MonadIO m, IsSpinButton o) => o -> m Word32 getSpinButtonDigits obj = liftIO $ B.Properties.getObjectPropertyUInt32 obj "digits" {- | Set the value of the “@digits@” property. When is enabled, this is equivalent to @ 'Data.GI.Base.Attributes.set' spinButton [ #digits 'Data.GI.Base.Attributes.:=' value ] @ -} setSpinButtonDigits :: (MonadIO m, IsSpinButton o) => o -> Word32 -> m () setSpinButtonDigits obj val = liftIO $ B.Properties.setObjectPropertyUInt32 obj "digits" val {- | Construct a `GValueConstruct` with valid value for the “@digits@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`. -} constructSpinButtonDigits :: (IsSpinButton o) => Word32 -> IO (GValueConstruct o) constructSpinButtonDigits val = B.Properties.constructObjectPropertyUInt32 "digits" val #if ENABLE_OVERLOADING data SpinButtonDigitsPropertyInfo instance AttrInfo SpinButtonDigitsPropertyInfo where type AttrAllowedOps SpinButtonDigitsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint SpinButtonDigitsPropertyInfo = (~) Word32 type AttrBaseTypeConstraint SpinButtonDigitsPropertyInfo = IsSpinButton type AttrGetType SpinButtonDigitsPropertyInfo = Word32 type AttrLabel SpinButtonDigitsPropertyInfo = "digits" type AttrOrigin SpinButtonDigitsPropertyInfo = SpinButton attrGet _ = getSpinButtonDigits attrSet _ = setSpinButtonDigits attrConstruct _ = constructSpinButtonDigits attrClear _ = undefined #endif -- VVV Prop "numeric" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Just False) {- | Get the value of the “@numeric@” property. When is enabled, this is equivalent to @ 'Data.GI.Base.Attributes.get' spinButton #numeric @ -} getSpinButtonNumeric :: (MonadIO m, IsSpinButton o) => o -> m Bool getSpinButtonNumeric obj = liftIO $ B.Properties.getObjectPropertyBool obj "numeric" {- | Set the value of the “@numeric@” property. When is enabled, this is equivalent to @ 'Data.GI.Base.Attributes.set' spinButton [ #numeric 'Data.GI.Base.Attributes.:=' value ] @ -} setSpinButtonNumeric :: (MonadIO m, IsSpinButton o) => o -> Bool -> m () setSpinButtonNumeric obj val = liftIO $ B.Properties.setObjectPropertyBool obj "numeric" val {- | Construct a `GValueConstruct` with valid value for the “@numeric@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`. -} constructSpinButtonNumeric :: (IsSpinButton o) => Bool -> IO (GValueConstruct o) constructSpinButtonNumeric val = B.Properties.constructObjectPropertyBool "numeric" val #if ENABLE_OVERLOADING data SpinButtonNumericPropertyInfo instance AttrInfo SpinButtonNumericPropertyInfo where type AttrAllowedOps SpinButtonNumericPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint SpinButtonNumericPropertyInfo = (~) Bool type AttrBaseTypeConstraint SpinButtonNumericPropertyInfo = IsSpinButton type AttrGetType SpinButtonNumericPropertyInfo = Bool type AttrLabel SpinButtonNumericPropertyInfo = "numeric" type AttrOrigin SpinButtonNumericPropertyInfo = SpinButton attrGet _ = getSpinButtonNumeric attrSet _ = setSpinButtonNumeric attrConstruct _ = constructSpinButtonNumeric attrClear _ = undefined #endif -- VVV Prop "snap-to-ticks" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Just False) {- | Get the value of the “@snap-to-ticks@” property. When is enabled, this is equivalent to @ 'Data.GI.Base.Attributes.get' spinButton #snapToTicks @ -} getSpinButtonSnapToTicks :: (MonadIO m, IsSpinButton o) => o -> m Bool getSpinButtonSnapToTicks obj = liftIO $ B.Properties.getObjectPropertyBool obj "snap-to-ticks" {- | Set the value of the “@snap-to-ticks@” property. When is enabled, this is equivalent to @ 'Data.GI.Base.Attributes.set' spinButton [ #snapToTicks 'Data.GI.Base.Attributes.:=' value ] @ -} setSpinButtonSnapToTicks :: (MonadIO m, IsSpinButton o) => o -> Bool -> m () setSpinButtonSnapToTicks obj val = liftIO $ B.Properties.setObjectPropertyBool obj "snap-to-ticks" val {- | Construct a `GValueConstruct` with valid value for the “@snap-to-ticks@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`. -} constructSpinButtonSnapToTicks :: (IsSpinButton o) => Bool -> IO (GValueConstruct o) constructSpinButtonSnapToTicks val = B.Properties.constructObjectPropertyBool "snap-to-ticks" val #if ENABLE_OVERLOADING data SpinButtonSnapToTicksPropertyInfo instance AttrInfo SpinButtonSnapToTicksPropertyInfo where type AttrAllowedOps SpinButtonSnapToTicksPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint SpinButtonSnapToTicksPropertyInfo = (~) Bool type AttrBaseTypeConstraint SpinButtonSnapToTicksPropertyInfo = IsSpinButton type AttrGetType SpinButtonSnapToTicksPropertyInfo = Bool type AttrLabel SpinButtonSnapToTicksPropertyInfo = "snap-to-ticks" type AttrOrigin SpinButtonSnapToTicksPropertyInfo = SpinButton attrGet _ = getSpinButtonSnapToTicks attrSet _ = setSpinButtonSnapToTicks attrConstruct _ = constructSpinButtonSnapToTicks attrClear _ = undefined #endif -- VVV Prop "update-policy" -- Type: TInterface (Name {namespace = "Gtk", name = "SpinButtonUpdatePolicy"}) -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Just False) {- | Get the value of the “@update-policy@” property. When is enabled, this is equivalent to @ 'Data.GI.Base.Attributes.get' spinButton #updatePolicy @ -} getSpinButtonUpdatePolicy :: (MonadIO m, IsSpinButton o) => o -> m Gtk.Enums.SpinButtonUpdatePolicy getSpinButtonUpdatePolicy obj = liftIO $ B.Properties.getObjectPropertyEnum obj "update-policy" {- | Set the value of the “@update-policy@” property. When is enabled, this is equivalent to @ 'Data.GI.Base.Attributes.set' spinButton [ #updatePolicy 'Data.GI.Base.Attributes.:=' value ] @ -} setSpinButtonUpdatePolicy :: (MonadIO m, IsSpinButton o) => o -> Gtk.Enums.SpinButtonUpdatePolicy -> m () setSpinButtonUpdatePolicy obj val = liftIO $ B.Properties.setObjectPropertyEnum obj "update-policy" val {- | Construct a `GValueConstruct` with valid value for the “@update-policy@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`. -} constructSpinButtonUpdatePolicy :: (IsSpinButton o) => Gtk.Enums.SpinButtonUpdatePolicy -> IO (GValueConstruct o) constructSpinButtonUpdatePolicy val = B.Properties.constructObjectPropertyEnum "update-policy" val #if ENABLE_OVERLOADING data SpinButtonUpdatePolicyPropertyInfo instance AttrInfo SpinButtonUpdatePolicyPropertyInfo where type AttrAllowedOps SpinButtonUpdatePolicyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint SpinButtonUpdatePolicyPropertyInfo = (~) Gtk.Enums.SpinButtonUpdatePolicy type AttrBaseTypeConstraint SpinButtonUpdatePolicyPropertyInfo = IsSpinButton type AttrGetType SpinButtonUpdatePolicyPropertyInfo = Gtk.Enums.SpinButtonUpdatePolicy type AttrLabel SpinButtonUpdatePolicyPropertyInfo = "update-policy" type AttrOrigin SpinButtonUpdatePolicyPropertyInfo = SpinButton attrGet _ = getSpinButtonUpdatePolicy attrSet _ = setSpinButtonUpdatePolicy attrConstruct _ = constructSpinButtonUpdatePolicy attrClear _ = undefined #endif -- VVV Prop "value" -- Type: TBasicType TDouble -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Just False) {- | Get the value of the “@value@” property. When is enabled, this is equivalent to @ 'Data.GI.Base.Attributes.get' spinButton #value @ -} getSpinButtonValue :: (MonadIO m, IsSpinButton o) => o -> m Double getSpinButtonValue obj = liftIO $ B.Properties.getObjectPropertyDouble obj "value" {- | Set the value of the “@value@” property. When is enabled, this is equivalent to @ 'Data.GI.Base.Attributes.set' spinButton [ #value 'Data.GI.Base.Attributes.:=' value ] @ -} setSpinButtonValue :: (MonadIO m, IsSpinButton o) => o -> Double -> m () setSpinButtonValue obj val = liftIO $ B.Properties.setObjectPropertyDouble obj "value" val {- | Construct a `GValueConstruct` with valid value for the “@value@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`. -} constructSpinButtonValue :: (IsSpinButton o) => Double -> IO (GValueConstruct o) constructSpinButtonValue val = B.Properties.constructObjectPropertyDouble "value" val #if ENABLE_OVERLOADING data SpinButtonValuePropertyInfo instance AttrInfo SpinButtonValuePropertyInfo where type AttrAllowedOps SpinButtonValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint SpinButtonValuePropertyInfo = (~) Double type AttrBaseTypeConstraint SpinButtonValuePropertyInfo = IsSpinButton type AttrGetType SpinButtonValuePropertyInfo = Double type AttrLabel SpinButtonValuePropertyInfo = "value" type AttrOrigin SpinButtonValuePropertyInfo = SpinButton attrGet _ = getSpinButtonValue attrSet _ = setSpinButtonValue attrConstruct _ = constructSpinButtonValue attrClear _ = undefined #endif -- VVV Prop "wrap" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Just False) {- | Get the value of the “@wrap@” property. When is enabled, this is equivalent to @ 'Data.GI.Base.Attributes.get' spinButton #wrap @ -} getSpinButtonWrap :: (MonadIO m, IsSpinButton o) => o -> m Bool getSpinButtonWrap obj = liftIO $ B.Properties.getObjectPropertyBool obj "wrap" {- | Set the value of the “@wrap@” property. When is enabled, this is equivalent to @ 'Data.GI.Base.Attributes.set' spinButton [ #wrap 'Data.GI.Base.Attributes.:=' value ] @ -} setSpinButtonWrap :: (MonadIO m, IsSpinButton o) => o -> Bool -> m () setSpinButtonWrap obj val = liftIO $ B.Properties.setObjectPropertyBool obj "wrap" val {- | Construct a `GValueConstruct` with valid value for the “@wrap@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`. -} constructSpinButtonWrap :: (IsSpinButton o) => Bool -> IO (GValueConstruct o) constructSpinButtonWrap val = B.Properties.constructObjectPropertyBool "wrap" val #if ENABLE_OVERLOADING data SpinButtonWrapPropertyInfo instance AttrInfo SpinButtonWrapPropertyInfo where type AttrAllowedOps SpinButtonWrapPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint SpinButtonWrapPropertyInfo = (~) Bool type AttrBaseTypeConstraint SpinButtonWrapPropertyInfo = IsSpinButton type AttrGetType SpinButtonWrapPropertyInfo = Bool type AttrLabel SpinButtonWrapPropertyInfo = "wrap" type AttrOrigin SpinButtonWrapPropertyInfo = SpinButton attrGet _ = getSpinButtonWrap attrSet _ = setSpinButtonWrap attrConstruct _ = constructSpinButtonWrap attrClear _ = undefined #endif #if ENABLE_OVERLOADING instance O.HasAttributeList SpinButton type instance O.AttributeList SpinButton = SpinButtonAttributeList type SpinButtonAttributeList = ('[ '("activatesDefault", Gtk.Entry.EntryActivatesDefaultPropertyInfo), '("adjustment", SpinButtonAdjustmentPropertyInfo), '("appPaintable", Gtk.Widget.WidgetAppPaintablePropertyInfo), '("attributes", Gtk.Entry.EntryAttributesPropertyInfo), '("buffer", Gtk.Entry.EntryBufferPropertyInfo), '("canDefault", Gtk.Widget.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("capsLockWarning", Gtk.Entry.EntryCapsLockWarningPropertyInfo), '("climbRate", SpinButtonClimbRatePropertyInfo), '("completion", Gtk.Entry.EntryCompletionPropertyInfo), '("compositeChild", Gtk.Widget.WidgetCompositeChildPropertyInfo), '("cursorPosition", Gtk.Entry.EntryCursorPositionPropertyInfo), '("digits", SpinButtonDigitsPropertyInfo), '("doubleBuffered", Gtk.Widget.WidgetDoubleBufferedPropertyInfo), '("editable", Gtk.Entry.EntryEditablePropertyInfo), '("editingCanceled", Gtk.CellEditable.CellEditableEditingCanceledPropertyInfo), '("enableEmojiCompletion", Gtk.Entry.EntryEnableEmojiCompletionPropertyInfo), '("events", Gtk.Widget.WidgetEventsPropertyInfo), '("expand", Gtk.Widget.WidgetExpandPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasFrame", Gtk.Entry.EntryHasFramePropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("imModule", Gtk.Entry.EntryImModulePropertyInfo), '("innerBorder", Gtk.Entry.EntryInnerBorderPropertyInfo), '("inputHints", Gtk.Entry.EntryInputHintsPropertyInfo), '("inputPurpose", Gtk.Entry.EntryInputPurposePropertyInfo), '("invisibleChar", Gtk.Entry.EntryInvisibleCharPropertyInfo), '("invisibleCharSet", Gtk.Entry.EntryInvisibleCharSetPropertyInfo), '("isFocus", Gtk.Widget.WidgetIsFocusPropertyInfo), '("margin", Gtk.Widget.WidgetMarginPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.Widget.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.Widget.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("maxLength", Gtk.Entry.EntryMaxLengthPropertyInfo), '("maxWidthChars", Gtk.Entry.EntryMaxWidthCharsPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("noShowAll", Gtk.Widget.WidgetNoShowAllPropertyInfo), '("numeric", SpinButtonNumericPropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("orientation", Gtk.Orientable.OrientableOrientationPropertyInfo), '("overwriteMode", Gtk.Entry.EntryOverwriteModePropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("placeholderText", Gtk.Entry.EntryPlaceholderTextPropertyInfo), '("populateAll", Gtk.Entry.EntryPopulateAllPropertyInfo), '("primaryIconActivatable", Gtk.Entry.EntryPrimaryIconActivatablePropertyInfo), '("primaryIconGicon", Gtk.Entry.EntryPrimaryIconGiconPropertyInfo), '("primaryIconName", Gtk.Entry.EntryPrimaryIconNamePropertyInfo), '("primaryIconPixbuf", Gtk.Entry.EntryPrimaryIconPixbufPropertyInfo), '("primaryIconSensitive", Gtk.Entry.EntryPrimaryIconSensitivePropertyInfo), '("primaryIconStock", Gtk.Entry.EntryPrimaryIconStockPropertyInfo), '("primaryIconStorageType", Gtk.Entry.EntryPrimaryIconStorageTypePropertyInfo), '("primaryIconTooltipMarkup", Gtk.Entry.EntryPrimaryIconTooltipMarkupPropertyInfo), '("primaryIconTooltipText", Gtk.Entry.EntryPrimaryIconTooltipTextPropertyInfo), '("progressFraction", Gtk.Entry.EntryProgressFractionPropertyInfo), '("progressPulseStep", Gtk.Entry.EntryProgressPulseStepPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("scrollOffset", Gtk.Entry.EntryScrollOffsetPropertyInfo), '("secondaryIconActivatable", Gtk.Entry.EntrySecondaryIconActivatablePropertyInfo), '("secondaryIconGicon", Gtk.Entry.EntrySecondaryIconGiconPropertyInfo), '("secondaryIconName", Gtk.Entry.EntrySecondaryIconNamePropertyInfo), '("secondaryIconPixbuf", Gtk.Entry.EntrySecondaryIconPixbufPropertyInfo), '("secondaryIconSensitive", Gtk.Entry.EntrySecondaryIconSensitivePropertyInfo), '("secondaryIconStock", Gtk.Entry.EntrySecondaryIconStockPropertyInfo), '("secondaryIconStorageType", Gtk.Entry.EntrySecondaryIconStorageTypePropertyInfo), '("secondaryIconTooltipMarkup", Gtk.Entry.EntrySecondaryIconTooltipMarkupPropertyInfo), '("secondaryIconTooltipText", Gtk.Entry.EntrySecondaryIconTooltipTextPropertyInfo), '("selectionBound", Gtk.Entry.EntrySelectionBoundPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("shadowType", Gtk.Entry.EntryShadowTypePropertyInfo), '("showEmojiIcon", Gtk.Entry.EntryShowEmojiIconPropertyInfo), '("snapToTicks", SpinButtonSnapToTicksPropertyInfo), '("style", Gtk.Widget.WidgetStylePropertyInfo), '("tabs", Gtk.Entry.EntryTabsPropertyInfo), '("text", Gtk.Entry.EntryTextPropertyInfo), '("textLength", Gtk.Entry.EntryTextLengthPropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("truncateMultiline", Gtk.Entry.EntryTruncateMultilinePropertyInfo), '("updatePolicy", SpinButtonUpdatePolicyPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("value", SpinButtonValuePropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visibility", Gtk.Entry.EntryVisibilityPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widthChars", Gtk.Entry.EntryWidthCharsPropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo), '("window", Gtk.Widget.WidgetWindowPropertyInfo), '("wrap", SpinButtonWrapPropertyInfo), '("xalign", Gtk.Entry.EntryXalignPropertyInfo)] :: [(Symbol, *)]) #endif #if ENABLE_OVERLOADING spinButtonAdjustment :: AttrLabelProxy "adjustment" spinButtonAdjustment = AttrLabelProxy spinButtonClimbRate :: AttrLabelProxy "climbRate" spinButtonClimbRate = AttrLabelProxy spinButtonDigits :: AttrLabelProxy "digits" spinButtonDigits = AttrLabelProxy spinButtonNumeric :: AttrLabelProxy "numeric" spinButtonNumeric = AttrLabelProxy spinButtonSnapToTicks :: AttrLabelProxy "snapToTicks" spinButtonSnapToTicks = AttrLabelProxy spinButtonUpdatePolicy :: AttrLabelProxy "updatePolicy" spinButtonUpdatePolicy = AttrLabelProxy spinButtonValue :: AttrLabelProxy "value" spinButtonValue = AttrLabelProxy spinButtonWrap :: AttrLabelProxy "wrap" spinButtonWrap = AttrLabelProxy #endif #if ENABLE_OVERLOADING data SpinButtonChangeValueSignalInfo instance SignalInfo SpinButtonChangeValueSignalInfo where type HaskellCallbackType SpinButtonChangeValueSignalInfo = SpinButtonChangeValueCallback connectSignal _ obj cb connectMode = do let cb' = wrap_SpinButtonChangeValueCallback cb cb'' <- mk_SpinButtonChangeValueCallback cb' connectSignalFunPtr obj "change-value" cb'' connectMode data SpinButtonInputSignalInfo instance SignalInfo SpinButtonInputSignalInfo where type HaskellCallbackType SpinButtonInputSignalInfo = SpinButtonInputCallback connectSignal _ obj cb connectMode = do let cb' = wrap_SpinButtonInputCallback cb cb'' <- mk_SpinButtonInputCallback cb' connectSignalFunPtr obj "input" cb'' connectMode data SpinButtonOutputSignalInfo instance SignalInfo SpinButtonOutputSignalInfo where type HaskellCallbackType SpinButtonOutputSignalInfo = SpinButtonOutputCallback connectSignal _ obj cb connectMode = do let cb' = wrap_SpinButtonOutputCallback cb cb'' <- mk_SpinButtonOutputCallback cb' connectSignalFunPtr obj "output" cb'' connectMode data SpinButtonValueChangedSignalInfo instance SignalInfo SpinButtonValueChangedSignalInfo where type HaskellCallbackType SpinButtonValueChangedSignalInfo = SpinButtonValueChangedCallback connectSignal _ obj cb connectMode = do let cb' = wrap_SpinButtonValueChangedCallback cb cb'' <- mk_SpinButtonValueChangedCallback cb' connectSignalFunPtr obj "value-changed" cb'' connectMode data SpinButtonWrappedSignalInfo instance SignalInfo SpinButtonWrappedSignalInfo where type HaskellCallbackType SpinButtonWrappedSignalInfo = SpinButtonWrappedCallback connectSignal _ obj cb connectMode = do let cb' = wrap_SpinButtonWrappedCallback cb cb'' <- mk_SpinButtonWrappedCallback cb' connectSignalFunPtr obj "wrapped" cb'' connectMode type instance O.SignalList SpinButton = SpinButtonSignalList type SpinButtonSignalList = ('[ '("accelClosuresChanged", Gtk.Widget.WidgetAccelClosuresChangedSignalInfo), '("activate", Gtk.Entry.EntryActivateSignalInfo), '("backspace", Gtk.Entry.EntryBackspaceSignalInfo), '("buttonPressEvent", Gtk.Widget.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.Widget.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.Widget.WidgetCanActivateAccelSignalInfo), '("changeValue", SpinButtonChangeValueSignalInfo), '("changed", Gtk.Editable.EditableChangedSignalInfo), '("childNotify", Gtk.Widget.WidgetChildNotifySignalInfo), '("compositedChanged", Gtk.Widget.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.Widget.WidgetConfigureEventSignalInfo), '("copyClipboard", Gtk.Entry.EntryCopyClipboardSignalInfo), '("cutClipboard", Gtk.Entry.EntryCutClipboardSignalInfo), '("damageEvent", Gtk.Widget.WidgetDamageEventSignalInfo), '("deleteEvent", Gtk.Widget.WidgetDeleteEventSignalInfo), '("deleteFromCursor", Gtk.Entry.EntryDeleteFromCursorSignalInfo), '("deleteText", Gtk.Editable.EditableDeleteTextSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("destroyEvent", Gtk.Widget.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("dragBegin", Gtk.Widget.WidgetDragBeginSignalInfo), '("dragDataDelete", Gtk.Widget.WidgetDragDataDeleteSignalInfo), '("dragDataGet", Gtk.Widget.WidgetDragDataGetSignalInfo), '("dragDataReceived", Gtk.Widget.WidgetDragDataReceivedSignalInfo), '("dragDrop", Gtk.Widget.WidgetDragDropSignalInfo), '("dragEnd", Gtk.Widget.WidgetDragEndSignalInfo), '("dragFailed", Gtk.Widget.WidgetDragFailedSignalInfo), '("dragLeave", Gtk.Widget.WidgetDragLeaveSignalInfo), '("dragMotion", Gtk.Widget.WidgetDragMotionSignalInfo), '("draw", Gtk.Widget.WidgetDrawSignalInfo), '("editingDone", Gtk.CellEditable.CellEditableEditingDoneSignalInfo), '("enterNotifyEvent", Gtk.Widget.WidgetEnterNotifyEventSignalInfo), '("event", Gtk.Widget.WidgetEventSignalInfo), '("eventAfter", Gtk.Widget.WidgetEventAfterSignalInfo), '("focus", Gtk.Widget.WidgetFocusSignalInfo), '("focusInEvent", Gtk.Widget.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.Widget.WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", Gtk.Widget.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.Widget.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.Widget.WidgetGrabNotifySignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.Widget.WidgetHierarchyChangedSignalInfo), '("iconPress", Gtk.Entry.EntryIconPressSignalInfo), '("iconRelease", Gtk.Entry.EntryIconReleaseSignalInfo), '("input", SpinButtonInputSignalInfo), '("insertAtCursor", Gtk.Entry.EntryInsertAtCursorSignalInfo), '("insertEmoji", Gtk.Entry.EntryInsertEmojiSignalInfo), '("insertText", Gtk.Editable.EditableInsertTextSignalInfo), '("keyPressEvent", Gtk.Widget.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.Widget.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("leaveNotifyEvent", Gtk.Widget.WidgetLeaveNotifyEventSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mapEvent", Gtk.Widget.WidgetMapEventSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("motionNotifyEvent", Gtk.Widget.WidgetMotionNotifyEventSignalInfo), '("moveCursor", Gtk.Entry.EntryMoveCursorSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("output", SpinButtonOutputSignalInfo), '("parentSet", Gtk.Widget.WidgetParentSetSignalInfo), '("pasteClipboard", Gtk.Entry.EntryPasteClipboardSignalInfo), '("populatePopup", Gtk.Entry.EntryPopulatePopupSignalInfo), '("popupMenu", Gtk.Widget.WidgetPopupMenuSignalInfo), '("preeditChanged", Gtk.Entry.EntryPreeditChangedSignalInfo), '("propertyNotifyEvent", Gtk.Widget.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.Widget.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.Widget.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("removeWidget", Gtk.CellEditable.CellEditableRemoveWidgetSignalInfo), '("screenChanged", Gtk.Widget.WidgetScreenChangedSignalInfo), '("scrollEvent", Gtk.Widget.WidgetScrollEventSignalInfo), '("selectionClearEvent", Gtk.Widget.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.Widget.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.Widget.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.Widget.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.Widget.WidgetSelectionRequestEventSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("showHelp", Gtk.Widget.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.Widget.WidgetSizeAllocateSignalInfo), '("stateChanged", Gtk.Widget.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("styleSet", Gtk.Widget.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.Widget.WidgetStyleUpdatedSignalInfo), '("toggleOverwrite", Gtk.Entry.EntryToggleOverwriteSignalInfo), '("touchEvent", Gtk.Widget.WidgetTouchEventSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.Widget.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo), '("valueChanged", SpinButtonValueChangedSignalInfo), '("visibilityNotifyEvent", Gtk.Widget.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.Widget.WidgetWindowStateEventSignalInfo), '("wrapped", SpinButtonWrappedSignalInfo)] :: [(Symbol, *)]) #endif -- method SpinButton::new -- method type : Constructor -- Args : [Arg {argCName = "adjustment", argType = TInterface (Name {namespace = "Gtk", name = "Adjustment"}), direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "the #GtkAdjustment object that this spin\n button should use, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "climb_rate", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "specifies by how much the rate of change in the value will\n accelerate if you continue to hold down an up/down button or arrow key", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "digits", argType = TBasicType TUInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the number of decimal places to display", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TInterface (Name {namespace = "Gtk", name = "SpinButton"})) -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_new" gtk_spin_button_new :: Ptr Gtk.Adjustment.Adjustment -> -- adjustment : TInterface (Name {namespace = "Gtk", name = "Adjustment"}) CDouble -> -- climb_rate : TBasicType TDouble Word32 -> -- digits : TBasicType TUInt IO (Ptr SpinButton) {- | Creates a new 'GI.Gtk.Objects.SpinButton.SpinButton'. -} spinButtonNew :: (B.CallStack.HasCallStack, MonadIO m, Gtk.Adjustment.IsAdjustment a) => Maybe (a) {- ^ /@adjustment@/: the 'GI.Gtk.Objects.Adjustment.Adjustment' object that this spin button should use, or 'Nothing' -} -> Double {- ^ /@climbRate@/: specifies by how much the rate of change in the value will accelerate if you continue to hold down an up\/down button or arrow key -} -> Word32 {- ^ /@digits@/: the number of decimal places to display -} -> m SpinButton {- ^ __Returns:__ The new spin button as a 'GI.Gtk.Objects.Widget.Widget' -} spinButtonNew adjustment climbRate digits = liftIO $ do maybeAdjustment <- case adjustment of Nothing -> return nullPtr Just jAdjustment -> do jAdjustment' <- unsafeManagedPtrCastPtr jAdjustment return jAdjustment' let climbRate' = realToFrac climbRate result <- gtk_spin_button_new maybeAdjustment climbRate' digits checkUnexpectedReturnNULL "spinButtonNew" result result' <- (newObject SpinButton) result whenJust adjustment touchManagedPtr return result' #if ENABLE_OVERLOADING #endif -- method SpinButton::new_with_range -- method type : Constructor -- Args : [Arg {argCName = "min", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Minimum allowable value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "max", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Maximum allowable value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "step", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Increment added or subtracted by spinning the widget", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TInterface (Name {namespace = "Gtk", name = "SpinButton"})) -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_new_with_range" gtk_spin_button_new_with_range :: CDouble -> -- min : TBasicType TDouble CDouble -> -- max : TBasicType TDouble CDouble -> -- step : TBasicType TDouble IO (Ptr SpinButton) {- | This is a convenience constructor that allows creation of a numeric 'GI.Gtk.Objects.SpinButton.SpinButton' without manually creating an adjustment. The value is initially set to the minimum value and a page increment of 10 * /@step@/ is the default. The precision of the spin button is equivalent to the precision of /@step@/. Note that the way in which the precision is derived works best if /@step@/ is a power of ten. If the resulting precision is not suitable for your needs, use 'GI.Gtk.Objects.SpinButton.spinButtonSetDigits' to correct it. -} spinButtonNewWithRange :: (B.CallStack.HasCallStack, MonadIO m) => Double {- ^ /@min@/: Minimum allowable value -} -> Double {- ^ /@max@/: Maximum allowable value -} -> Double {- ^ /@step@/: Increment added or subtracted by spinning the widget -} -> m SpinButton {- ^ __Returns:__ The new spin button as a 'GI.Gtk.Objects.Widget.Widget' -} spinButtonNewWithRange min max step = liftIO $ do let min' = realToFrac min let max' = realToFrac max let step' = realToFrac step result <- gtk_spin_button_new_with_range min' max' step' checkUnexpectedReturnNULL "spinButtonNewWithRange" result result' <- (newObject SpinButton) result return result' #if ENABLE_OVERLOADING #endif -- method SpinButton::configure -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "adjustment", argType = TInterface (Name {namespace = "Gtk", name = "Adjustment"}), direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "a #GtkAdjustment to replace the spin button\8217s\n existing adjustment, or %NULL to leave its current adjustment unchanged", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "climb_rate", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the new climb rate", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "digits", argType = TBasicType TUInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the number of decimal places to display in the spin button", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_configure" gtk_spin_button_configure :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) Ptr Gtk.Adjustment.Adjustment -> -- adjustment : TInterface (Name {namespace = "Gtk", name = "Adjustment"}) CDouble -> -- climb_rate : TBasicType TDouble Word32 -> -- digits : TBasicType TUInt IO () {- | Changes the properties of an existing spin button. The adjustment, climb rate, and number of decimal places are updated accordingly. -} spinButtonConfigure :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a, Gtk.Adjustment.IsAdjustment b) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> Maybe (b) {- ^ /@adjustment@/: a 'GI.Gtk.Objects.Adjustment.Adjustment' to replace the spin button’s existing adjustment, or 'Nothing' to leave its current adjustment unchanged -} -> Double {- ^ /@climbRate@/: the new climb rate -} -> Word32 {- ^ /@digits@/: the number of decimal places to display in the spin button -} -> m () spinButtonConfigure spinButton adjustment climbRate digits = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton maybeAdjustment <- case adjustment of Nothing -> return nullPtr Just jAdjustment -> do jAdjustment' <- unsafeManagedPtrCastPtr jAdjustment return jAdjustment' let climbRate' = realToFrac climbRate gtk_spin_button_configure spinButton' maybeAdjustment climbRate' digits touchManagedPtr spinButton whenJust adjustment touchManagedPtr return () #if ENABLE_OVERLOADING data SpinButtonConfigureMethodInfo instance (signature ~ (Maybe (b) -> Double -> Word32 -> m ()), MonadIO m, IsSpinButton a, Gtk.Adjustment.IsAdjustment b) => O.MethodInfo SpinButtonConfigureMethodInfo a signature where overloadedMethod _ = spinButtonConfigure #endif -- method SpinButton::get_adjustment -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TInterface (Name {namespace = "Gtk", name = "Adjustment"})) -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_get_adjustment" gtk_spin_button_get_adjustment :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) IO (Ptr Gtk.Adjustment.Adjustment) {- | Get the adjustment associated with a 'GI.Gtk.Objects.SpinButton.SpinButton' -} spinButtonGetAdjustment :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> m Gtk.Adjustment.Adjustment {- ^ __Returns:__ the 'GI.Gtk.Objects.Adjustment.Adjustment' of /@spinButton@/ -} spinButtonGetAdjustment spinButton = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton result <- gtk_spin_button_get_adjustment spinButton' checkUnexpectedReturnNULL "spinButtonGetAdjustment" result result' <- (newObject Gtk.Adjustment.Adjustment) result touchManagedPtr spinButton return result' #if ENABLE_OVERLOADING data SpinButtonGetAdjustmentMethodInfo instance (signature ~ (m Gtk.Adjustment.Adjustment), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonGetAdjustmentMethodInfo a signature where overloadedMethod _ = spinButtonGetAdjustment #endif -- method SpinButton::get_digits -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TUInt) -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_get_digits" gtk_spin_button_get_digits :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) IO Word32 {- | Fetches the precision of /@spinButton@/. See 'GI.Gtk.Objects.SpinButton.spinButtonSetDigits'. -} spinButtonGetDigits :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> m Word32 {- ^ __Returns:__ the current precision -} spinButtonGetDigits spinButton = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton result <- gtk_spin_button_get_digits spinButton' touchManagedPtr spinButton return result #if ENABLE_OVERLOADING data SpinButtonGetDigitsMethodInfo instance (signature ~ (m Word32), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonGetDigitsMethodInfo a signature where overloadedMethod _ = spinButtonGetDigits #endif -- method SpinButton::get_increments -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "step", argType = TBasicType TDouble, direction = DirectionOut, mayBeNull = False, argDoc = Documentation {rawDocText = Just "location to store step increment, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "page", argType = TBasicType TDouble, direction = DirectionOut, mayBeNull = False, argDoc = Documentation {rawDocText = Just "location to store page increment, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_get_increments" gtk_spin_button_get_increments :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) Ptr CDouble -> -- step : TBasicType TDouble Ptr CDouble -> -- page : TBasicType TDouble IO () {- | Gets the current step and page the increments used by /@spinButton@/. See 'GI.Gtk.Objects.SpinButton.spinButtonSetIncrements'. -} spinButtonGetIncrements :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> m ((Double, Double)) spinButtonGetIncrements spinButton = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton step <- allocMem :: IO (Ptr CDouble) page <- allocMem :: IO (Ptr CDouble) gtk_spin_button_get_increments spinButton' step page step' <- peek step let step'' = realToFrac step' page' <- peek page let page'' = realToFrac page' touchManagedPtr spinButton freeMem step freeMem page return (step'', page'') #if ENABLE_OVERLOADING data SpinButtonGetIncrementsMethodInfo instance (signature ~ (m ((Double, Double))), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonGetIncrementsMethodInfo a signature where overloadedMethod _ = spinButtonGetIncrements #endif -- method SpinButton::get_numeric -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TBoolean) -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_get_numeric" gtk_spin_button_get_numeric :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) IO CInt {- | Returns whether non-numeric text can be typed into the spin button. See 'GI.Gtk.Objects.SpinButton.spinButtonSetNumeric'. -} spinButtonGetNumeric :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> m Bool {- ^ __Returns:__ 'True' if only numeric text can be entered -} spinButtonGetNumeric spinButton = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton result <- gtk_spin_button_get_numeric spinButton' let result' = (/= 0) result touchManagedPtr spinButton return result' #if ENABLE_OVERLOADING data SpinButtonGetNumericMethodInfo instance (signature ~ (m Bool), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonGetNumericMethodInfo a signature where overloadedMethod _ = spinButtonGetNumeric #endif -- method SpinButton::get_range -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "min", argType = TBasicType TDouble, direction = DirectionOut, mayBeNull = False, argDoc = Documentation {rawDocText = Just "location to store minimum allowed value, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "max", argType = TBasicType TDouble, direction = DirectionOut, mayBeNull = False, argDoc = Documentation {rawDocText = Just "location to store maximum allowed value, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_get_range" gtk_spin_button_get_range :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) Ptr CDouble -> -- min : TBasicType TDouble Ptr CDouble -> -- max : TBasicType TDouble IO () {- | Gets the range allowed for /@spinButton@/. See 'GI.Gtk.Objects.SpinButton.spinButtonSetRange'. -} spinButtonGetRange :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> m ((Double, Double)) spinButtonGetRange spinButton = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton min <- allocMem :: IO (Ptr CDouble) max <- allocMem :: IO (Ptr CDouble) gtk_spin_button_get_range spinButton' min max min' <- peek min let min'' = realToFrac min' max' <- peek max let max'' = realToFrac max' touchManagedPtr spinButton freeMem min freeMem max return (min'', max'') #if ENABLE_OVERLOADING data SpinButtonGetRangeMethodInfo instance (signature ~ (m ((Double, Double))), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonGetRangeMethodInfo a signature where overloadedMethod _ = spinButtonGetRange #endif -- method SpinButton::get_snap_to_ticks -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TBoolean) -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_get_snap_to_ticks" gtk_spin_button_get_snap_to_ticks :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) IO CInt {- | Returns whether the values are corrected to the nearest step. See 'GI.Gtk.Objects.SpinButton.spinButtonSetSnapToTicks'. -} spinButtonGetSnapToTicks :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> m Bool {- ^ __Returns:__ 'True' if values are snapped to the nearest step -} spinButtonGetSnapToTicks spinButton = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton result <- gtk_spin_button_get_snap_to_ticks spinButton' let result' = (/= 0) result touchManagedPtr spinButton return result' #if ENABLE_OVERLOADING data SpinButtonGetSnapToTicksMethodInfo instance (signature ~ (m Bool), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonGetSnapToTicksMethodInfo a signature where overloadedMethod _ = spinButtonGetSnapToTicks #endif -- method SpinButton::get_update_policy -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TInterface (Name {namespace = "Gtk", name = "SpinButtonUpdatePolicy"})) -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_get_update_policy" gtk_spin_button_get_update_policy :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) IO CUInt {- | Gets the update behavior of a spin button. See 'GI.Gtk.Objects.SpinButton.spinButtonSetUpdatePolicy'. -} spinButtonGetUpdatePolicy :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> m Gtk.Enums.SpinButtonUpdatePolicy {- ^ __Returns:__ the current update policy -} spinButtonGetUpdatePolicy spinButton = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton result <- gtk_spin_button_get_update_policy spinButton' let result' = (toEnum . fromIntegral) result touchManagedPtr spinButton return result' #if ENABLE_OVERLOADING data SpinButtonGetUpdatePolicyMethodInfo instance (signature ~ (m Gtk.Enums.SpinButtonUpdatePolicy), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonGetUpdatePolicyMethodInfo a signature where overloadedMethod _ = spinButtonGetUpdatePolicy #endif -- method SpinButton::get_value -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TDouble) -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_get_value" gtk_spin_button_get_value :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) IO CDouble {- | Get the value in the /@spinButton@/. -} spinButtonGetValue :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> m Double {- ^ __Returns:__ the value of /@spinButton@/ -} spinButtonGetValue spinButton = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton result <- gtk_spin_button_get_value spinButton' let result' = realToFrac result touchManagedPtr spinButton return result' #if ENABLE_OVERLOADING data SpinButtonGetValueMethodInfo instance (signature ~ (m Double), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonGetValueMethodInfo a signature where overloadedMethod _ = spinButtonGetValue #endif -- method SpinButton::get_value_as_int -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TInt) -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_get_value_as_int" gtk_spin_button_get_value_as_int :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) IO Int32 {- | Get the value /@spinButton@/ represented as an integer. -} spinButtonGetValueAsInt :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> m Int32 {- ^ __Returns:__ the value of /@spinButton@/ -} spinButtonGetValueAsInt spinButton = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton result <- gtk_spin_button_get_value_as_int spinButton' touchManagedPtr spinButton return result #if ENABLE_OVERLOADING data SpinButtonGetValueAsIntMethodInfo instance (signature ~ (m Int32), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonGetValueAsIntMethodInfo a signature where overloadedMethod _ = spinButtonGetValueAsInt #endif -- method SpinButton::get_wrap -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TBoolean) -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_get_wrap" gtk_spin_button_get_wrap :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) IO CInt {- | Returns whether the spin button’s value wraps around to the opposite limit when the upper or lower limit of the range is exceeded. See 'GI.Gtk.Objects.SpinButton.spinButtonSetWrap'. -} spinButtonGetWrap :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> m Bool {- ^ __Returns:__ 'True' if the spin button wraps around -} spinButtonGetWrap spinButton = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton result <- gtk_spin_button_get_wrap spinButton' let result' = (/= 0) result touchManagedPtr spinButton return result' #if ENABLE_OVERLOADING data SpinButtonGetWrapMethodInfo instance (signature ~ (m Bool), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonGetWrapMethodInfo a signature where overloadedMethod _ = spinButtonGetWrap #endif -- method SpinButton::set_adjustment -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "adjustment", argType = TInterface (Name {namespace = "Gtk", name = "Adjustment"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkAdjustment to replace the existing adjustment", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_set_adjustment" gtk_spin_button_set_adjustment :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) Ptr Gtk.Adjustment.Adjustment -> -- adjustment : TInterface (Name {namespace = "Gtk", name = "Adjustment"}) IO () {- | Replaces the 'GI.Gtk.Objects.Adjustment.Adjustment' associated with /@spinButton@/. -} spinButtonSetAdjustment :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a, Gtk.Adjustment.IsAdjustment b) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> b {- ^ /@adjustment@/: a 'GI.Gtk.Objects.Adjustment.Adjustment' to replace the existing adjustment -} -> m () spinButtonSetAdjustment spinButton adjustment = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton adjustment' <- unsafeManagedPtrCastPtr adjustment gtk_spin_button_set_adjustment spinButton' adjustment' touchManagedPtr spinButton touchManagedPtr adjustment return () #if ENABLE_OVERLOADING data SpinButtonSetAdjustmentMethodInfo instance (signature ~ (b -> m ()), MonadIO m, IsSpinButton a, Gtk.Adjustment.IsAdjustment b) => O.MethodInfo SpinButtonSetAdjustmentMethodInfo a signature where overloadedMethod _ = spinButtonSetAdjustment #endif -- method SpinButton::set_digits -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "digits", argType = TBasicType TUInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the number of digits after the decimal point to be displayed for the spin button\8217s value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_set_digits" gtk_spin_button_set_digits :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) Word32 -> -- digits : TBasicType TUInt IO () {- | Set the precision to be displayed by /@spinButton@/. Up to 20 digit precision is allowed. -} spinButtonSetDigits :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> Word32 {- ^ /@digits@/: the number of digits after the decimal point to be displayed for the spin button’s value -} -> m () spinButtonSetDigits spinButton digits = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton gtk_spin_button_set_digits spinButton' digits touchManagedPtr spinButton return () #if ENABLE_OVERLOADING data SpinButtonSetDigitsMethodInfo instance (signature ~ (Word32 -> m ()), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonSetDigitsMethodInfo a signature where overloadedMethod _ = spinButtonSetDigits #endif -- method SpinButton::set_increments -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "step", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "increment applied for a button 1 press.", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "page", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "increment applied for a button 2 press.", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_set_increments" gtk_spin_button_set_increments :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) CDouble -> -- step : TBasicType TDouble CDouble -> -- page : TBasicType TDouble IO () {- | Sets the step and page increments for spin_button. This affects how quickly the value changes when the spin button’s arrows are activated. -} spinButtonSetIncrements :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> Double {- ^ /@step@/: increment applied for a button 1 press. -} -> Double {- ^ /@page@/: increment applied for a button 2 press. -} -> m () spinButtonSetIncrements spinButton step page = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton let step' = realToFrac step let page' = realToFrac page gtk_spin_button_set_increments spinButton' step' page' touchManagedPtr spinButton return () #if ENABLE_OVERLOADING data SpinButtonSetIncrementsMethodInfo instance (signature ~ (Double -> Double -> m ()), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonSetIncrementsMethodInfo a signature where overloadedMethod _ = spinButtonSetIncrements #endif -- method SpinButton::set_numeric -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "numeric", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "flag indicating if only numeric entry is allowed", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_set_numeric" gtk_spin_button_set_numeric :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) CInt -> -- numeric : TBasicType TBoolean IO () {- | Sets the flag that determines if non-numeric text can be typed into the spin button. -} spinButtonSetNumeric :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> Bool {- ^ /@numeric@/: flag indicating if only numeric entry is allowed -} -> m () spinButtonSetNumeric spinButton numeric = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton let numeric' = (fromIntegral . fromEnum) numeric gtk_spin_button_set_numeric spinButton' numeric' touchManagedPtr spinButton return () #if ENABLE_OVERLOADING data SpinButtonSetNumericMethodInfo instance (signature ~ (Bool -> m ()), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonSetNumericMethodInfo a signature where overloadedMethod _ = spinButtonSetNumeric #endif -- method SpinButton::set_range -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "min", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "minimum allowable value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "max", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "maximum allowable value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_set_range" gtk_spin_button_set_range :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) CDouble -> -- min : TBasicType TDouble CDouble -> -- max : TBasicType TDouble IO () {- | Sets the minimum and maximum allowable values for /@spinButton@/. If the current value is outside this range, it will be adjusted to fit within the range, otherwise it will remain unchanged. -} spinButtonSetRange :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> Double {- ^ /@min@/: minimum allowable value -} -> Double {- ^ /@max@/: maximum allowable value -} -> m () spinButtonSetRange spinButton min max = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton let min' = realToFrac min let max' = realToFrac max gtk_spin_button_set_range spinButton' min' max' touchManagedPtr spinButton return () #if ENABLE_OVERLOADING data SpinButtonSetRangeMethodInfo instance (signature ~ (Double -> Double -> m ()), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonSetRangeMethodInfo a signature where overloadedMethod _ = spinButtonSetRange #endif -- method SpinButton::set_snap_to_ticks -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "snap_to_ticks", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a flag indicating if invalid values should be corrected", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_set_snap_to_ticks" gtk_spin_button_set_snap_to_ticks :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) CInt -> -- snap_to_ticks : TBasicType TBoolean IO () {- | Sets the policy as to whether values are corrected to the nearest step increment when a spin button is activated after providing an invalid value. -} spinButtonSetSnapToTicks :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> Bool {- ^ /@snapToTicks@/: a flag indicating if invalid values should be corrected -} -> m () spinButtonSetSnapToTicks spinButton snapToTicks = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton let snapToTicks' = (fromIntegral . fromEnum) snapToTicks gtk_spin_button_set_snap_to_ticks spinButton' snapToTicks' touchManagedPtr spinButton return () #if ENABLE_OVERLOADING data SpinButtonSetSnapToTicksMethodInfo instance (signature ~ (Bool -> m ()), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonSetSnapToTicksMethodInfo a signature where overloadedMethod _ = spinButtonSetSnapToTicks #endif -- method SpinButton::set_update_policy -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "policy", argType = TInterface (Name {namespace = "Gtk", name = "SpinButtonUpdatePolicy"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButtonUpdatePolicy value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_set_update_policy" gtk_spin_button_set_update_policy :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) CUInt -> -- policy : TInterface (Name {namespace = "Gtk", name = "SpinButtonUpdatePolicy"}) IO () {- | Sets the update behavior of a spin button. This determines whether the spin button is always updated or only when a valid value is set. -} spinButtonSetUpdatePolicy :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> Gtk.Enums.SpinButtonUpdatePolicy {- ^ /@policy@/: a 'GI.Gtk.Enums.SpinButtonUpdatePolicy' value -} -> m () spinButtonSetUpdatePolicy spinButton policy = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton let policy' = (fromIntegral . fromEnum) policy gtk_spin_button_set_update_policy spinButton' policy' touchManagedPtr spinButton return () #if ENABLE_OVERLOADING data SpinButtonSetUpdatePolicyMethodInfo instance (signature ~ (Gtk.Enums.SpinButtonUpdatePolicy -> m ()), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonSetUpdatePolicyMethodInfo a signature where overloadedMethod _ = spinButtonSetUpdatePolicy #endif -- method SpinButton::set_value -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the new value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_set_value" gtk_spin_button_set_value :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) CDouble -> -- value : TBasicType TDouble IO () {- | Sets the value of /@spinButton@/. -} spinButtonSetValue :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> Double {- ^ /@value@/: the new value -} -> m () spinButtonSetValue spinButton value = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton let value' = realToFrac value gtk_spin_button_set_value spinButton' value' touchManagedPtr spinButton return () #if ENABLE_OVERLOADING data SpinButtonSetValueMethodInfo instance (signature ~ (Double -> m ()), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonSetValueMethodInfo a signature where overloadedMethod _ = spinButtonSetValue #endif -- method SpinButton::set_wrap -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "wrap", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a flag indicating if wrapping behavior is performed", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_set_wrap" gtk_spin_button_set_wrap :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) CInt -> -- wrap : TBasicType TBoolean IO () {- | Sets the flag that determines if a spin button value wraps around to the opposite limit when the upper or lower limit of the range is exceeded. -} spinButtonSetWrap :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> Bool {- ^ /@wrap@/: a flag indicating if wrapping behavior is performed -} -> m () spinButtonSetWrap spinButton wrap = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton let wrap' = (fromIntegral . fromEnum) wrap gtk_spin_button_set_wrap spinButton' wrap' touchManagedPtr spinButton return () #if ENABLE_OVERLOADING data SpinButtonSetWrapMethodInfo instance (signature ~ (Bool -> m ()), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonSetWrapMethodInfo a signature where overloadedMethod _ = spinButtonSetWrap #endif -- method SpinButton::spin -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "direction", argType = TInterface (Name {namespace = "Gtk", name = "SpinType"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinType indicating the direction to spin", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "increment", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "step increment to apply in the specified direction", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_spin" gtk_spin_button_spin :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) CUInt -> -- direction : TInterface (Name {namespace = "Gtk", name = "SpinType"}) CDouble -> -- increment : TBasicType TDouble IO () {- | Increment or decrement a spin button’s value in a specified direction by a specified amount. -} spinButtonSpin :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> Gtk.Enums.SpinType {- ^ /@direction@/: a 'GI.Gtk.Enums.SpinType' indicating the direction to spin -} -> Double {- ^ /@increment@/: step increment to apply in the specified direction -} -> m () spinButtonSpin spinButton direction increment = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton let direction' = (fromIntegral . fromEnum) direction let increment' = realToFrac increment gtk_spin_button_spin spinButton' direction' increment' touchManagedPtr spinButton return () #if ENABLE_OVERLOADING data SpinButtonSpinMethodInfo instance (signature ~ (Gtk.Enums.SpinType -> Double -> m ()), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonSpinMethodInfo a signature where overloadedMethod _ = spinButtonSpin #endif -- method SpinButton::update -- method type : OrdinaryMethod -- Args : [Arg {argCName = "spin_button", argType = TInterface (Name {namespace = "Gtk", name = "SpinButton"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkSpinButton", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "gtk_spin_button_update" gtk_spin_button_update :: Ptr SpinButton -> -- spin_button : TInterface (Name {namespace = "Gtk", name = "SpinButton"}) IO () {- | Manually force an update of the spin button. -} spinButtonUpdate :: (B.CallStack.HasCallStack, MonadIO m, IsSpinButton a) => a {- ^ /@spinButton@/: a 'GI.Gtk.Objects.SpinButton.SpinButton' -} -> m () spinButtonUpdate spinButton = liftIO $ do spinButton' <- unsafeManagedPtrCastPtr spinButton gtk_spin_button_update spinButton' touchManagedPtr spinButton return () #if ENABLE_OVERLOADING data SpinButtonUpdateMethodInfo instance (signature ~ (m ()), MonadIO m, IsSpinButton a) => O.MethodInfo SpinButtonUpdateMethodInfo a signature where overloadedMethod _ = spinButtonUpdate #endif