{-# LANGUAGE TypeApplications #-}


-- | Copyright  : Will Thompson, Iñaki García Etxebarria and Jonas Platte
-- License    : LGPL-2.1
-- Maintainer : Iñaki García Etxebarria
-- 
-- /No description available in the introspection data./

#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif

module GI.Handy.Objects.Paginator
    ( 

-- * Exported types
    Paginator(..)                           ,
    IsPaginator                             ,
    toPaginator                             ,


 -- * Methods
-- ** Overloaded methods #method:Overloaded methods#

#if defined(ENABLE_OVERLOADING)
    ResolvePaginatorMethod                  ,
#endif


-- ** getAllowMouseDrag #method:getAllowMouseDrag#

#if defined(ENABLE_OVERLOADING)
    PaginatorGetAllowMouseDragMethodInfo    ,
#endif
    paginatorGetAllowMouseDrag              ,


-- ** getAnimationDuration #method:getAnimationDuration#

#if defined(ENABLE_OVERLOADING)
    PaginatorGetAnimationDurationMethodInfo ,
#endif
    paginatorGetAnimationDuration           ,


-- ** getCenterContent #method:getCenterContent#

#if defined(ENABLE_OVERLOADING)
    PaginatorGetCenterContentMethodInfo     ,
#endif
    paginatorGetCenterContent               ,


-- ** getIndicatorSpacing #method:getIndicatorSpacing#

#if defined(ENABLE_OVERLOADING)
    PaginatorGetIndicatorSpacingMethodInfo  ,
#endif
    paginatorGetIndicatorSpacing            ,


-- ** getIndicatorStyle #method:getIndicatorStyle#

#if defined(ENABLE_OVERLOADING)
    PaginatorGetIndicatorStyleMethodInfo    ,
#endif
    paginatorGetIndicatorStyle              ,


-- ** getInteractive #method:getInteractive#

#if defined(ENABLE_OVERLOADING)
    PaginatorGetInteractiveMethodInfo       ,
#endif
    paginatorGetInteractive                 ,


-- ** getNPages #method:getNPages#

#if defined(ENABLE_OVERLOADING)
    PaginatorGetNPagesMethodInfo            ,
#endif
    paginatorGetNPages                      ,


-- ** getPosition #method:getPosition#

#if defined(ENABLE_OVERLOADING)
    PaginatorGetPositionMethodInfo          ,
#endif
    paginatorGetPosition                    ,


-- ** getSpacing #method:getSpacing#

#if defined(ENABLE_OVERLOADING)
    PaginatorGetSpacingMethodInfo           ,
#endif
    paginatorGetSpacing                     ,


-- ** insert #method:insert#

#if defined(ENABLE_OVERLOADING)
    PaginatorInsertMethodInfo               ,
#endif
    paginatorInsert                         ,


-- ** new #method:new#

    paginatorNew                            ,


-- ** prepend #method:prepend#

#if defined(ENABLE_OVERLOADING)
    PaginatorPrependMethodInfo              ,
#endif
    paginatorPrepend                        ,


-- ** reorder #method:reorder#

#if defined(ENABLE_OVERLOADING)
    PaginatorReorderMethodInfo              ,
#endif
    paginatorReorder                        ,


-- ** scrollTo #method:scrollTo#

#if defined(ENABLE_OVERLOADING)
    PaginatorScrollToMethodInfo             ,
#endif
    paginatorScrollTo                       ,


-- ** scrollToFull #method:scrollToFull#

#if defined(ENABLE_OVERLOADING)
    PaginatorScrollToFullMethodInfo         ,
#endif
    paginatorScrollToFull                   ,


-- ** setAllowMouseDrag #method:setAllowMouseDrag#

#if defined(ENABLE_OVERLOADING)
    PaginatorSetAllowMouseDragMethodInfo    ,
#endif
    paginatorSetAllowMouseDrag              ,


-- ** setAnimationDuration #method:setAnimationDuration#

#if defined(ENABLE_OVERLOADING)
    PaginatorSetAnimationDurationMethodInfo ,
#endif
    paginatorSetAnimationDuration           ,


-- ** setCenterContent #method:setCenterContent#

#if defined(ENABLE_OVERLOADING)
    PaginatorSetCenterContentMethodInfo     ,
#endif
    paginatorSetCenterContent               ,


-- ** setIndicatorSpacing #method:setIndicatorSpacing#

#if defined(ENABLE_OVERLOADING)
    PaginatorSetIndicatorSpacingMethodInfo  ,
#endif
    paginatorSetIndicatorSpacing            ,


-- ** setIndicatorStyle #method:setIndicatorStyle#

#if defined(ENABLE_OVERLOADING)
    PaginatorSetIndicatorStyleMethodInfo    ,
#endif
    paginatorSetIndicatorStyle              ,


-- ** setInteractive #method:setInteractive#

#if defined(ENABLE_OVERLOADING)
    PaginatorSetInteractiveMethodInfo       ,
#endif
    paginatorSetInteractive                 ,


-- ** setSpacing #method:setSpacing#

#if defined(ENABLE_OVERLOADING)
    PaginatorSetSpacingMethodInfo           ,
#endif
    paginatorSetSpacing                     ,




 -- * Properties
-- ** allowMouseDrag #attr:allowMouseDrag#
-- | Sets whether the t'GI.Handy.Objects.Paginator.Paginator' can be dragged with mouse pointer. If the
-- value is 'P.False', dragging is only available on touch.
-- 
-- This should usually be 'P.False'.
-- 
-- /Since: 0.0.12/

#if defined(ENABLE_OVERLOADING)
    PaginatorAllowMouseDragPropertyInfo     ,
#endif
    constructPaginatorAllowMouseDrag        ,
    getPaginatorAllowMouseDrag              ,
#if defined(ENABLE_OVERLOADING)
    paginatorAllowMouseDrag                 ,
#endif
    setPaginatorAllowMouseDrag              ,


-- ** animationDuration #attr:animationDuration#
-- | Animation duration in milliseconds, used by 'GI.Handy.Objects.Paginator.paginatorScrollTo'.
-- 
-- /Since: 0.0.11/

#if defined(ENABLE_OVERLOADING)
    PaginatorAnimationDurationPropertyInfo  ,
#endif
    constructPaginatorAnimationDuration     ,
    getPaginatorAnimationDuration           ,
#if defined(ENABLE_OVERLOADING)
    paginatorAnimationDuration              ,
#endif
    setPaginatorAnimationDuration           ,


-- ** centerContent #attr:centerContent#
-- | Whether the t'GI.Handy.Objects.Paginator.Paginator' is centering pages. If
-- t'GI.Handy.Objects.Paginator.Paginator':@/indicator-style/@ is /@hDYPAGINATORINDICATORSTYLENONE@/,
-- centering does nothing, otherwise it adds whitespace to the left or above
-- the pages to compensate for the indicators.
-- 
-- /Since: 0.0.11/

#if defined(ENABLE_OVERLOADING)
    PaginatorCenterContentPropertyInfo      ,
#endif
    constructPaginatorCenterContent         ,
    getPaginatorCenterContent               ,
#if defined(ENABLE_OVERLOADING)
    paginatorCenterContent                  ,
#endif
    setPaginatorCenterContent               ,


-- ** indicatorSpacing #attr:indicatorSpacing#
-- | Spacing between content and page indicators. Does nothing if
-- t'GI.Handy.Objects.Paginator.Paginator':@/indicator-style/@ is /@hDYPAGINATORINDICATORSTYLENONE@/.
-- 
-- /Since: 0.0.11/

#if defined(ENABLE_OVERLOADING)
    PaginatorIndicatorSpacingPropertyInfo   ,
#endif
    constructPaginatorIndicatorSpacing      ,
    getPaginatorIndicatorSpacing            ,
#if defined(ENABLE_OVERLOADING)
    paginatorIndicatorSpacing               ,
#endif
    setPaginatorIndicatorSpacing            ,


-- ** indicatorStyle #attr:indicatorStyle#
-- | The style of page indicators. Depending on orientation, they are displayed
-- below or besides the pages. If the pages are meant to be centered,
-- t'GI.Handy.Objects.Paginator.Paginator':@/center-content/@ can be used to compensate for that.
-- 
-- /Since: 0.0.11/

#if defined(ENABLE_OVERLOADING)
    PaginatorIndicatorStylePropertyInfo     ,
#endif
    constructPaginatorIndicatorStyle        ,
    getPaginatorIndicatorStyle              ,
#if defined(ENABLE_OVERLOADING)
    paginatorIndicatorStyle                 ,
#endif
    setPaginatorIndicatorStyle              ,


-- ** interactive #attr:interactive#
-- | Whether /@self@/ can be navigated. This can be used to temporarily disable
-- a t'GI.Handy.Objects.Paginator.Paginator' to only allow navigating it in a certain state.
-- 
-- /Since: 0.0.11/

#if defined(ENABLE_OVERLOADING)
    PaginatorInteractivePropertyInfo        ,
#endif
    constructPaginatorInteractive           ,
    getPaginatorInteractive                 ,
#if defined(ENABLE_OVERLOADING)
    paginatorInteractive                    ,
#endif
    setPaginatorInteractive                 ,


-- ** nPages #attr:nPages#
-- | The number of pages in a t'GI.Handy.Objects.Paginator.Paginator'
-- 
-- /Since: 0.0.11/

#if defined(ENABLE_OVERLOADING)
    PaginatorNPagesPropertyInfo             ,
#endif
    getPaginatorNPages                      ,
#if defined(ENABLE_OVERLOADING)
    paginatorNPages                         ,
#endif


-- ** position #attr:position#
-- | Current scrolling position, unitless. 1 matches 1 page. Use
-- 'GI.Handy.Objects.Paginator.paginatorScrollTo' for changing it.
-- 
-- /Since: 0.0.11/

#if defined(ENABLE_OVERLOADING)
    PaginatorPositionPropertyInfo           ,
#endif
    getPaginatorPosition                    ,
#if defined(ENABLE_OVERLOADING)
    paginatorPosition                       ,
#endif


-- ** spacing #attr:spacing#
-- | Spacing between pages in pixels.
-- 
-- /Since: 0.0.11/

#if defined(ENABLE_OVERLOADING)
    PaginatorSpacingPropertyInfo            ,
#endif
    constructPaginatorSpacing               ,
    getPaginatorSpacing                     ,
#if defined(ENABLE_OVERLOADING)
    paginatorSpacing                        ,
#endif
    setPaginatorSpacing                     ,




 -- * Signals
-- ** pageChanged #signal:pageChanged#

    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

-- | Memory-managed wrapper type.
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

-- | Convert 'Paginator' to and from 'Data.GI.Base.GValue.GValue' with 'Data.GI.Base.GValue.toGValue' and 'Data.GI.Base.GValue.fromGValue'.
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
        
    

-- | Type class for types which can be safely cast to `Paginator`, for instance with `toPaginator`.
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]

-- | Cast to `Paginator`, for types for which this is known to be safe. For general casts, use `Data.GI.Base.ManagedPtr.castTo`.
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

-- signal Paginator::page-changed
-- | This signal is emitted after a page has been changed. This can be used to
-- implement \"infinite scrolling\" by connecting to this signal and amending
-- the pages.
-- 
-- /Since: 0.0.12/
type PaginatorPageChangedCallback =
    Word32
    -- ^ /@index@/: Current page
    -> IO ()

-- | A convenience synonym for @`Nothing` :: `Maybe` `PaginatorPageChangedCallback`@.
noPaginatorPageChangedCallback :: Maybe PaginatorPageChangedCallback
noPaginatorPageChangedCallback :: Maybe PaginatorPageChangedCallback
noPaginatorPageChangedCallback = Maybe PaginatorPageChangedCallback
forall a. Maybe a
Nothing

-- | Type for the callback on the (unwrapped) C side.
type C_PaginatorPageChangedCallback =
    Ptr () ->                               -- object
    Word32 ->
    Ptr () ->                               -- user_data
    IO ()

-- | Generate a function pointer callable from C code, from a `C_PaginatorPageChangedCallback`.
foreign import ccall "wrapper"
    mk_PaginatorPageChangedCallback :: C_PaginatorPageChangedCallback -> IO (FunPtr C_PaginatorPageChangedCallback)

-- | Wrap the callback into a `GClosure`.
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 a `PaginatorPageChangedCallback` into a `C_PaginatorPageChangedCallback`.
wrap_PaginatorPageChangedCallback ::
    PaginatorPageChangedCallback ->
    C_PaginatorPageChangedCallback
wrap_PaginatorPageChangedCallback :: PaginatorPageChangedCallback -> C_PaginatorPageChangedCallback
wrap_PaginatorPageChangedCallback PaginatorPageChangedCallback
_cb Ptr ()
_ Word32
index Ptr ()
_ = do
    PaginatorPageChangedCallback
_cb  Word32
index


-- | Connect a signal handler for the [pageChanged](#signal:pageChanged) signal, to be run before the default handler.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Signals.on' paginator #pageChanged callback
-- @
-- 
-- 
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

-- | Connect a signal handler for the [pageChanged](#signal:pageChanged) signal, to be run after the default handler.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Signals.after' paginator #pageChanged callback
-- @
-- 
-- 
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

-- VVV Prop "allow-mouse-drag"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@allow-mouse-drag@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' paginator #allowMouseDrag
-- @
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"

-- | Set the value of the “@allow-mouse-drag@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' paginator [ #allowMouseDrag 'Data.GI.Base.Attributes.:=' value ]
-- @
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

-- | Construct a `GValueConstruct` with valid value for the “@allow-mouse-drag@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
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

-- VVV Prop "animation-duration"
   -- Type: TBasicType TUInt
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@animation-duration@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' paginator #animationDuration
-- @
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"

-- | Set the value of the “@animation-duration@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' paginator [ #animationDuration 'Data.GI.Base.Attributes.:=' value ]
-- @
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

-- | Construct a `GValueConstruct` with valid value for the “@animation-duration@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
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

-- VVV Prop "center-content"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@center-content@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' paginator #centerContent
-- @
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"

-- | Set the value of the “@center-content@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' paginator [ #centerContent 'Data.GI.Base.Attributes.:=' value ]
-- @
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

-- | Construct a `GValueConstruct` with valid value for the “@center-content@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
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

-- VVV Prop "indicator-spacing"
   -- Type: TBasicType TUInt
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@indicator-spacing@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' paginator #indicatorSpacing
-- @
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"

-- | Set the value of the “@indicator-spacing@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' paginator [ #indicatorSpacing 'Data.GI.Base.Attributes.:=' value ]
-- @
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

-- | Construct a `GValueConstruct` with valid value for the “@indicator-spacing@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
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

-- VVV Prop "indicator-style"
   -- Type: TInterface (Name {namespace = "Handy", name = "PaginatorIndicatorStyle"})
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@indicator-style@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' paginator #indicatorStyle
-- @
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"

-- | Set the value of the “@indicator-style@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' paginator [ #indicatorStyle 'Data.GI.Base.Attributes.:=' value ]
-- @
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

-- | Construct a `GValueConstruct` with valid value for the “@indicator-style@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
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

-- VVV Prop "interactive"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@interactive@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' paginator #interactive
-- @
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"

-- | Set the value of the “@interactive@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' paginator [ #interactive 'Data.GI.Base.Attributes.:=' value ]
-- @
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

-- | Construct a `GValueConstruct` with valid value for the “@interactive@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
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

-- VVV Prop "n-pages"
   -- Type: TBasicType TUInt
   -- Flags: [PropertyReadable]
   -- Nullable: (Just False,Nothing)

-- | Get the value of the “@n-pages@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' paginator #nPages
-- @
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

-- VVV Prop "position"
   -- Type: TBasicType TDouble
   -- Flags: [PropertyReadable]
   -- Nullable: (Just False,Nothing)

-- | Get the value of the “@position@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' paginator #position
-- @
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

-- VVV Prop "spacing"
   -- Type: TBasicType TUInt
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@spacing@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' paginator #spacing
-- @
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"

-- | Set the value of the “@spacing@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' paginator [ #spacing 'Data.GI.Base.Attributes.:=' value ]
-- @
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

-- | Construct a `GValueConstruct` with valid value for the “@spacing@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
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

-- method Paginator::new
-- method type : Constructor
-- Args: []
-- Lengths: []
-- returnType: Just (TInterface Name { namespace = "Handy" , name = "Paginator" })
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_new" hdy_paginator_new :: 
    IO (Ptr Paginator)

-- | Create a new t'GI.Handy.Objects.Paginator.Paginator' widget.
-- 
-- /Since: 0.0.11/
paginatorNew ::
    (B.CallStack.HasCallStack, MonadIO m) =>
    m Paginator
    -- ^ __Returns:__ The newly created t'GI.Handy.Objects.Paginator.Paginator' widget
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

-- method Paginator::get_allow_mouse_drag
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_get_allow_mouse_drag" hdy_paginator_get_allow_mouse_drag :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    IO CInt

-- | Sets whether /@self@/ can be dragged with mouse pointer
-- 
-- /Since: 0.0.12/
paginatorGetAllowMouseDrag ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> m Bool
    -- ^ __Returns:__ 'P.True' if /@self@/ can be dragged with mouse
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

-- method Paginator::get_animation_duration
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUInt)
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_get_animation_duration" hdy_paginator_get_animation_duration :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    IO Word32

-- | Gets animation duration used by 'GI.Handy.Objects.Paginator.paginatorScrollTo'.
-- 
-- /Since: 0.0.11/
paginatorGetAnimationDuration ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> m Word32
    -- ^ __Returns:__ Animation duration in milliseconds
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

-- method Paginator::get_center_content
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_get_center_content" hdy_paginator_get_center_content :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    IO CInt

-- | Sets whether /@self@/ is centering pages.
-- 
-- /Since: 0.0.11/
paginatorGetCenterContent ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> m Bool
    -- ^ __Returns:__ 'P.True' if /@self@/ is centering pages
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

-- method Paginator::get_indicator_spacing
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUInt)
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_get_indicator_spacing" hdy_paginator_get_indicator_spacing :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    IO Word32

-- | Gets spacing between content and page indicators.
-- 
-- /Since: 0.0.11/
paginatorGetIndicatorSpacing ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> m Word32
    -- ^ __Returns:__ Spacing between content and indicators
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

-- method Paginator::get_indicator_style
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just
--               (TInterface
--                  Name { namespace = "Handy" , name = "PaginatorIndicatorStyle" })
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_get_indicator_style" hdy_paginator_get_indicator_style :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    IO CUInt

-- | Gets the current page indicator style.
-- 
-- /Since: 0.0.11/
paginatorGetIndicatorStyle ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> m Handy.Enums.PaginatorIndicatorStyle
    -- ^ __Returns:__ the current indicator style
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

-- method Paginator::get_interactive
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_get_interactive" hdy_paginator_get_interactive :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    IO CInt

-- | Gets whether /@self@/ can be navigated.
-- 
-- /Since: 0.0.11/
paginatorGetInteractive ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> m Bool
    -- ^ __Returns:__ 'P.True' if /@self@/ can be swiped
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

-- method Paginator::get_n_pages
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUInt)
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_get_n_pages" hdy_paginator_get_n_pages :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    IO Word32

-- | Gets the number of pages in /@self@/.
-- 
-- /Since: 0.0.11/
paginatorGetNPages ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> m Word32
    -- ^ __Returns:__ The number of pages in /@self@/
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

-- method Paginator::get_position
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TDouble)
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_get_position" hdy_paginator_get_position :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    IO CDouble

-- | Gets current scroll position in /@self@/. It\'s unitless, 1 matches 1 page.
-- 
-- /Since: 0.0.11/
paginatorGetPosition ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> m Double
    -- ^ __Returns:__ The scroll position
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

-- method Paginator::get_spacing
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUInt)
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_get_spacing" hdy_paginator_get_spacing :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    IO Word32

-- | Gets spacing between pages in pixels.
-- 
-- /Since: 0.0.11/
paginatorGetSpacing ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> m Word32
    -- ^ __Returns:__ Spacing between pages
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

-- method Paginator::insert
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "child"
--           , argType = TInterface Name { namespace = "Gtk" , name = "Widget" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a widget to add" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "position"
--           , argType = TBasicType TInt
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the position to insert @child in."
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_insert" hdy_paginator_insert :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    Ptr Gtk.Widget.Widget ->                -- child : TInterface (Name {namespace = "Gtk", name = "Widget"})
    Int32 ->                                -- position : TBasicType TInt
    IO ()

-- | Inserts /@child@/ into /@self@/ at position /@position@/.
-- 
-- If position is -1, or larger than the number of pages,
-- /@child@/ will be appended to the end.
-- 
-- /Since: 0.0.11/
paginatorInsert ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a, Gtk.Widget.IsWidget b) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> b
    -- ^ /@child@/: a widget to add
    -> Int32
    -- ^ /@position@/: the position to insert /@child@/ in.
    -> 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

-- method Paginator::prepend
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "child"
--           , argType = TInterface Name { namespace = "Gtk" , name = "Widget" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a widget to add" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_prepend" hdy_paginator_prepend :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    Ptr Gtk.Widget.Widget ->                -- child : TInterface (Name {namespace = "Gtk", name = "Widget"})
    IO ()

-- | Prepends /@child@/ to /@self@/
-- 
-- /Since: 0.0.11/
paginatorPrepend ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a, Gtk.Widget.IsWidget b) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> b
    -- ^ /@child@/: a widget to add
    -> 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

-- method Paginator::reorder
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "child"
--           , argType = TInterface Name { namespace = "Gtk" , name = "Widget" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a widget to add" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "position"
--           , argType = TBasicType TInt
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the position to move @child to."
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_reorder" hdy_paginator_reorder :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    Ptr Gtk.Widget.Widget ->                -- child : TInterface (Name {namespace = "Gtk", name = "Widget"})
    Int32 ->                                -- position : TBasicType TInt
    IO ()

-- | Moves /@child@/ into position /@position@/.
-- 
-- If position is -1, or larger than the number of pages, /@child@/ will be moved
-- to the end.
-- 
-- /Since: 0.0.11/
paginatorReorder ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a, Gtk.Widget.IsWidget b) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> b
    -- ^ /@child@/: a widget to add
    -> Int32
    -- ^ /@position@/: the position to move /@child@/ to.
    -> 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

-- method Paginator::scroll_to
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "widget"
--           , argType = TInterface Name { namespace = "Gtk" , name = "Widget" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a child of @self" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_scroll_to" hdy_paginator_scroll_to :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    Ptr Gtk.Widget.Widget ->                -- widget : TInterface (Name {namespace = "Gtk", name = "Widget"})
    IO ()

-- | Scrolls to /@widget@/ position with an animation.
-- t'GI.Handy.Objects.Paginator.Paginator':@/animation-duration/@ property can be used for controlling the
-- duration.
-- 
-- /Since: 0.0.11/
paginatorScrollTo ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a, Gtk.Widget.IsWidget b) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> b
    -- ^ /@widget@/: a child of /@self@/
    -> 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

-- method Paginator::scroll_to_full
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "widget"
--           , argType = TInterface Name { namespace = "Gtk" , name = "Widget" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a child of @self" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "duration"
--           , argType = TBasicType TInt64
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "animation duration in milliseconds"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_scroll_to_full" hdy_paginator_scroll_to_full :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    Ptr Gtk.Widget.Widget ->                -- widget : TInterface (Name {namespace = "Gtk", name = "Widget"})
    Int64 ->                                -- duration : TBasicType TInt64
    IO ()

-- | Scrolls to /@widget@/ position with an animation.
-- 
-- /Since: 0.0.11/
paginatorScrollToFull ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a, Gtk.Widget.IsWidget b) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> b
    -- ^ /@widget@/: a child of /@self@/
    -> Int64
    -- ^ /@duration@/: animation duration in milliseconds
    -> 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

-- method Paginator::set_allow_mouse_drag
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "allow_mouse_drag"
--           , argType = TBasicType TBoolean
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText =
--                     Just "whether @self can be dragged with mouse pointer"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_set_allow_mouse_drag" hdy_paginator_set_allow_mouse_drag :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    CInt ->                                 -- allow_mouse_drag : TBasicType TBoolean
    IO ()

-- | Sets whether /@self@/ can be dragged with mouse pointer. If /@allowMouseDrag@/
-- is 'P.False', dragging is only available on touch.
-- 
-- This should usually be 'P.False'.
-- 
-- /Since: 0.0.12/
paginatorSetAllowMouseDrag ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> Bool
    -- ^ /@allowMouseDrag@/: whether /@self@/ can be dragged with mouse pointer
    -> 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

-- method Paginator::set_animation_duration
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "duration"
--           , argType = TBasicType TUInt
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "animation duration in milliseconds"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_set_animation_duration" hdy_paginator_set_animation_duration :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    Word32 ->                               -- duration : TBasicType TUInt
    IO ()

-- | Sets animation duration used by 'GI.Handy.Objects.Paginator.paginatorScrollTo'.
-- 
-- /Since: 0.0.11/
paginatorSetAnimationDuration ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> Word32
    -- ^ /@duration@/: animation duration in milliseconds
    -> 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

-- method Paginator::set_center_content
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "center_content"
--           , argType = TBasicType TBoolean
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "whether @self should center contents"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_set_center_content" hdy_paginator_set_center_content :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    CInt ->                                 -- center_content : TBasicType TBoolean
    IO ()

-- | Sets whether /@self@/ is centering content. If t'GI.Handy.Objects.Paginator.Paginator':@/indicator-style/@ is
-- /@hDYPAGINATORINDICATORSTYLENONE@/, centering does nothing, otherwise it
-- adds whitespace to the left or above the pages to compensate for the
-- indicators.
-- 
-- /Since: 0.0.11/
paginatorSetCenterContent ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> Bool
    -- ^ /@centerContent@/: whether /@self@/ should center contents
    -> 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

-- method Paginator::set_indicator_spacing
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "spacing"
--           , argType = TBasicType TUInt
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the new spacing value"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_set_indicator_spacing" hdy_paginator_set_indicator_spacing :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    Word32 ->                               -- spacing : TBasicType TUInt
    IO ()

-- | Sets spacing between content and page indicators. Does nothing if
-- t'GI.Handy.Objects.Paginator.Paginator':@/indicator-style/@ is /@hDYPAGINATORINDICATORSTYLENONE@/.
-- 
-- /Since: 0.0.11/
paginatorSetIndicatorSpacing ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> Word32
    -- ^ /@spacing@/: the new spacing value
    -> 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

-- method Paginator::set_indicator_style
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "style"
--           , argType =
--               TInterface
--                 Name { namespace = "Handy" , name = "PaginatorIndicatorStyle" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "indicator style to use"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_set_indicator_style" hdy_paginator_set_indicator_style :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    CUInt ->                                -- style : TInterface (Name {namespace = "Handy", name = "PaginatorIndicatorStyle"})
    IO ()

-- | Sets style of page indicators. Depending on orientation, they are displayed
-- below or besides the pages. If the pages are meant to be centered,
-- t'GI.Handy.Objects.Paginator.Paginator':@/center-content/@ can be used to compensate for that.
-- 
-- /Since: 0.0.11/
paginatorSetIndicatorStyle ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> Handy.Enums.PaginatorIndicatorStyle
    -- ^ /@style@/: indicator style to use
    -> 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

-- method Paginator::set_interactive
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "interactive"
--           , argType = TBasicType TBoolean
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "whether @self can be swiped."
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_set_interactive" hdy_paginator_set_interactive :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    CInt ->                                 -- interactive : TBasicType TBoolean
    IO ()

-- | Sets whether /@self@/ can be navigated. This can be used to temporarily disable
-- a t'GI.Handy.Objects.Paginator.Paginator' to only allow swiping in a certain state.
-- 
-- /Since: 0.0.11/
paginatorSetInteractive ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> Bool
    -- ^ /@interactive@/: whether /@self@/ can be swiped.
    -> 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

-- method Paginator::set_spacing
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Handy" , name = "Paginator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #HdyPaginator" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "spacing"
--           , argType = TBasicType TUInt
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the new spacing value"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "hdy_paginator_set_spacing" hdy_paginator_set_spacing :: 
    Ptr Paginator ->                        -- self : TInterface (Name {namespace = "Handy", name = "Paginator"})
    Word32 ->                               -- spacing : TBasicType TUInt
    IO ()

-- | Sets spacing between pages in pixels.
-- 
-- /Since: 0.0.11/
paginatorSetSpacing ::
    (B.CallStack.HasCallStack, MonadIO m, IsPaginator a) =>
    a
    -- ^ /@self@/: a t'GI.Handy.Objects.Paginator.Paginator'
    -> Word32
    -- ^ /@spacing@/: the new spacing value
    -> 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