{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Handy.Objects.Paginator
(
Paginator(..) ,
IsPaginator ,
toPaginator ,
#if defined(ENABLE_OVERLOADING)
ResolvePaginatorMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
PaginatorGetAllowMouseDragMethodInfo ,
#endif
paginatorGetAllowMouseDrag ,
#if defined(ENABLE_OVERLOADING)
PaginatorGetAnimationDurationMethodInfo ,
#endif
paginatorGetAnimationDuration ,
#if defined(ENABLE_OVERLOADING)
PaginatorGetCenterContentMethodInfo ,
#endif
paginatorGetCenterContent ,
#if defined(ENABLE_OVERLOADING)
PaginatorGetIndicatorSpacingMethodInfo ,
#endif
paginatorGetIndicatorSpacing ,
#if defined(ENABLE_OVERLOADING)
PaginatorGetIndicatorStyleMethodInfo ,
#endif
paginatorGetIndicatorStyle ,
#if defined(ENABLE_OVERLOADING)
PaginatorGetInteractiveMethodInfo ,
#endif
paginatorGetInteractive ,
#if defined(ENABLE_OVERLOADING)
PaginatorGetNPagesMethodInfo ,
#endif
paginatorGetNPages ,
#if defined(ENABLE_OVERLOADING)
PaginatorGetPositionMethodInfo ,
#endif
paginatorGetPosition ,
#if defined(ENABLE_OVERLOADING)
PaginatorGetSpacingMethodInfo ,
#endif
paginatorGetSpacing ,
#if defined(ENABLE_OVERLOADING)
PaginatorInsertMethodInfo ,
#endif
paginatorInsert ,
paginatorNew ,
#if defined(ENABLE_OVERLOADING)
PaginatorPrependMethodInfo ,
#endif
paginatorPrepend ,
#if defined(ENABLE_OVERLOADING)
PaginatorReorderMethodInfo ,
#endif
paginatorReorder ,
#if defined(ENABLE_OVERLOADING)
PaginatorScrollToMethodInfo ,
#endif
paginatorScrollTo ,
#if defined(ENABLE_OVERLOADING)
PaginatorScrollToFullMethodInfo ,
#endif
paginatorScrollToFull ,
#if defined(ENABLE_OVERLOADING)
PaginatorSetAllowMouseDragMethodInfo ,
#endif
paginatorSetAllowMouseDrag ,
#if defined(ENABLE_OVERLOADING)
PaginatorSetAnimationDurationMethodInfo ,
#endif
paginatorSetAnimationDuration ,
#if defined(ENABLE_OVERLOADING)
PaginatorSetCenterContentMethodInfo ,
#endif
paginatorSetCenterContent ,
#if defined(ENABLE_OVERLOADING)
PaginatorSetIndicatorSpacingMethodInfo ,
#endif
paginatorSetIndicatorSpacing ,
#if defined(ENABLE_OVERLOADING)
PaginatorSetIndicatorStyleMethodInfo ,
#endif
paginatorSetIndicatorStyle ,
#if defined(ENABLE_OVERLOADING)
PaginatorSetInteractiveMethodInfo ,
#endif
paginatorSetInteractive ,
#if defined(ENABLE_OVERLOADING)
PaginatorSetSpacingMethodInfo ,
#endif
paginatorSetSpacing ,
#if defined(ENABLE_OVERLOADING)
PaginatorAllowMouseDragPropertyInfo ,
#endif
constructPaginatorAllowMouseDrag ,
getPaginatorAllowMouseDrag ,
#if defined(ENABLE_OVERLOADING)
paginatorAllowMouseDrag ,
#endif
setPaginatorAllowMouseDrag ,
#if defined(ENABLE_OVERLOADING)
PaginatorAnimationDurationPropertyInfo ,
#endif
constructPaginatorAnimationDuration ,
getPaginatorAnimationDuration ,
#if defined(ENABLE_OVERLOADING)
paginatorAnimationDuration ,
#endif
setPaginatorAnimationDuration ,
#if defined(ENABLE_OVERLOADING)
PaginatorCenterContentPropertyInfo ,
#endif
constructPaginatorCenterContent ,
getPaginatorCenterContent ,
#if defined(ENABLE_OVERLOADING)
paginatorCenterContent ,
#endif
setPaginatorCenterContent ,
#if defined(ENABLE_OVERLOADING)
PaginatorIndicatorSpacingPropertyInfo ,
#endif
constructPaginatorIndicatorSpacing ,
getPaginatorIndicatorSpacing ,
#if defined(ENABLE_OVERLOADING)
paginatorIndicatorSpacing ,
#endif
setPaginatorIndicatorSpacing ,
#if defined(ENABLE_OVERLOADING)
PaginatorIndicatorStylePropertyInfo ,
#endif
constructPaginatorIndicatorStyle ,
getPaginatorIndicatorStyle ,
#if defined(ENABLE_OVERLOADING)
paginatorIndicatorStyle ,
#endif
setPaginatorIndicatorStyle ,
#if defined(ENABLE_OVERLOADING)
PaginatorInteractivePropertyInfo ,
#endif
constructPaginatorInteractive ,
getPaginatorInteractive ,
#if defined(ENABLE_OVERLOADING)
paginatorInteractive ,
#endif
setPaginatorInteractive ,
#if defined(ENABLE_OVERLOADING)
PaginatorNPagesPropertyInfo ,
#endif
getPaginatorNPages ,
#if defined(ENABLE_OVERLOADING)
paginatorNPages ,
#endif
#if defined(ENABLE_OVERLOADING)
PaginatorPositionPropertyInfo ,
#endif
getPaginatorPosition ,
#if defined(ENABLE_OVERLOADING)
paginatorPosition ,
#endif
#if defined(ENABLE_OVERLOADING)
PaginatorSpacingPropertyInfo ,
#endif
constructPaginatorSpacing ,
getPaginatorSpacing ,
#if defined(ENABLE_OVERLOADING)
paginatorSpacing ,
#endif
setPaginatorSpacing ,
C_PaginatorPageChangedCallback ,
PaginatorPageChangedCallback ,
#if defined(ENABLE_OVERLOADING)
PaginatorPageChangedSignalInfo ,
#endif
afterPaginatorPageChanged ,
genClosure_PaginatorPageChanged ,
mk_PaginatorPageChangedCallback ,
noPaginatorPageChangedCallback ,
onPaginatorPageChanged ,
wrap_PaginatorPageChangedCallback ,
) 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.BasicTypes as B.Types
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.GI.Base.Signals as B.Signals
import qualified Control.Monad.IO.Class as MIO
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 qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import qualified GI.Gtk.Interfaces.Orientable as Gtk.Orientable
import qualified GI.Gtk.Objects.Bin as Gtk.Bin
import qualified GI.Gtk.Objects.Container as Gtk.Container
import qualified GI.Gtk.Objects.EventBox as Gtk.EventBox
import qualified GI.Gtk.Objects.Widget as Gtk.Widget
import {-# SOURCE #-} qualified GI.Handy.Enums as Handy.Enums
import {-# SOURCE #-} qualified GI.Handy.Interfaces.Swipeable as Handy.Swipeable
newtype Paginator = Paginator (SP.ManagedPtr Paginator)
deriving (Paginator -> Paginator -> Bool
(Paginator -> Paginator -> Bool)
-> (Paginator -> Paginator -> Bool) -> Eq Paginator
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Paginator -> Paginator -> Bool
$c/= :: Paginator -> Paginator -> Bool
== :: Paginator -> Paginator -> Bool
$c== :: Paginator -> Paginator -> Bool
Eq)
instance SP.ManagedPtrNewtype Paginator where
toManagedPtr :: Paginator -> ManagedPtr Paginator
toManagedPtr (Paginator ManagedPtr Paginator
p) = ManagedPtr Paginator
p
foreign import ccall "hdy_paginator_get_type"
c_hdy_paginator_get_type :: IO B.Types.GType
instance B.Types.TypedObject Paginator where
glibType :: IO GType
glibType = IO GType
c_hdy_paginator_get_type
instance B.Types.GObject Paginator
instance B.GValue.IsGValue Paginator where
toGValue :: Paginator -> IO GValue
toGValue Paginator
o = do
GType
gtype <- IO GType
c_hdy_paginator_get_type
Paginator -> (Ptr Paginator -> IO GValue) -> IO GValue
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr Paginator
o (GType
-> (GValue -> Ptr Paginator -> IO ()) -> Ptr Paginator -> IO GValue
forall a. GType -> (GValue -> a -> IO ()) -> a -> IO GValue
B.GValue.buildGValue GType
gtype GValue -> Ptr Paginator -> IO ()
forall a. GObject a => GValue -> Ptr a -> IO ()
B.GValue.set_object)
fromGValue :: GValue -> IO Paginator
fromGValue GValue
gv = do
Ptr Paginator
ptr <- GValue -> IO (Ptr Paginator)
forall b. GObject b => GValue -> IO (Ptr b)
B.GValue.get_object GValue
gv :: IO (Ptr Paginator)
(ManagedPtr Paginator -> Paginator)
-> Ptr Paginator -> IO Paginator
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr Paginator -> Paginator
Paginator Ptr Paginator
ptr
class (SP.GObject o, O.IsDescendantOf Paginator o) => IsPaginator o
instance (SP.GObject o, O.IsDescendantOf Paginator o) => IsPaginator o
instance O.HasParentTypes Paginator
type instance O.ParentTypes Paginator = '[Gtk.EventBox.EventBox, Gtk.Bin.Bin, Gtk.Container.Container, Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Buildable.Buildable, Gtk.Orientable.Orientable, Handy.Swipeable.Swipeable]
toPaginator :: (MonadIO m, IsPaginator o) => o -> m Paginator
toPaginator :: o -> m Paginator
toPaginator = IO Paginator -> m Paginator
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Paginator -> m Paginator)
-> (o -> IO Paginator) -> o -> m Paginator
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr Paginator -> Paginator) -> o -> IO Paginator
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
unsafeCastTo ManagedPtr Paginator -> Paginator
Paginator
#if defined(ENABLE_OVERLOADING)
type family ResolvePaginatorMethod (t :: Symbol) (o :: *) :: * where
ResolvePaginatorMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolvePaginatorMethod "add" o = Gtk.Container.ContainerAddMethodInfo
ResolvePaginatorMethod "addAccelerator" o = Gtk.Widget.WidgetAddAcceleratorMethodInfo
ResolvePaginatorMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolvePaginatorMethod "addDeviceEvents" o = Gtk.Widget.WidgetAddDeviceEventsMethodInfo
ResolvePaginatorMethod "addEvents" o = Gtk.Widget.WidgetAddEventsMethodInfo
ResolvePaginatorMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolvePaginatorMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolvePaginatorMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolvePaginatorMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolvePaginatorMethod "canActivateAccel" o = Gtk.Widget.WidgetCanActivateAccelMethodInfo
ResolvePaginatorMethod "checkResize" o = Gtk.Container.ContainerCheckResizeMethodInfo
ResolvePaginatorMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolvePaginatorMethod "childGetProperty" o = Gtk.Container.ContainerChildGetPropertyMethodInfo
ResolvePaginatorMethod "childNotify" o = Gtk.Container.ContainerChildNotifyMethodInfo
ResolvePaginatorMethod "childNotifyByPspec" o = Gtk.Container.ContainerChildNotifyByPspecMethodInfo
ResolvePaginatorMethod "childSetProperty" o = Gtk.Container.ContainerChildSetPropertyMethodInfo
ResolvePaginatorMethod "childType" o = Gtk.Container.ContainerChildTypeMethodInfo
ResolvePaginatorMethod "classPath" o = Gtk.Widget.WidgetClassPathMethodInfo
ResolvePaginatorMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolvePaginatorMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolvePaginatorMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolvePaginatorMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolvePaginatorMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolvePaginatorMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolvePaginatorMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolvePaginatorMethod "destroy" o = Gtk.Widget.WidgetDestroyMethodInfo
ResolvePaginatorMethod "destroyed" o = Gtk.Widget.WidgetDestroyedMethodInfo
ResolvePaginatorMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolvePaginatorMethod "dragBegin" o = Gtk.Widget.WidgetDragBeginMethodInfo
ResolvePaginatorMethod "dragBeginWithCoordinates" o = Gtk.Widget.WidgetDragBeginWithCoordinatesMethodInfo
ResolvePaginatorMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolvePaginatorMethod "dragDestAddImageTargets" o = Gtk.Widget.WidgetDragDestAddImageTargetsMethodInfo
ResolvePaginatorMethod "dragDestAddTextTargets" o = Gtk.Widget.WidgetDragDestAddTextTargetsMethodInfo
ResolvePaginatorMethod "dragDestAddUriTargets" o = Gtk.Widget.WidgetDragDestAddUriTargetsMethodInfo
ResolvePaginatorMethod "dragDestFindTarget" o = Gtk.Widget.WidgetDragDestFindTargetMethodInfo
ResolvePaginatorMethod "dragDestGetTargetList" o = Gtk.Widget.WidgetDragDestGetTargetListMethodInfo
ResolvePaginatorMethod "dragDestGetTrackMotion" o = Gtk.Widget.WidgetDragDestGetTrackMotionMethodInfo
ResolvePaginatorMethod "dragDestSet" o = Gtk.Widget.WidgetDragDestSetMethodInfo
ResolvePaginatorMethod "dragDestSetProxy" o = Gtk.Widget.WidgetDragDestSetProxyMethodInfo
ResolvePaginatorMethod "dragDestSetTargetList" o = Gtk.Widget.WidgetDragDestSetTargetListMethodInfo
ResolvePaginatorMethod "dragDestSetTrackMotion" o = Gtk.Widget.WidgetDragDestSetTrackMotionMethodInfo
ResolvePaginatorMethod "dragDestUnset" o = Gtk.Widget.WidgetDragDestUnsetMethodInfo
ResolvePaginatorMethod "dragGetData" o = Gtk.Widget.WidgetDragGetDataMethodInfo
ResolvePaginatorMethod "dragHighlight" o = Gtk.Widget.WidgetDragHighlightMethodInfo
ResolvePaginatorMethod "dragSourceAddImageTargets" o = Gtk.Widget.WidgetDragSourceAddImageTargetsMethodInfo
ResolvePaginatorMethod "dragSourceAddTextTargets" o = Gtk.Widget.WidgetDragSourceAddTextTargetsMethodInfo
ResolvePaginatorMethod "dragSourceAddUriTargets" o = Gtk.Widget.WidgetDragSourceAddUriTargetsMethodInfo
ResolvePaginatorMethod "dragSourceGetTargetList" o = Gtk.Widget.WidgetDragSourceGetTargetListMethodInfo
ResolvePaginatorMethod "dragSourceSet" o = Gtk.Widget.WidgetDragSourceSetMethodInfo
ResolvePaginatorMethod "dragSourceSetIconGicon" o = Gtk.Widget.WidgetDragSourceSetIconGiconMethodInfo
ResolvePaginatorMethod "dragSourceSetIconName" o = Gtk.Widget.WidgetDragSourceSetIconNameMethodInfo
ResolvePaginatorMethod "dragSourceSetIconPixbuf" o = Gtk.Widget.WidgetDragSourceSetIconPixbufMethodInfo
ResolvePaginatorMethod "dragSourceSetIconStock" o = Gtk.Widget.WidgetDragSourceSetIconStockMethodInfo
ResolvePaginatorMethod "dragSourceSetTargetList" o = Gtk.Widget.WidgetDragSourceSetTargetListMethodInfo
ResolvePaginatorMethod "dragSourceUnset" o = Gtk.Widget.WidgetDragSourceUnsetMethodInfo
ResolvePaginatorMethod "dragUnhighlight" o = Gtk.Widget.WidgetDragUnhighlightMethodInfo
ResolvePaginatorMethod "draw" o = Gtk.Widget.WidgetDrawMethodInfo
ResolvePaginatorMethod "ensureStyle" o = Gtk.Widget.WidgetEnsureStyleMethodInfo
ResolvePaginatorMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolvePaginatorMethod "event" o = Gtk.Widget.WidgetEventMethodInfo
ResolvePaginatorMethod "forall" o = Gtk.Container.ContainerForallMethodInfo
ResolvePaginatorMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolvePaginatorMethod "foreach" o = Gtk.Container.ContainerForeachMethodInfo
ResolvePaginatorMethod "freezeChildNotify" o = Gtk.Widget.WidgetFreezeChildNotifyMethodInfo
ResolvePaginatorMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolvePaginatorMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolvePaginatorMethod "grabAdd" o = Gtk.Widget.WidgetGrabAddMethodInfo
ResolvePaginatorMethod "grabDefault" o = Gtk.Widget.WidgetGrabDefaultMethodInfo
ResolvePaginatorMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolvePaginatorMethod "grabRemove" o = Gtk.Widget.WidgetGrabRemoveMethodInfo
ResolvePaginatorMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolvePaginatorMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolvePaginatorMethod "hasGrab" o = Gtk.Widget.WidgetHasGrabMethodInfo
ResolvePaginatorMethod "hasRcStyle" o = Gtk.Widget.WidgetHasRcStyleMethodInfo
ResolvePaginatorMethod "hasScreen" o = Gtk.Widget.WidgetHasScreenMethodInfo
ResolvePaginatorMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolvePaginatorMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolvePaginatorMethod "hideOnDelete" o = Gtk.Widget.WidgetHideOnDeleteMethodInfo
ResolvePaginatorMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolvePaginatorMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolvePaginatorMethod "inputShapeCombineRegion" o = Gtk.Widget.WidgetInputShapeCombineRegionMethodInfo
ResolvePaginatorMethod "insert" o = PaginatorInsertMethodInfo
ResolvePaginatorMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolvePaginatorMethod "intersect" o = Gtk.Widget.WidgetIntersectMethodInfo
ResolvePaginatorMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolvePaginatorMethod "isComposited" o = Gtk.Widget.WidgetIsCompositedMethodInfo
ResolvePaginatorMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolvePaginatorMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolvePaginatorMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolvePaginatorMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolvePaginatorMethod "isToplevel" o = Gtk.Widget.WidgetIsToplevelMethodInfo
ResolvePaginatorMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolvePaginatorMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolvePaginatorMethod "listAccelClosures" o = Gtk.Widget.WidgetListAccelClosuresMethodInfo
ResolvePaginatorMethod "listActionPrefixes" o = Gtk.Widget.WidgetListActionPrefixesMethodInfo
ResolvePaginatorMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolvePaginatorMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolvePaginatorMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolvePaginatorMethod "modifyBase" o = Gtk.Widget.WidgetModifyBaseMethodInfo
ResolvePaginatorMethod "modifyBg" o = Gtk.Widget.WidgetModifyBgMethodInfo
ResolvePaginatorMethod "modifyCursor" o = Gtk.Widget.WidgetModifyCursorMethodInfo
ResolvePaginatorMethod "modifyFg" o = Gtk.Widget.WidgetModifyFgMethodInfo
ResolvePaginatorMethod "modifyFont" o = Gtk.Widget.WidgetModifyFontMethodInfo
ResolvePaginatorMethod "modifyStyle" o = Gtk.Widget.WidgetModifyStyleMethodInfo
ResolvePaginatorMethod "modifyText" o = Gtk.Widget.WidgetModifyTextMethodInfo
ResolvePaginatorMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolvePaginatorMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolvePaginatorMethod "overrideBackgroundColor" o = Gtk.Widget.WidgetOverrideBackgroundColorMethodInfo
ResolvePaginatorMethod "overrideColor" o = Gtk.Widget.WidgetOverrideColorMethodInfo
ResolvePaginatorMethod "overrideCursor" o = Gtk.Widget.WidgetOverrideCursorMethodInfo
ResolvePaginatorMethod "overrideFont" o = Gtk.Widget.WidgetOverrideFontMethodInfo
ResolvePaginatorMethod "overrideSymbolicColor" o = Gtk.Widget.WidgetOverrideSymbolicColorMethodInfo
ResolvePaginatorMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolvePaginatorMethod "path" o = Gtk.Widget.WidgetPathMethodInfo
ResolvePaginatorMethod "prepend" o = PaginatorPrependMethodInfo
ResolvePaginatorMethod "propagateDraw" o = Gtk.Container.ContainerPropagateDrawMethodInfo
ResolvePaginatorMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolvePaginatorMethod "queueComputeExpand" o = Gtk.Widget.WidgetQueueComputeExpandMethodInfo
ResolvePaginatorMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolvePaginatorMethod "queueDrawArea" o = Gtk.Widget.WidgetQueueDrawAreaMethodInfo
ResolvePaginatorMethod "queueDrawRegion" o = Gtk.Widget.WidgetQueueDrawRegionMethodInfo
ResolvePaginatorMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolvePaginatorMethod "queueResizeNoRedraw" o = Gtk.Widget.WidgetQueueResizeNoRedrawMethodInfo
ResolvePaginatorMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolvePaginatorMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolvePaginatorMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolvePaginatorMethod "regionIntersect" o = Gtk.Widget.WidgetRegionIntersectMethodInfo
ResolvePaginatorMethod "registerWindow" o = Gtk.Widget.WidgetRegisterWindowMethodInfo
ResolvePaginatorMethod "remove" o = Gtk.Container.ContainerRemoveMethodInfo
ResolvePaginatorMethod "removeAccelerator" o = Gtk.Widget.WidgetRemoveAcceleratorMethodInfo
ResolvePaginatorMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolvePaginatorMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolvePaginatorMethod "renderIcon" o = Gtk.Widget.WidgetRenderIconMethodInfo
ResolvePaginatorMethod "renderIconPixbuf" o = Gtk.Widget.WidgetRenderIconPixbufMethodInfo
ResolvePaginatorMethod "reorder" o = PaginatorReorderMethodInfo
ResolvePaginatorMethod "reparent" o = Gtk.Widget.WidgetReparentMethodInfo
ResolvePaginatorMethod "resetRcStyles" o = Gtk.Widget.WidgetResetRcStylesMethodInfo
ResolvePaginatorMethod "resetStyle" o = Gtk.Widget.WidgetResetStyleMethodInfo
ResolvePaginatorMethod "resizeChildren" o = Gtk.Container.ContainerResizeChildrenMethodInfo
ResolvePaginatorMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolvePaginatorMethod "scrollTo" o = PaginatorScrollToMethodInfo
ResolvePaginatorMethod "scrollToFull" o = PaginatorScrollToFullMethodInfo
ResolvePaginatorMethod "sendExpose" o = Gtk.Widget.WidgetSendExposeMethodInfo
ResolvePaginatorMethod "sendFocusChange" o = Gtk.Widget.WidgetSendFocusChangeMethodInfo
ResolvePaginatorMethod "shapeCombineRegion" o = Gtk.Widget.WidgetShapeCombineRegionMethodInfo
ResolvePaginatorMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolvePaginatorMethod "showAll" o = Gtk.Widget.WidgetShowAllMethodInfo
ResolvePaginatorMethod "showNow" o = Gtk.Widget.WidgetShowNowMethodInfo
ResolvePaginatorMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolvePaginatorMethod "sizeAllocateWithBaseline" o = Gtk.Widget.WidgetSizeAllocateWithBaselineMethodInfo
ResolvePaginatorMethod "sizeRequest" o = Gtk.Widget.WidgetSizeRequestMethodInfo
ResolvePaginatorMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolvePaginatorMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolvePaginatorMethod "styleAttach" o = Gtk.Widget.WidgetStyleAttachMethodInfo
ResolvePaginatorMethod "styleGetProperty" o = Gtk.Widget.WidgetStyleGetPropertyMethodInfo
ResolvePaginatorMethod "thawChildNotify" o = Gtk.Widget.WidgetThawChildNotifyMethodInfo
ResolvePaginatorMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolvePaginatorMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolvePaginatorMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolvePaginatorMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolvePaginatorMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolvePaginatorMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolvePaginatorMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolvePaginatorMethod "unregisterWindow" o = Gtk.Widget.WidgetUnregisterWindowMethodInfo
ResolvePaginatorMethod "unsetFocusChain" o = Gtk.Container.ContainerUnsetFocusChainMethodInfo
ResolvePaginatorMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolvePaginatorMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolvePaginatorMethod "getAboveChild" o = Gtk.EventBox.EventBoxGetAboveChildMethodInfo
ResolvePaginatorMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolvePaginatorMethod "getActionGroup" o = Gtk.Widget.WidgetGetActionGroupMethodInfo
ResolvePaginatorMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolvePaginatorMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolvePaginatorMethod "getAllocatedSize" o = Gtk.Widget.WidgetGetAllocatedSizeMethodInfo
ResolvePaginatorMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolvePaginatorMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolvePaginatorMethod "getAllowMouseDrag" o = PaginatorGetAllowMouseDragMethodInfo
ResolvePaginatorMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolvePaginatorMethod "getAnimationDuration" o = PaginatorGetAnimationDurationMethodInfo
ResolvePaginatorMethod "getAppPaintable" o = Gtk.Widget.WidgetGetAppPaintableMethodInfo
ResolvePaginatorMethod "getBorderWidth" o = Gtk.Container.ContainerGetBorderWidthMethodInfo
ResolvePaginatorMethod "getCanDefault" o = Gtk.Widget.WidgetGetCanDefaultMethodInfo
ResolvePaginatorMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolvePaginatorMethod "getCenterContent" o = PaginatorGetCenterContentMethodInfo
ResolvePaginatorMethod "getChild" o = Gtk.Bin.BinGetChildMethodInfo
ResolvePaginatorMethod "getChildRequisition" o = Gtk.Widget.WidgetGetChildRequisitionMethodInfo
ResolvePaginatorMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolvePaginatorMethod "getChildren" o = Gtk.Container.ContainerGetChildrenMethodInfo
ResolvePaginatorMethod "getClip" o = Gtk.Widget.WidgetGetClipMethodInfo
ResolvePaginatorMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolvePaginatorMethod "getCompositeName" o = Gtk.Widget.WidgetGetCompositeNameMethodInfo
ResolvePaginatorMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolvePaginatorMethod "getDeviceEnabled" o = Gtk.Widget.WidgetGetDeviceEnabledMethodInfo
ResolvePaginatorMethod "getDeviceEvents" o = Gtk.Widget.WidgetGetDeviceEventsMethodInfo
ResolvePaginatorMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolvePaginatorMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolvePaginatorMethod "getDoubleBuffered" o = Gtk.Widget.WidgetGetDoubleBufferedMethodInfo
ResolvePaginatorMethod "getEvents" o = Gtk.Widget.WidgetGetEventsMethodInfo
ResolvePaginatorMethod "getFocusChain" o = Gtk.Container.ContainerGetFocusChainMethodInfo
ResolvePaginatorMethod "getFocusChild" o = Gtk.Container.ContainerGetFocusChildMethodInfo
ResolvePaginatorMethod "getFocusHadjustment" o = Gtk.Container.ContainerGetFocusHadjustmentMethodInfo
ResolvePaginatorMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolvePaginatorMethod "getFocusVadjustment" o = Gtk.Container.ContainerGetFocusVadjustmentMethodInfo
ResolvePaginatorMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolvePaginatorMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolvePaginatorMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolvePaginatorMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolvePaginatorMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolvePaginatorMethod "getHasWindow" o = Gtk.Widget.WidgetGetHasWindowMethodInfo
ResolvePaginatorMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolvePaginatorMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolvePaginatorMethod "getIndicatorSpacing" o = PaginatorGetIndicatorSpacingMethodInfo
ResolvePaginatorMethod "getIndicatorStyle" o = PaginatorGetIndicatorStyleMethodInfo
ResolvePaginatorMethod "getInteractive" o = PaginatorGetInteractiveMethodInfo
ResolvePaginatorMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolvePaginatorMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolvePaginatorMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolvePaginatorMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolvePaginatorMethod "getMarginLeft" o = Gtk.Widget.WidgetGetMarginLeftMethodInfo
ResolvePaginatorMethod "getMarginRight" o = Gtk.Widget.WidgetGetMarginRightMethodInfo
ResolvePaginatorMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolvePaginatorMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolvePaginatorMethod "getModifierMask" o = Gtk.Widget.WidgetGetModifierMaskMethodInfo
ResolvePaginatorMethod "getModifierStyle" o = Gtk.Widget.WidgetGetModifierStyleMethodInfo
ResolvePaginatorMethod "getNPages" o = PaginatorGetNPagesMethodInfo
ResolvePaginatorMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolvePaginatorMethod "getNoShowAll" o = Gtk.Widget.WidgetGetNoShowAllMethodInfo
ResolvePaginatorMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolvePaginatorMethod "getOrientation" o = Gtk.Orientable.OrientableGetOrientationMethodInfo
ResolvePaginatorMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolvePaginatorMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolvePaginatorMethod "getParentWindow" o = Gtk.Widget.WidgetGetParentWindowMethodInfo
ResolvePaginatorMethod "getPath" o = Gtk.Widget.WidgetGetPathMethodInfo
ResolvePaginatorMethod "getPathForChild" o = Gtk.Container.ContainerGetPathForChildMethodInfo
ResolvePaginatorMethod "getPointer" o = Gtk.Widget.WidgetGetPointerMethodInfo
ResolvePaginatorMethod "getPosition" o = PaginatorGetPositionMethodInfo
ResolvePaginatorMethod "getPreferredHeight" o = Gtk.Widget.WidgetGetPreferredHeightMethodInfo
ResolvePaginatorMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.Widget.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo
ResolvePaginatorMethod "getPreferredHeightForWidth" o = Gtk.Widget.WidgetGetPreferredHeightForWidthMethodInfo
ResolvePaginatorMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolvePaginatorMethod "getPreferredWidth" o = Gtk.Widget.WidgetGetPreferredWidthMethodInfo
ResolvePaginatorMethod "getPreferredWidthForHeight" o = Gtk.Widget.WidgetGetPreferredWidthForHeightMethodInfo
ResolvePaginatorMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolvePaginatorMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolvePaginatorMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolvePaginatorMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolvePaginatorMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolvePaginatorMethod "getRequisition" o = Gtk.Widget.WidgetGetRequisitionMethodInfo
ResolvePaginatorMethod "getResizeMode" o = Gtk.Container.ContainerGetResizeModeMethodInfo
ResolvePaginatorMethod "getRootWindow" o = Gtk.Widget.WidgetGetRootWindowMethodInfo
ResolvePaginatorMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolvePaginatorMethod "getScreen" o = Gtk.Widget.WidgetGetScreenMethodInfo
ResolvePaginatorMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolvePaginatorMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolvePaginatorMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolvePaginatorMethod "getSpacing" o = PaginatorGetSpacingMethodInfo
ResolvePaginatorMethod "getState" o = Gtk.Widget.WidgetGetStateMethodInfo
ResolvePaginatorMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolvePaginatorMethod "getStyle" o = Gtk.Widget.WidgetGetStyleMethodInfo
ResolvePaginatorMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolvePaginatorMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolvePaginatorMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolvePaginatorMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolvePaginatorMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolvePaginatorMethod "getTooltipWindow" o = Gtk.Widget.WidgetGetTooltipWindowMethodInfo
ResolvePaginatorMethod "getToplevel" o = Gtk.Widget.WidgetGetToplevelMethodInfo
ResolvePaginatorMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolvePaginatorMethod "getValignWithBaseline" o = Gtk.Widget.WidgetGetValignWithBaselineMethodInfo
ResolvePaginatorMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolvePaginatorMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolvePaginatorMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolvePaginatorMethod "getVisibleWindow" o = Gtk.EventBox.EventBoxGetVisibleWindowMethodInfo
ResolvePaginatorMethod "getVisual" o = Gtk.Widget.WidgetGetVisualMethodInfo
ResolvePaginatorMethod "getWindow" o = Gtk.Widget.WidgetGetWindowMethodInfo
ResolvePaginatorMethod "setAboveChild" o = Gtk.EventBox.EventBoxSetAboveChildMethodInfo
ResolvePaginatorMethod "setAccelPath" o = Gtk.Widget.WidgetSetAccelPathMethodInfo
ResolvePaginatorMethod "setAllocation" o = Gtk.Widget.WidgetSetAllocationMethodInfo
ResolvePaginatorMethod "setAllowMouseDrag" o = PaginatorSetAllowMouseDragMethodInfo
ResolvePaginatorMethod "setAnimationDuration" o = PaginatorSetAnimationDurationMethodInfo
ResolvePaginatorMethod "setAppPaintable" o = Gtk.Widget.WidgetSetAppPaintableMethodInfo
ResolvePaginatorMethod "setBorderWidth" o = Gtk.Container.ContainerSetBorderWidthMethodInfo
ResolvePaginatorMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolvePaginatorMethod "setCanDefault" o = Gtk.Widget.WidgetSetCanDefaultMethodInfo
ResolvePaginatorMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolvePaginatorMethod "setCenterContent" o = PaginatorSetCenterContentMethodInfo
ResolvePaginatorMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolvePaginatorMethod "setClip" o = Gtk.Widget.WidgetSetClipMethodInfo
ResolvePaginatorMethod "setCompositeName" o = Gtk.Widget.WidgetSetCompositeNameMethodInfo
ResolvePaginatorMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolvePaginatorMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolvePaginatorMethod "setDeviceEnabled" o = Gtk.Widget.WidgetSetDeviceEnabledMethodInfo
ResolvePaginatorMethod "setDeviceEvents" o = Gtk.Widget.WidgetSetDeviceEventsMethodInfo
ResolvePaginatorMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolvePaginatorMethod "setDoubleBuffered" o = Gtk.Widget.WidgetSetDoubleBufferedMethodInfo
ResolvePaginatorMethod "setEvents" o = Gtk.Widget.WidgetSetEventsMethodInfo
ResolvePaginatorMethod "setFocusChain" o = Gtk.Container.ContainerSetFocusChainMethodInfo
ResolvePaginatorMethod "setFocusChild" o = Gtk.Container.ContainerSetFocusChildMethodInfo
ResolvePaginatorMethod "setFocusHadjustment" o = Gtk.Container.ContainerSetFocusHadjustmentMethodInfo
ResolvePaginatorMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolvePaginatorMethod "setFocusVadjustment" o = Gtk.Container.ContainerSetFocusVadjustmentMethodInfo
ResolvePaginatorMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolvePaginatorMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolvePaginatorMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolvePaginatorMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolvePaginatorMethod "setHasWindow" o = Gtk.Widget.WidgetSetHasWindowMethodInfo
ResolvePaginatorMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolvePaginatorMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolvePaginatorMethod "setIndicatorSpacing" o = PaginatorSetIndicatorSpacingMethodInfo
ResolvePaginatorMethod "setIndicatorStyle" o = PaginatorSetIndicatorStyleMethodInfo
ResolvePaginatorMethod "setInteractive" o = PaginatorSetInteractiveMethodInfo
ResolvePaginatorMethod "setMapped" o = Gtk.Widget.WidgetSetMappedMethodInfo
ResolvePaginatorMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolvePaginatorMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolvePaginatorMethod "setMarginLeft" o = Gtk.Widget.WidgetSetMarginLeftMethodInfo
ResolvePaginatorMethod "setMarginRight" o = Gtk.Widget.WidgetSetMarginRightMethodInfo
ResolvePaginatorMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolvePaginatorMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolvePaginatorMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolvePaginatorMethod "setNoShowAll" o = Gtk.Widget.WidgetSetNoShowAllMethodInfo
ResolvePaginatorMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolvePaginatorMethod "setOrientation" o = Gtk.Orientable.OrientableSetOrientationMethodInfo
ResolvePaginatorMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolvePaginatorMethod "setParentWindow" o = Gtk.Widget.WidgetSetParentWindowMethodInfo
ResolvePaginatorMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolvePaginatorMethod "setRealized" o = Gtk.Widget.WidgetSetRealizedMethodInfo
ResolvePaginatorMethod "setReallocateRedraws" o = Gtk.Container.ContainerSetReallocateRedrawsMethodInfo
ResolvePaginatorMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolvePaginatorMethod "setRedrawOnAllocate" o = Gtk.Widget.WidgetSetRedrawOnAllocateMethodInfo
ResolvePaginatorMethod "setResizeMode" o = Gtk.Container.ContainerSetResizeModeMethodInfo
ResolvePaginatorMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolvePaginatorMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolvePaginatorMethod "setSpacing" o = PaginatorSetSpacingMethodInfo
ResolvePaginatorMethod "setState" o = Gtk.Widget.WidgetSetStateMethodInfo
ResolvePaginatorMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolvePaginatorMethod "setStyle" o = Gtk.Widget.WidgetSetStyleMethodInfo
ResolvePaginatorMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolvePaginatorMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolvePaginatorMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolvePaginatorMethod "setTooltipWindow" o = Gtk.Widget.WidgetSetTooltipWindowMethodInfo
ResolvePaginatorMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolvePaginatorMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolvePaginatorMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolvePaginatorMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolvePaginatorMethod "setVisibleWindow" o = Gtk.EventBox.EventBoxSetVisibleWindowMethodInfo
ResolvePaginatorMethod "setVisual" o = Gtk.Widget.WidgetSetVisualMethodInfo
ResolvePaginatorMethod "setWindow" o = Gtk.Widget.WidgetSetWindowMethodInfo
ResolvePaginatorMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolvePaginatorMethod t Paginator, O.MethodInfo info Paginator p) => OL.IsLabel t (Paginator -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#endif
type PaginatorPageChangedCallback =
Word32
-> IO ()
noPaginatorPageChangedCallback :: Maybe PaginatorPageChangedCallback
noPaginatorPageChangedCallback :: Maybe PaginatorPageChangedCallback
noPaginatorPageChangedCallback = Maybe PaginatorPageChangedCallback
forall a. Maybe a
Nothing
type C_PaginatorPageChangedCallback =
Ptr () ->
Word32 ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_PaginatorPageChangedCallback :: C_PaginatorPageChangedCallback -> IO (FunPtr C_PaginatorPageChangedCallback)
genClosure_PaginatorPageChanged :: MonadIO m => PaginatorPageChangedCallback -> m (GClosure C_PaginatorPageChangedCallback)
genClosure_PaginatorPageChanged :: PaginatorPageChangedCallback
-> m (GClosure C_PaginatorPageChangedCallback)
genClosure_PaginatorPageChanged PaginatorPageChangedCallback
cb = IO (GClosure C_PaginatorPageChangedCallback)
-> m (GClosure C_PaginatorPageChangedCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_PaginatorPageChangedCallback)
-> m (GClosure C_PaginatorPageChangedCallback))
-> IO (GClosure C_PaginatorPageChangedCallback)
-> m (GClosure C_PaginatorPageChangedCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_PaginatorPageChangedCallback
cb' = PaginatorPageChangedCallback -> C_PaginatorPageChangedCallback
wrap_PaginatorPageChangedCallback PaginatorPageChangedCallback
cb
C_PaginatorPageChangedCallback
-> IO (FunPtr C_PaginatorPageChangedCallback)
mk_PaginatorPageChangedCallback C_PaginatorPageChangedCallback
cb' IO (FunPtr C_PaginatorPageChangedCallback)
-> (FunPtr C_PaginatorPageChangedCallback
-> IO (GClosure C_PaginatorPageChangedCallback))
-> IO (GClosure C_PaginatorPageChangedCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_PaginatorPageChangedCallback
-> IO (GClosure C_PaginatorPageChangedCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_PaginatorPageChangedCallback ::
PaginatorPageChangedCallback ->
C_PaginatorPageChangedCallback
wrap_PaginatorPageChangedCallback :: PaginatorPageChangedCallback -> C_PaginatorPageChangedCallback
wrap_PaginatorPageChangedCallback PaginatorPageChangedCallback
_cb Ptr ()
_ Word32
index Ptr ()
_ = do
PaginatorPageChangedCallback
_cb Word32
index
onPaginatorPageChanged :: (IsPaginator a, MonadIO m) => a -> PaginatorPageChangedCallback -> m SignalHandlerId
onPaginatorPageChanged :: a -> PaginatorPageChangedCallback -> m SignalHandlerId
onPaginatorPageChanged a
obj PaginatorPageChangedCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_PaginatorPageChangedCallback
cb' = PaginatorPageChangedCallback -> C_PaginatorPageChangedCallback
wrap_PaginatorPageChangedCallback PaginatorPageChangedCallback
cb
FunPtr C_PaginatorPageChangedCallback
cb'' <- C_PaginatorPageChangedCallback
-> IO (FunPtr C_PaginatorPageChangedCallback)
mk_PaginatorPageChangedCallback C_PaginatorPageChangedCallback
cb'
a
-> Text
-> FunPtr C_PaginatorPageChangedCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"page-changed" FunPtr C_PaginatorPageChangedCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterPaginatorPageChanged :: (IsPaginator a, MonadIO m) => a -> PaginatorPageChangedCallback -> m SignalHandlerId
afterPaginatorPageChanged :: a -> PaginatorPageChangedCallback -> m SignalHandlerId
afterPaginatorPageChanged a
obj PaginatorPageChangedCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_PaginatorPageChangedCallback
cb' = PaginatorPageChangedCallback -> C_PaginatorPageChangedCallback
wrap_PaginatorPageChangedCallback PaginatorPageChangedCallback
cb
FunPtr C_PaginatorPageChangedCallback
cb'' <- C_PaginatorPageChangedCallback
-> IO (FunPtr C_PaginatorPageChangedCallback)
mk_PaginatorPageChangedCallback C_PaginatorPageChangedCallback
cb'
a
-> Text
-> FunPtr C_PaginatorPageChangedCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"page-changed" FunPtr C_PaginatorPageChangedCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data PaginatorPageChangedSignalInfo
instance SignalInfo PaginatorPageChangedSignalInfo where
type HaskellCallbackType PaginatorPageChangedSignalInfo = PaginatorPageChangedCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_PaginatorPageChangedCallback cb
cb'' <- mk_PaginatorPageChangedCallback cb'
connectSignalFunPtr obj "page-changed" cb'' connectMode detail
#endif
getPaginatorAllowMouseDrag :: (MonadIO m, IsPaginator o) => o -> m Bool
getPaginatorAllowMouseDrag :: o -> m Bool
getPaginatorAllowMouseDrag o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"allow-mouse-drag"
setPaginatorAllowMouseDrag :: (MonadIO m, IsPaginator o) => o -> Bool -> m ()
setPaginatorAllowMouseDrag :: o -> Bool -> m ()
setPaginatorAllowMouseDrag o
obj Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"allow-mouse-drag" Bool
val
constructPaginatorAllowMouseDrag :: (IsPaginator o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructPaginatorAllowMouseDrag :: Bool -> m (GValueConstruct o)
constructPaginatorAllowMouseDrag Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"allow-mouse-drag" Bool
val
#if defined(ENABLE_OVERLOADING)
data PaginatorAllowMouseDragPropertyInfo
instance AttrInfo PaginatorAllowMouseDragPropertyInfo where
type AttrAllowedOps PaginatorAllowMouseDragPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint PaginatorAllowMouseDragPropertyInfo = IsPaginator
type AttrSetTypeConstraint PaginatorAllowMouseDragPropertyInfo = (~) Bool
type AttrTransferTypeConstraint PaginatorAllowMouseDragPropertyInfo = (~) Bool
type AttrTransferType PaginatorAllowMouseDragPropertyInfo = Bool
type AttrGetType PaginatorAllowMouseDragPropertyInfo = Bool
type AttrLabel PaginatorAllowMouseDragPropertyInfo = "allow-mouse-drag"
type AttrOrigin PaginatorAllowMouseDragPropertyInfo = Paginator
attrGet = getPaginatorAllowMouseDrag
attrSet = setPaginatorAllowMouseDrag
attrTransfer _ v = do
return v
attrConstruct = constructPaginatorAllowMouseDrag
attrClear = undefined
#endif
getPaginatorAnimationDuration :: (MonadIO m, IsPaginator o) => o -> m Word32
getPaginatorAnimationDuration :: o -> m Word32
getPaginatorAnimationDuration o
obj = IO Word32 -> m Word32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Word32
forall a. GObject a => a -> String -> IO Word32
B.Properties.getObjectPropertyUInt32 o
obj String
"animation-duration"
setPaginatorAnimationDuration :: (MonadIO m, IsPaginator o) => o -> Word32 -> m ()
setPaginatorAnimationDuration :: o -> Word32 -> m ()
setPaginatorAnimationDuration o
obj Word32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> PaginatorPageChangedCallback
forall a. GObject a => a -> String -> PaginatorPageChangedCallback
B.Properties.setObjectPropertyUInt32 o
obj String
"animation-duration" Word32
val
constructPaginatorAnimationDuration :: (IsPaginator o, MIO.MonadIO m) => Word32 -> m (GValueConstruct o)
constructPaginatorAnimationDuration :: Word32 -> m (GValueConstruct o)
constructPaginatorAnimationDuration Word32
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Word32 -> IO (GValueConstruct o)
forall o. String -> Word32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyUInt32 String
"animation-duration" Word32
val
#if defined(ENABLE_OVERLOADING)
data PaginatorAnimationDurationPropertyInfo
instance AttrInfo PaginatorAnimationDurationPropertyInfo where
type AttrAllowedOps PaginatorAnimationDurationPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint PaginatorAnimationDurationPropertyInfo = IsPaginator
type AttrSetTypeConstraint PaginatorAnimationDurationPropertyInfo = (~) Word32
type AttrTransferTypeConstraint PaginatorAnimationDurationPropertyInfo = (~) Word32
type AttrTransferType PaginatorAnimationDurationPropertyInfo = Word32
type AttrGetType PaginatorAnimationDurationPropertyInfo = Word32
type AttrLabel PaginatorAnimationDurationPropertyInfo = "animation-duration"
type AttrOrigin PaginatorAnimationDurationPropertyInfo = Paginator
attrGet = getPaginatorAnimationDuration
attrSet = setPaginatorAnimationDuration
attrTransfer _ v = do
return v
attrConstruct = constructPaginatorAnimationDuration
attrClear = undefined
#endif
getPaginatorCenterContent :: (MonadIO m, IsPaginator o) => o -> m Bool
getPaginatorCenterContent :: o -> m Bool
getPaginatorCenterContent o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"center-content"
setPaginatorCenterContent :: (MonadIO m, IsPaginator o) => o -> Bool -> m ()
setPaginatorCenterContent :: o -> Bool -> m ()
setPaginatorCenterContent o
obj Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"center-content" Bool
val
constructPaginatorCenterContent :: (IsPaginator o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructPaginatorCenterContent :: Bool -> m (GValueConstruct o)
constructPaginatorCenterContent Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"center-content" Bool
val
#if defined(ENABLE_OVERLOADING)
data PaginatorCenterContentPropertyInfo
instance AttrInfo PaginatorCenterContentPropertyInfo where
type AttrAllowedOps PaginatorCenterContentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint PaginatorCenterContentPropertyInfo = IsPaginator
type AttrSetTypeConstraint PaginatorCenterContentPropertyInfo = (~) Bool
type AttrTransferTypeConstraint PaginatorCenterContentPropertyInfo = (~) Bool
type AttrTransferType PaginatorCenterContentPropertyInfo = Bool
type AttrGetType PaginatorCenterContentPropertyInfo = Bool
type AttrLabel PaginatorCenterContentPropertyInfo = "center-content"
type AttrOrigin PaginatorCenterContentPropertyInfo = Paginator
attrGet = getPaginatorCenterContent
attrSet = setPaginatorCenterContent
attrTransfer _ v = do
return v
attrConstruct = constructPaginatorCenterContent
attrClear = undefined
#endif
getPaginatorIndicatorSpacing :: (MonadIO m, IsPaginator o) => o -> m Word32
getPaginatorIndicatorSpacing :: o -> m Word32
getPaginatorIndicatorSpacing o
obj = IO Word32 -> m Word32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Word32
forall a. GObject a => a -> String -> IO Word32
B.Properties.getObjectPropertyUInt32 o
obj String
"indicator-spacing"
setPaginatorIndicatorSpacing :: (MonadIO m, IsPaginator o) => o -> Word32 -> m ()
setPaginatorIndicatorSpacing :: o -> Word32 -> m ()
setPaginatorIndicatorSpacing o
obj Word32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> PaginatorPageChangedCallback
forall a. GObject a => a -> String -> PaginatorPageChangedCallback
B.Properties.setObjectPropertyUInt32 o
obj String
"indicator-spacing" Word32
val
constructPaginatorIndicatorSpacing :: (IsPaginator o, MIO.MonadIO m) => Word32 -> m (GValueConstruct o)
constructPaginatorIndicatorSpacing :: Word32 -> m (GValueConstruct o)
constructPaginatorIndicatorSpacing Word32
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Word32 -> IO (GValueConstruct o)
forall o. String -> Word32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyUInt32 String
"indicator-spacing" Word32
val
#if defined(ENABLE_OVERLOADING)
data PaginatorIndicatorSpacingPropertyInfo
instance AttrInfo PaginatorIndicatorSpacingPropertyInfo where
type AttrAllowedOps PaginatorIndicatorSpacingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint PaginatorIndicatorSpacingPropertyInfo = IsPaginator
type AttrSetTypeConstraint PaginatorIndicatorSpacingPropertyInfo = (~) Word32
type AttrTransferTypeConstraint PaginatorIndicatorSpacingPropertyInfo = (~) Word32
type AttrTransferType PaginatorIndicatorSpacingPropertyInfo = Word32
type AttrGetType PaginatorIndicatorSpacingPropertyInfo = Word32
type AttrLabel PaginatorIndicatorSpacingPropertyInfo = "indicator-spacing"
type AttrOrigin PaginatorIndicatorSpacingPropertyInfo = Paginator
attrGet = getPaginatorIndicatorSpacing
attrSet = setPaginatorIndicatorSpacing
attrTransfer _ v = do
return v
attrConstruct = constructPaginatorIndicatorSpacing
attrClear = undefined
#endif
getPaginatorIndicatorStyle :: (MonadIO m, IsPaginator o) => o -> m Handy.Enums.PaginatorIndicatorStyle
getPaginatorIndicatorStyle :: o -> m PaginatorIndicatorStyle
getPaginatorIndicatorStyle o
obj = IO PaginatorIndicatorStyle -> m PaginatorIndicatorStyle
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO PaginatorIndicatorStyle -> m PaginatorIndicatorStyle)
-> IO PaginatorIndicatorStyle -> m PaginatorIndicatorStyle
forall a b. (a -> b) -> a -> b
$ o -> String -> IO PaginatorIndicatorStyle
forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj String
"indicator-style"
setPaginatorIndicatorStyle :: (MonadIO m, IsPaginator o) => o -> Handy.Enums.PaginatorIndicatorStyle -> m ()
setPaginatorIndicatorStyle :: o -> PaginatorIndicatorStyle -> m ()
setPaginatorIndicatorStyle o
obj PaginatorIndicatorStyle
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> PaginatorIndicatorStyle -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj String
"indicator-style" PaginatorIndicatorStyle
val
constructPaginatorIndicatorStyle :: (IsPaginator o, MIO.MonadIO m) => Handy.Enums.PaginatorIndicatorStyle -> m (GValueConstruct o)
constructPaginatorIndicatorStyle :: PaginatorIndicatorStyle -> m (GValueConstruct o)
constructPaginatorIndicatorStyle PaginatorIndicatorStyle
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> PaginatorIndicatorStyle -> IO (GValueConstruct o)
forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum String
"indicator-style" PaginatorIndicatorStyle
val
#if defined(ENABLE_OVERLOADING)
data PaginatorIndicatorStylePropertyInfo
instance AttrInfo PaginatorIndicatorStylePropertyInfo where
type AttrAllowedOps PaginatorIndicatorStylePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint PaginatorIndicatorStylePropertyInfo = IsPaginator
type AttrSetTypeConstraint PaginatorIndicatorStylePropertyInfo = (~) Handy.Enums.PaginatorIndicatorStyle
type AttrTransferTypeConstraint PaginatorIndicatorStylePropertyInfo = (~) Handy.Enums.PaginatorIndicatorStyle
type AttrTransferType PaginatorIndicatorStylePropertyInfo = Handy.Enums.PaginatorIndicatorStyle
type AttrGetType PaginatorIndicatorStylePropertyInfo = Handy.Enums.PaginatorIndicatorStyle
type AttrLabel PaginatorIndicatorStylePropertyInfo = "indicator-style"
type AttrOrigin PaginatorIndicatorStylePropertyInfo = Paginator
attrGet = getPaginatorIndicatorStyle
attrSet = setPaginatorIndicatorStyle
attrTransfer _ v = do
return v
attrConstruct = constructPaginatorIndicatorStyle
attrClear = undefined
#endif
getPaginatorInteractive :: (MonadIO m, IsPaginator o) => o -> m Bool
getPaginatorInteractive :: o -> m Bool
getPaginatorInteractive o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"interactive"
setPaginatorInteractive :: (MonadIO m, IsPaginator o) => o -> Bool -> m ()
setPaginatorInteractive :: o -> Bool -> m ()
setPaginatorInteractive o
obj Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"interactive" Bool
val
constructPaginatorInteractive :: (IsPaginator o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructPaginatorInteractive :: Bool -> m (GValueConstruct o)
constructPaginatorInteractive Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"interactive" Bool
val
#if defined(ENABLE_OVERLOADING)
data PaginatorInteractivePropertyInfo
instance AttrInfo PaginatorInteractivePropertyInfo where
type AttrAllowedOps PaginatorInteractivePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint PaginatorInteractivePropertyInfo = IsPaginator
type AttrSetTypeConstraint PaginatorInteractivePropertyInfo = (~) Bool
type AttrTransferTypeConstraint PaginatorInteractivePropertyInfo = (~) Bool
type AttrTransferType PaginatorInteractivePropertyInfo = Bool
type AttrGetType PaginatorInteractivePropertyInfo = Bool
type AttrLabel PaginatorInteractivePropertyInfo = "interactive"
type AttrOrigin PaginatorInteractivePropertyInfo = Paginator
attrGet = getPaginatorInteractive
attrSet = setPaginatorInteractive
attrTransfer _ v = do
return v
attrConstruct = constructPaginatorInteractive
attrClear = undefined
#endif
getPaginatorNPages :: (MonadIO m, IsPaginator o) => o -> m Word32
getPaginatorNPages :: o -> m Word32
getPaginatorNPages o
obj = IO Word32 -> m Word32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Word32
forall a. GObject a => a -> String -> IO Word32
B.Properties.getObjectPropertyUInt32 o
obj String
"n-pages"
#if defined(ENABLE_OVERLOADING)
data PaginatorNPagesPropertyInfo
instance AttrInfo PaginatorNPagesPropertyInfo where
type AttrAllowedOps PaginatorNPagesPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint PaginatorNPagesPropertyInfo = IsPaginator
type AttrSetTypeConstraint PaginatorNPagesPropertyInfo = (~) ()
type AttrTransferTypeConstraint PaginatorNPagesPropertyInfo = (~) ()
type AttrTransferType PaginatorNPagesPropertyInfo = ()
type AttrGetType PaginatorNPagesPropertyInfo = Word32
type AttrLabel PaginatorNPagesPropertyInfo = "n-pages"
type AttrOrigin PaginatorNPagesPropertyInfo = Paginator
attrGet = getPaginatorNPages
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getPaginatorPosition :: (MonadIO m, IsPaginator o) => o -> m Double
getPaginatorPosition :: o -> m Double
getPaginatorPosition o
obj = IO Double -> m Double
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Double -> m Double) -> IO Double -> m Double
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Double
forall a. GObject a => a -> String -> IO Double
B.Properties.getObjectPropertyDouble o
obj String
"position"
#if defined(ENABLE_OVERLOADING)
data PaginatorPositionPropertyInfo
instance AttrInfo PaginatorPositionPropertyInfo where
type AttrAllowedOps PaginatorPositionPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint PaginatorPositionPropertyInfo = IsPaginator
type AttrSetTypeConstraint PaginatorPositionPropertyInfo = (~) ()
type AttrTransferTypeConstraint PaginatorPositionPropertyInfo = (~) ()
type AttrTransferType PaginatorPositionPropertyInfo = ()
type AttrGetType PaginatorPositionPropertyInfo = Double
type AttrLabel PaginatorPositionPropertyInfo = "position"
type AttrOrigin PaginatorPositionPropertyInfo = Paginator
attrGet = getPaginatorPosition
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getPaginatorSpacing :: (MonadIO m, IsPaginator o) => o -> m Word32
getPaginatorSpacing :: o -> m Word32
getPaginatorSpacing o
obj = IO Word32 -> m Word32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Word32
forall a. GObject a => a -> String -> IO Word32
B.Properties.getObjectPropertyUInt32 o
obj String
"spacing"
setPaginatorSpacing :: (MonadIO m, IsPaginator o) => o -> Word32 -> m ()
setPaginatorSpacing :: o -> Word32 -> m ()
setPaginatorSpacing o
obj Word32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> PaginatorPageChangedCallback
forall a. GObject a => a -> String -> PaginatorPageChangedCallback
B.Properties.setObjectPropertyUInt32 o
obj String
"spacing" Word32
val
constructPaginatorSpacing :: (IsPaginator o, MIO.MonadIO m) => Word32 -> m (GValueConstruct o)
constructPaginatorSpacing :: Word32 -> m (GValueConstruct o)
constructPaginatorSpacing Word32
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Word32 -> IO (GValueConstruct o)
forall o. String -> Word32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyUInt32 String
"spacing" Word32
val
#if defined(ENABLE_OVERLOADING)
data PaginatorSpacingPropertyInfo
instance AttrInfo PaginatorSpacingPropertyInfo where
type AttrAllowedOps PaginatorSpacingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint PaginatorSpacingPropertyInfo = IsPaginator
type AttrSetTypeConstraint PaginatorSpacingPropertyInfo = (~) Word32
type AttrTransferTypeConstraint PaginatorSpacingPropertyInfo = (~) Word32
type AttrTransferType PaginatorSpacingPropertyInfo = Word32
type AttrGetType PaginatorSpacingPropertyInfo = Word32
type AttrLabel PaginatorSpacingPropertyInfo = "spacing"
type AttrOrigin PaginatorSpacingPropertyInfo = Paginator
attrGet = getPaginatorSpacing
attrSet = setPaginatorSpacing
attrTransfer _ v = do
return v
attrConstruct = constructPaginatorSpacing
attrClear = undefined
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList Paginator
type instance O.AttributeList Paginator = PaginatorAttributeList
type PaginatorAttributeList = ('[ '("aboveChild", Gtk.EventBox.EventBoxAboveChildPropertyInfo), '("allowMouseDrag", PaginatorAllowMouseDragPropertyInfo), '("animationDuration", PaginatorAnimationDurationPropertyInfo), '("appPaintable", Gtk.Widget.WidgetAppPaintablePropertyInfo), '("borderWidth", Gtk.Container.ContainerBorderWidthPropertyInfo), '("canDefault", Gtk.Widget.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("centerContent", PaginatorCenterContentPropertyInfo), '("child", Gtk.Container.ContainerChildPropertyInfo), '("compositeChild", Gtk.Widget.WidgetCompositeChildPropertyInfo), '("doubleBuffered", Gtk.Widget.WidgetDoubleBufferedPropertyInfo), '("events", Gtk.Widget.WidgetEventsPropertyInfo), '("expand", Gtk.Widget.WidgetExpandPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("indicatorSpacing", PaginatorIndicatorSpacingPropertyInfo), '("indicatorStyle", PaginatorIndicatorStylePropertyInfo), '("interactive", PaginatorInteractivePropertyInfo), '("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), '("nPages", PaginatorNPagesPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("noShowAll", Gtk.Widget.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("orientation", Gtk.Orientable.OrientableOrientationPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("position", PaginatorPositionPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("resizeMode", Gtk.Container.ContainerResizeModePropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("spacing", PaginatorSpacingPropertyInfo), '("style", Gtk.Widget.WidgetStylePropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("visibleWindow", Gtk.EventBox.EventBoxVisibleWindowPropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo), '("window", Gtk.Widget.WidgetWindowPropertyInfo)] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
paginatorAllowMouseDrag :: AttrLabelProxy "allowMouseDrag"
paginatorAllowMouseDrag = AttrLabelProxy
paginatorAnimationDuration :: AttrLabelProxy "animationDuration"
paginatorAnimationDuration = AttrLabelProxy
paginatorCenterContent :: AttrLabelProxy "centerContent"
paginatorCenterContent = AttrLabelProxy
paginatorIndicatorSpacing :: AttrLabelProxy "indicatorSpacing"
paginatorIndicatorSpacing = AttrLabelProxy
paginatorIndicatorStyle :: AttrLabelProxy "indicatorStyle"
paginatorIndicatorStyle = AttrLabelProxy
paginatorInteractive :: AttrLabelProxy "interactive"
paginatorInteractive = AttrLabelProxy
paginatorNPages :: AttrLabelProxy "nPages"
paginatorNPages = AttrLabelProxy
paginatorPosition :: AttrLabelProxy "position"
paginatorPosition = AttrLabelProxy
paginatorSpacing :: AttrLabelProxy "spacing"
paginatorSpacing = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList Paginator = PaginatorSignalList
type PaginatorSignalList = ('[ '("accelClosuresChanged", Gtk.Widget.WidgetAccelClosuresChangedSignalInfo), '("add", Gtk.Container.ContainerAddSignalInfo), '("beginSwipe", Handy.Swipeable.SwipeableBeginSwipeSignalInfo), '("buttonPressEvent", Gtk.Widget.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.Widget.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.Widget.WidgetCanActivateAccelSignalInfo), '("checkResize", Gtk.Container.ContainerCheckResizeSignalInfo), '("childNotify", Gtk.Widget.WidgetChildNotifySignalInfo), '("compositedChanged", Gtk.Widget.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.Widget.WidgetConfigureEventSignalInfo), '("damageEvent", Gtk.Widget.WidgetDamageEventSignalInfo), '("deleteEvent", Gtk.Widget.WidgetDeleteEventSignalInfo), '("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), '("endSwipe", Handy.Swipeable.SwipeableEndSwipeSignalInfo), '("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), '("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), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("pageChanged", PaginatorPageChangedSignalInfo), '("parentSet", Gtk.Widget.WidgetParentSetSignalInfo), '("popupMenu", Gtk.Widget.WidgetPopupMenuSignalInfo), '("propertyNotifyEvent", Gtk.Widget.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.Widget.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.Widget.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("remove", Gtk.Container.ContainerRemoveSignalInfo), '("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), '("setFocusChild", Gtk.Container.ContainerSetFocusChildSignalInfo), '("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), '("switchChild", Handy.Swipeable.SwipeableSwitchChildSignalInfo), '("touchEvent", Gtk.Widget.WidgetTouchEventSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.Widget.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo), '("updateSwipe", Handy.Swipeable.SwipeableUpdateSwipeSignalInfo), '("visibilityNotifyEvent", Gtk.Widget.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.Widget.WidgetWindowStateEventSignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "hdy_paginator_new" hdy_paginator_new ::
IO (Ptr Paginator)
paginatorNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m Paginator
paginatorNew :: m Paginator
paginatorNew = IO Paginator -> m Paginator
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Paginator -> m Paginator) -> IO Paginator -> m Paginator
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
result <- IO (Ptr Paginator)
hdy_paginator_new
Text -> Ptr Paginator -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"paginatorNew" Ptr Paginator
result
Paginator
result' <- ((ManagedPtr Paginator -> Paginator)
-> Ptr Paginator -> IO Paginator
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Paginator -> Paginator
Paginator) Ptr Paginator
result
Paginator -> IO Paginator
forall (m :: * -> *) a. Monad m => a -> m a
return Paginator
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "hdy_paginator_get_allow_mouse_drag" hdy_paginator_get_allow_mouse_drag ::
Ptr Paginator ->
IO CInt
paginatorGetAllowMouseDrag ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
a
-> m Bool
paginatorGetAllowMouseDrag :: a -> m Bool
paginatorGetAllowMouseDrag a
self = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr Paginator -> IO CInt
hdy_paginator_get_allow_mouse_drag Ptr Paginator
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data PaginatorGetAllowMouseDragMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsPaginator a) => O.MethodInfo PaginatorGetAllowMouseDragMethodInfo a signature where
overloadedMethod = paginatorGetAllowMouseDrag
#endif
foreign import ccall "hdy_paginator_get_animation_duration" hdy_paginator_get_animation_duration ::
Ptr Paginator ->
IO Word32
paginatorGetAnimationDuration ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
a
-> m Word32
paginatorGetAnimationDuration :: a -> m Word32
paginatorGetAnimationDuration a
self = IO Word32 -> m Word32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Word32
result <- Ptr Paginator -> IO Word32
hdy_paginator_get_animation_duration Ptr Paginator
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Word32 -> IO Word32
forall (m :: * -> *) a. Monad m => a -> m a
return Word32
result
#if defined(ENABLE_OVERLOADING)
data PaginatorGetAnimationDurationMethodInfo
instance (signature ~ (m Word32), MonadIO m, IsPaginator a) => O.MethodInfo PaginatorGetAnimationDurationMethodInfo a signature where
overloadedMethod = paginatorGetAnimationDuration
#endif
foreign import ccall "hdy_paginator_get_center_content" hdy_paginator_get_center_content ::
Ptr Paginator ->
IO CInt
paginatorGetCenterContent ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
a
-> m Bool
paginatorGetCenterContent :: a -> m Bool
paginatorGetCenterContent a
self = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr Paginator -> IO CInt
hdy_paginator_get_center_content Ptr Paginator
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data PaginatorGetCenterContentMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsPaginator a) => O.MethodInfo PaginatorGetCenterContentMethodInfo a signature where
overloadedMethod = paginatorGetCenterContent
#endif
foreign import ccall "hdy_paginator_get_indicator_spacing" hdy_paginator_get_indicator_spacing ::
Ptr Paginator ->
IO Word32
paginatorGetIndicatorSpacing ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
a
-> m Word32
paginatorGetIndicatorSpacing :: a -> m Word32
paginatorGetIndicatorSpacing a
self = IO Word32 -> m Word32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Word32
result <- Ptr Paginator -> IO Word32
hdy_paginator_get_indicator_spacing Ptr Paginator
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Word32 -> IO Word32
forall (m :: * -> *) a. Monad m => a -> m a
return Word32
result
#if defined(ENABLE_OVERLOADING)
data PaginatorGetIndicatorSpacingMethodInfo
instance (signature ~ (m Word32), MonadIO m, IsPaginator a) => O.MethodInfo PaginatorGetIndicatorSpacingMethodInfo a signature where
overloadedMethod = paginatorGetIndicatorSpacing
#endif
foreign import ccall "hdy_paginator_get_indicator_style" hdy_paginator_get_indicator_style ::
Ptr Paginator ->
IO CUInt
paginatorGetIndicatorStyle ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
a
-> m Handy.Enums.PaginatorIndicatorStyle
paginatorGetIndicatorStyle :: a -> m PaginatorIndicatorStyle
paginatorGetIndicatorStyle a
self = IO PaginatorIndicatorStyle -> m PaginatorIndicatorStyle
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO PaginatorIndicatorStyle -> m PaginatorIndicatorStyle)
-> IO PaginatorIndicatorStyle -> m PaginatorIndicatorStyle
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CUInt
result <- Ptr Paginator -> IO CUInt
hdy_paginator_get_indicator_style Ptr Paginator
self'
let result' :: PaginatorIndicatorStyle
result' = (Int -> PaginatorIndicatorStyle
forall a. Enum a => Int -> a
toEnum (Int -> PaginatorIndicatorStyle)
-> (CUInt -> Int) -> CUInt -> PaginatorIndicatorStyle
forall b c a. (b -> c) -> (a -> b) -> a -> c
. CUInt -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral) CUInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
PaginatorIndicatorStyle -> IO PaginatorIndicatorStyle
forall (m :: * -> *) a. Monad m => a -> m a
return PaginatorIndicatorStyle
result'
#if defined(ENABLE_OVERLOADING)
data PaginatorGetIndicatorStyleMethodInfo
instance (signature ~ (m Handy.Enums.PaginatorIndicatorStyle), MonadIO m, IsPaginator a) => O.MethodInfo PaginatorGetIndicatorStyleMethodInfo a signature where
overloadedMethod = paginatorGetIndicatorStyle
#endif
foreign import ccall "hdy_paginator_get_interactive" hdy_paginator_get_interactive ::
Ptr Paginator ->
IO CInt
paginatorGetInteractive ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
a
-> m Bool
paginatorGetInteractive :: a -> m Bool
paginatorGetInteractive a
self = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr Paginator -> IO CInt
hdy_paginator_get_interactive Ptr Paginator
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data PaginatorGetInteractiveMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsPaginator a) => O.MethodInfo PaginatorGetInteractiveMethodInfo a signature where
overloadedMethod = paginatorGetInteractive
#endif
foreign import ccall "hdy_paginator_get_n_pages" hdy_paginator_get_n_pages ::
Ptr Paginator ->
IO Word32
paginatorGetNPages ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
a
-> m Word32
paginatorGetNPages :: a -> m Word32
paginatorGetNPages a
self = IO Word32 -> m Word32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Word32
result <- Ptr Paginator -> IO Word32
hdy_paginator_get_n_pages Ptr Paginator
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Word32 -> IO Word32
forall (m :: * -> *) a. Monad m => a -> m a
return Word32
result
#if defined(ENABLE_OVERLOADING)
data PaginatorGetNPagesMethodInfo
instance (signature ~ (m Word32), MonadIO m, IsPaginator a) => O.MethodInfo PaginatorGetNPagesMethodInfo a signature where
overloadedMethod = paginatorGetNPages
#endif
foreign import ccall "hdy_paginator_get_position" hdy_paginator_get_position ::
Ptr Paginator ->
IO CDouble
paginatorGetPosition ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
a
-> m Double
paginatorGetPosition :: a -> m Double
paginatorGetPosition a
self = IO Double -> m Double
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Double -> m Double) -> IO Double -> m Double
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CDouble
result <- Ptr Paginator -> IO CDouble
hdy_paginator_get_position Ptr Paginator
self'
let result' :: Double
result' = CDouble -> Double
forall a b. (Real a, Fractional b) => a -> b
realToFrac CDouble
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Double -> IO Double
forall (m :: * -> *) a. Monad m => a -> m a
return Double
result'
#if defined(ENABLE_OVERLOADING)
data PaginatorGetPositionMethodInfo
instance (signature ~ (m Double), MonadIO m, IsPaginator a) => O.MethodInfo PaginatorGetPositionMethodInfo a signature where
overloadedMethod = paginatorGetPosition
#endif
foreign import ccall "hdy_paginator_get_spacing" hdy_paginator_get_spacing ::
Ptr Paginator ->
IO Word32
paginatorGetSpacing ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
a
-> m Word32
paginatorGetSpacing :: a -> m Word32
paginatorGetSpacing a
self = IO Word32 -> m Word32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Word32
result <- Ptr Paginator -> IO Word32
hdy_paginator_get_spacing Ptr Paginator
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Word32 -> IO Word32
forall (m :: * -> *) a. Monad m => a -> m a
return Word32
result
#if defined(ENABLE_OVERLOADING)
data PaginatorGetSpacingMethodInfo
instance (signature ~ (m Word32), MonadIO m, IsPaginator a) => O.MethodInfo PaginatorGetSpacingMethodInfo a signature where
overloadedMethod = paginatorGetSpacing
#endif
foreign import ccall "hdy_paginator_insert" hdy_paginator_insert ::
Ptr Paginator ->
Ptr Gtk.Widget.Widget ->
Int32 ->
IO ()
paginatorInsert ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a, Gtk.Widget.IsWidget b) =>
a
-> b
-> Int32
-> m ()
paginatorInsert :: a -> b -> Int32 -> m ()
paginatorInsert a
self b
child Int32
position = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Widget
child' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
child
Ptr Paginator -> Ptr Widget -> Int32 -> IO ()
hdy_paginator_insert Ptr Paginator
self' Ptr Widget
child' Int32
position
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
child
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PaginatorInsertMethodInfo
instance (signature ~ (b -> Int32 -> m ()), MonadIO m, IsPaginator a, Gtk.Widget.IsWidget b) => O.MethodInfo PaginatorInsertMethodInfo a signature where
overloadedMethod = paginatorInsert
#endif
foreign import ccall "hdy_paginator_prepend" hdy_paginator_prepend ::
Ptr Paginator ->
Ptr Gtk.Widget.Widget ->
IO ()
paginatorPrepend ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m ()
paginatorPrepend :: a -> b -> m ()
paginatorPrepend a
self b
child = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Widget
child' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
child
Ptr Paginator -> Ptr Widget -> IO ()
hdy_paginator_prepend Ptr Paginator
self' Ptr Widget
child'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
child
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PaginatorPrependMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsPaginator a, Gtk.Widget.IsWidget b) => O.MethodInfo PaginatorPrependMethodInfo a signature where
overloadedMethod = paginatorPrepend
#endif
foreign import ccall "hdy_paginator_reorder" hdy_paginator_reorder ::
Ptr Paginator ->
Ptr Gtk.Widget.Widget ->
Int32 ->
IO ()
paginatorReorder ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a, Gtk.Widget.IsWidget b) =>
a
-> b
-> Int32
-> m ()
paginatorReorder :: a -> b -> Int32 -> m ()
paginatorReorder a
self b
child Int32
position = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Widget
child' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
child
Ptr Paginator -> Ptr Widget -> Int32 -> IO ()
hdy_paginator_reorder Ptr Paginator
self' Ptr Widget
child' Int32
position
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
child
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PaginatorReorderMethodInfo
instance (signature ~ (b -> Int32 -> m ()), MonadIO m, IsPaginator a, Gtk.Widget.IsWidget b) => O.MethodInfo PaginatorReorderMethodInfo a signature where
overloadedMethod = paginatorReorder
#endif
foreign import ccall "hdy_paginator_scroll_to" hdy_paginator_scroll_to ::
Ptr Paginator ->
Ptr Gtk.Widget.Widget ->
IO ()
paginatorScrollTo ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m ()
paginatorScrollTo :: a -> b -> m ()
paginatorScrollTo a
self b
widget = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Widget
widget' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
widget
Ptr Paginator -> Ptr Widget -> IO ()
hdy_paginator_scroll_to Ptr Paginator
self' Ptr Widget
widget'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
widget
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PaginatorScrollToMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsPaginator a, Gtk.Widget.IsWidget b) => O.MethodInfo PaginatorScrollToMethodInfo a signature where
overloadedMethod = paginatorScrollTo
#endif
foreign import ccall "hdy_paginator_scroll_to_full" hdy_paginator_scroll_to_full ::
Ptr Paginator ->
Ptr Gtk.Widget.Widget ->
Int64 ->
IO ()
paginatorScrollToFull ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a, Gtk.Widget.IsWidget b) =>
a
-> b
-> Int64
-> m ()
paginatorScrollToFull :: a -> b -> Int64 -> m ()
paginatorScrollToFull a
self b
widget Int64
duration = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Widget
widget' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
widget
Ptr Paginator -> Ptr Widget -> Int64 -> IO ()
hdy_paginator_scroll_to_full Ptr Paginator
self' Ptr Widget
widget' Int64
duration
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
widget
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PaginatorScrollToFullMethodInfo
instance (signature ~ (b -> Int64 -> m ()), MonadIO m, IsPaginator a, Gtk.Widget.IsWidget b) => O.MethodInfo PaginatorScrollToFullMethodInfo a signature where
overloadedMethod = paginatorScrollToFull
#endif
foreign import ccall "hdy_paginator_set_allow_mouse_drag" hdy_paginator_set_allow_mouse_drag ::
Ptr Paginator ->
CInt ->
IO ()
paginatorSetAllowMouseDrag ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
a
-> Bool
-> m ()
paginatorSetAllowMouseDrag :: a -> Bool -> m ()
paginatorSetAllowMouseDrag a
self Bool
allowMouseDrag = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let allowMouseDrag' :: CInt
allowMouseDrag' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
allowMouseDrag
Ptr Paginator -> CInt -> IO ()
hdy_paginator_set_allow_mouse_drag Ptr Paginator
self' CInt
allowMouseDrag'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PaginatorSetAllowMouseDragMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsPaginator a) => O.MethodInfo PaginatorSetAllowMouseDragMethodInfo a signature where
overloadedMethod = paginatorSetAllowMouseDrag
#endif
foreign import ccall "hdy_paginator_set_animation_duration" hdy_paginator_set_animation_duration ::
Ptr Paginator ->
Word32 ->
IO ()
paginatorSetAnimationDuration ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
a
-> Word32
-> m ()
paginatorSetAnimationDuration :: a -> Word32 -> m ()
paginatorSetAnimationDuration a
self Word32
duration = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Paginator -> PaginatorPageChangedCallback
hdy_paginator_set_animation_duration Ptr Paginator
self' Word32
duration
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PaginatorSetAnimationDurationMethodInfo
instance (signature ~ (Word32 -> m ()), MonadIO m, IsPaginator a) => O.MethodInfo PaginatorSetAnimationDurationMethodInfo a signature where
overloadedMethod = paginatorSetAnimationDuration
#endif
foreign import ccall "hdy_paginator_set_center_content" hdy_paginator_set_center_content ::
Ptr Paginator ->
CInt ->
IO ()
paginatorSetCenterContent ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
a
-> Bool
-> m ()
paginatorSetCenterContent :: a -> Bool -> m ()
paginatorSetCenterContent a
self Bool
centerContent = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let centerContent' :: CInt
centerContent' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
centerContent
Ptr Paginator -> CInt -> IO ()
hdy_paginator_set_center_content Ptr Paginator
self' CInt
centerContent'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PaginatorSetCenterContentMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsPaginator a) => O.MethodInfo PaginatorSetCenterContentMethodInfo a signature where
overloadedMethod = paginatorSetCenterContent
#endif
foreign import ccall "hdy_paginator_set_indicator_spacing" hdy_paginator_set_indicator_spacing ::
Ptr Paginator ->
Word32 ->
IO ()
paginatorSetIndicatorSpacing ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
a
-> Word32
-> m ()
paginatorSetIndicatorSpacing :: a -> Word32 -> m ()
paginatorSetIndicatorSpacing a
self Word32
spacing = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Paginator -> PaginatorPageChangedCallback
hdy_paginator_set_indicator_spacing Ptr Paginator
self' Word32
spacing
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PaginatorSetIndicatorSpacingMethodInfo
instance (signature ~ (Word32 -> m ()), MonadIO m, IsPaginator a) => O.MethodInfo PaginatorSetIndicatorSpacingMethodInfo a signature where
overloadedMethod = paginatorSetIndicatorSpacing
#endif
foreign import ccall "hdy_paginator_set_indicator_style" hdy_paginator_set_indicator_style ::
Ptr Paginator ->
CUInt ->
IO ()
paginatorSetIndicatorStyle ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
a
-> Handy.Enums.PaginatorIndicatorStyle
-> m ()
paginatorSetIndicatorStyle :: a -> PaginatorIndicatorStyle -> m ()
paginatorSetIndicatorStyle a
self PaginatorIndicatorStyle
style = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let style' :: CUInt
style' = (Int -> CUInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CUInt)
-> (PaginatorIndicatorStyle -> Int)
-> PaginatorIndicatorStyle
-> CUInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. PaginatorIndicatorStyle -> Int
forall a. Enum a => a -> Int
fromEnum) PaginatorIndicatorStyle
style
Ptr Paginator -> CUInt -> IO ()
hdy_paginator_set_indicator_style Ptr Paginator
self' CUInt
style'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PaginatorSetIndicatorStyleMethodInfo
instance (signature ~ (Handy.Enums.PaginatorIndicatorStyle -> m ()), MonadIO m, IsPaginator a) => O.MethodInfo PaginatorSetIndicatorStyleMethodInfo a signature where
overloadedMethod = paginatorSetIndicatorStyle
#endif
foreign import ccall "hdy_paginator_set_interactive" hdy_paginator_set_interactive ::
Ptr Paginator ->
CInt ->
IO ()
paginatorSetInteractive ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
a
-> Bool
-> m ()
paginatorSetInteractive :: a -> Bool -> m ()
paginatorSetInteractive a
self Bool
interactive = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let interactive' :: CInt
interactive' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
interactive
Ptr Paginator -> CInt -> IO ()
hdy_paginator_set_interactive Ptr Paginator
self' CInt
interactive'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PaginatorSetInteractiveMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsPaginator a) => O.MethodInfo PaginatorSetInteractiveMethodInfo a signature where
overloadedMethod = paginatorSetInteractive
#endif
foreign import ccall "hdy_paginator_set_spacing" hdy_paginator_set_spacing ::
Ptr Paginator ->
Word32 ->
IO ()
paginatorSetSpacing ::
(B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
a
-> Word32
-> m ()
paginatorSetSpacing :: a -> Word32 -> m ()
paginatorSetSpacing a
self Word32
spacing = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Paginator
self' <- a -> IO (Ptr Paginator)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Paginator -> PaginatorPageChangedCallback
hdy_paginator_set_spacing Ptr Paginator
self' Word32
spacing
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PaginatorSetSpacingMethodInfo
instance (signature ~ (Word32 -> m ()), MonadIO m, IsPaginator a) => O.MethodInfo PaginatorSetSpacingMethodInfo a signature where
overloadedMethod = paginatorSetSpacing
#endif