    {-# LANGUAGE ImplicitParams, RankNTypes, TypeApplications #-}

    -- | Copyright  : Will Thompson and Iñaki García Etxebarria
    -- License    : LGPL-2.1
    -- Maintainer : Iñaki García Etxebarria
    --
    -- t'GI.Gtk.Objects.EventControllerScroll.EventControllerScroll' is an event controller meant to handle
    -- scroll events from mice and touchpads. It is capable of handling
    -- both discrete and continuous scroll events, abstracting them both
    -- on the [EventControllerScroll::scroll]("GI.Gtk.Objects.EventControllerScroll#g:signal:scroll") signal (deltas in the
    -- discrete case are multiples of 1).
    --
    -- In the case of continuous scroll events, t'GI.Gtk.Objects.EventControllerScroll.EventControllerScroll'
    -- encloses all [EventControllerScroll::scroll]("GI.Gtk.Objects.EventControllerScroll#g:signal:scroll") events between two
    -- [EventControllerScroll::scrollBegin]("GI.Gtk.Objects.EventControllerScroll#g:signal:scrollBegin") and [EventControllerScroll::scrollEnd]("GI.Gtk.Objects.EventControllerScroll#g:signal:scrollEnd")
    -- signals.
    --
    -- The behavior of the event controller can be modified by the
    -- flags given at creation time, or modified at a later point through
    -- 'GI.Gtk.Objects.EventControllerScroll.eventControllerScrollSetFlags' (e.g. because the scrolling
    -- conditions of the widget changed).
    --
    -- The controller can be set up to emit motion for either\/both vertical
    -- and horizontal scroll events through @/GTK_EVENT_CONTROLLER_SCROLL_VERTICAL/@,
    -- @/GTK_EVENT_CONTROLLER_SCROLL_HORIZONTAL/@ and @/GTK_EVENT_CONTROLLER_SCROLL_BOTH/@.
    -- If any axis is disabled, the respective [EventControllerScroll::scroll]("GI.Gtk.Objects.EventControllerScroll#g:signal:scroll")
    -- delta will be 0. Vertical scroll events will be translated to horizontal
    -- motion for the devices incapable of horizontal scrolling.
    --
    -- The event controller can also be forced to emit discrete events on all devices
    -- through @/GTK_EVENT_CONTROLLER_SCROLL_DISCRETE/@. This can be used to implement
    -- discrete actions triggered through scroll events (e.g. switching across
    -- combobox options).
    --
    -- The @/GTK_EVENT_CONTROLLER_SCROLL_KINETIC/@ flag toggles the emission of the
    -- [EventControllerScroll::decelerate]("GI.Gtk.Objects.EventControllerScroll#g:signal:decelerate") signal, emitted at the end of scrolling
    -- with two X\/Y velocity arguments that are consistent with the motion that
    -- was received.
    --
    -- This object was added in 3.24.

    #if !defined(__HADDOCK_VERSION__)
    #define ENABLE_OVERLOADING
    #endif

    module GI.Gtk.Objects.EventControllerScroll
        (

    -- * Exported types
        EventControllerScroll(..)               ,
        IsEventControllerScroll                 ,
        toEventControllerScroll                 ,

     -- * Methods
    -- |
    --
    --  === __Click to display all available methods, including inherited ones__
    -- ==== Methods
    -- [bindProperty]("GI.GObject.Objects.Object#g:method:bindProperty"), [bindPropertyFull]("GI.GObject.Objects.Object#g:method:bindPropertyFull"), [forceFloating]("GI.GObject.Objects.Object#g:method:forceFloating"), [freezeNotify]("GI.GObject.Objects.Object#g:method:freezeNotify"), [getv]("GI.GObject.Objects.Object#g:method:getv"), [handleEvent]("GI.Gtk.Objects.EventController#g:method:handleEvent"), [isFloating]("GI.GObject.Objects.Object#g:method:isFloating"), [notify]("GI.GObject.Objects.Object#g:method:notify"), [notifyByPspec]("GI.GObject.Objects.Object#g:method:notifyByPspec"), [ref]("GI.GObject.Objects.Object#g:method:ref"), [refSink]("GI.GObject.Objects.Object#g:method:refSink"), [reset]("GI.Gtk.Objects.EventController#g:method:reset"), [runDispose]("GI.GObject.Objects.Object#g:method:runDispose"), [stealData]("GI.GObject.Objects.Object#g:method:stealData"), [stealQdata]("GI.GObject.Objects.Object#g:method:stealQdata"), [thawNotify]("GI.GObject.Objects.Object#g:method:thawNotify"), [unref]("GI.GObject.Objects.Object#g:method:unref"), [watchClosure]("GI.GObject.Objects.Object#g:method:watchClosure").
    --
    -- ==== Getters
    -- [getData]("GI.GObject.Objects.Object#g:method:getData"), [getFlags]("GI.Gtk.Objects.EventControllerScroll#g:method:getFlags"), [getPropagationPhase]("GI.Gtk.Objects.EventController#g:method:getPropagationPhase"), [getProperty]("GI.GObject.Objects.Object#g:method:getProperty"), [getQdata]("GI.GObject.Objects.Object#g:method:getQdata"), [getWidget]("GI.Gtk.Objects.EventController#g:method:getWidget").
    --
    -- ==== Setters
    -- [setData]("GI.GObject.Objects.Object#g:method:setData"), [setDataFull]("GI.GObject.Objects.Object#g:method:setDataFull"), [setFlags]("GI.Gtk.Objects.EventControllerScroll#g:method:setFlags"), [setPropagationPhase]("GI.Gtk.Objects.EventController#g:method:setPropagationPhase"), [setProperty]("GI.GObject.Objects.Object#g:method:setProperty").

    #if defined(ENABLE_OVERLOADING)
        ResolveEventControllerScrollMethod      ,
    #endif

    -- ** getFlags #method:getFlags#

    #if defined(ENABLE_OVERLOADING)
        EventControllerScrollGetFlagsMethodInfo ,
    #endif
        eventControllerScrollGetFlags           ,

    -- ** new #method:new#

        eventControllerScrollNew                ,

    -- ** setFlags #method:setFlags#

    #if defined(ENABLE_OVERLOADING)
        EventControllerScrollSetFlagsMethodInfo ,
    #endif
        eventControllerScrollSetFlags           ,

     -- * Properties

    -- ** flags #attr:flags#
    -- | The flags affecting event controller behavior
    --
    -- /Since: 3.24/

    #if defined(ENABLE_OVERLOADING)
        EventControllerScrollFlagsPropertyInfo  ,
    #endif
        constructEventControllerScrollFlags     ,
    #if defined(ENABLE_OVERLOADING)
        eventControllerScrollFlags              ,
    #endif
        getEventControllerScrollFlags           ,
        setEventControllerScrollFlags           ,

     -- * Signals

    -- ** decelerate #signal:decelerate#

        EventControllerScrollDecelerateCallback ,
    #if defined(ENABLE_OVERLOADING)
        EventControllerScrollDecelerateSignalInfo,
    #endif
        afterEventControllerScrollDecelerate    ,
        onEventControllerScrollDecelerate       ,

    -- ** scroll #signal:scroll#

        EventControllerScrollScrollCallback     ,
    #if defined(ENABLE_OVERLOADING)
        EventControllerScrollScrollSignalInfo   ,
    #endif
        afterEventControllerScrollScroll        ,
        onEventControllerScrollScroll           ,

    -- ** scrollBegin #signal:scrollBegin#

        EventControllerScrollScrollBeginCallback,
    #if defined(ENABLE_OVERLOADING)
        EventControllerScrollScrollBeginSignalInfo,
    #endif
        afterEventControllerScrollScrollBegin   ,
        onEventControllerScrollScrollBegin      ,

    -- ** scrollEnd #signal:scrollEnd#

        EventControllerScrollScrollEndCallback  ,
    #if defined(ENABLE_OVERLOADING)
        EventControllerScrollScrollEndSignalInfo,
    #endif
        afterEventControllerScrollScrollEnd     ,
        onEventControllerScrollScrollEnd        ,

        ) 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.GArray as B.GArray
    import qualified Data.GI.Base.GClosure as B.GClosure
    import qualified Data.GI.Base.GError as B.GError
    import qualified Data.GI.Base.GHashTable as B.GHT
    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.Coerce as Coerce
    import qualified Data.Text as T
    import qualified Data.Kind as DK
    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 GHC.Records as R
    import qualified Data.Word as DW
    import qualified Data.Int as DI
    import qualified System.Posix.Types as SPT
    import qualified Foreign.C.Types as FCT

    -- Workaround for https://gitlab.haskell.org/ghc/ghc/-/issues/23392
    #if MIN_VERSION_base(4,18,0)
    import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
    import qualified GI.Atk.Objects.Object as Atk.Object
    import qualified GI.Cairo.Structs.Context as Cairo.Context
    import qualified GI.Cairo.Structs.FontOptions as Cairo.FontOptions
    import qualified GI.Cairo.Structs.Region as Cairo.Region
    import qualified GI.Cairo.Structs.Surface as Cairo.Surface
    import qualified GI.GLib.Callbacks as GLib.Callbacks
    import qualified GI.GLib.Structs.MarkupParser as GLib.MarkupParser
    import qualified GI.GObject.Callbacks as GObject.Callbacks
    import qualified GI.GObject.Objects.Object as GObject.Object
    import qualified GI.Gdk.Enums as Gdk.Enums
    import qualified GI.Gdk.Flags as Gdk.Flags
    import qualified GI.Gdk.Objects.Device as Gdk.Device
    import qualified GI.Gdk.Objects.Display as Gdk.Display
    import qualified GI.Gdk.Objects.DragContext as Gdk.DragContext
    import qualified GI.Gdk.Objects.FrameClock as Gdk.FrameClock
    import qualified GI.Gdk.Objects.Screen as Gdk.Screen
    import qualified GI.Gdk.Objects.Visual as Gdk.Visual
    import qualified GI.Gdk.Objects.Window as Gdk.Window
    import qualified GI.Gdk.Structs.Atom as Gdk.Atom
    import qualified GI.Gdk.Structs.Color as Gdk.Color
    import qualified GI.Gdk.Structs.EventAny as Gdk.EventAny
    import qualified GI.Gdk.Structs.EventButton as Gdk.EventButton
    import qualified GI.Gdk.Structs.EventConfigure as Gdk.EventConfigure
    import qualified GI.Gdk.Structs.EventCrossing as Gdk.EventCrossing
    import qualified GI.Gdk.Structs.EventExpose as Gdk.EventExpose
    import qualified GI.Gdk.Structs.EventFocus as Gdk.EventFocus
    import qualified GI.Gdk.Structs.EventGrabBroken as Gdk.EventGrabBroken
    import qualified GI.Gdk.Structs.EventKey as Gdk.EventKey
    import qualified GI.Gdk.Structs.EventMotion as Gdk.EventMotion
    import qualified GI.Gdk.Structs.EventOwnerChange as Gdk.EventOwnerChange
    import qualified GI.Gdk.Structs.EventProperty as Gdk.EventProperty
    import qualified GI.Gdk.Structs.EventProximity as Gdk.EventProximity
    import qualified GI.Gdk.Structs.EventScroll as Gdk.EventScroll
    import qualified GI.Gdk.Structs.EventSelection as Gdk.EventSelection
    import qualified GI.Gdk.Structs.EventVisibility as Gdk.EventVisibility
    import qualified GI.Gdk.Structs.EventWindowState as Gdk.EventWindowState
    import qualified GI.Gdk.Structs.Geometry as Gdk.Geometry
    import qualified GI.Gdk.Structs.RGBA as Gdk.RGBA
    import qualified GI.Gdk.Structs.Rectangle as Gdk.Rectangle
    import qualified GI.Gdk.Unions.Event as Gdk.Event
    import qualified GI.GdkPixbuf.Objects.Pixbuf as GdkPixbuf.Pixbuf
    import qualified GI.Gio.Flags as Gio.Flags
    import qualified GI.Gio.Interfaces.ActionGroup as Gio.ActionGroup
    import qualified GI.Gio.Interfaces.ActionMap as Gio.ActionMap
    import qualified GI.Gio.Interfaces.File as Gio.File
    import qualified GI.Gio.Interfaces.Icon as Gio.Icon
    import qualified GI.Gio.Objects.Application as Gio.Application
    import qualified GI.Gio.Objects.Menu as Gio.Menu
    import qualified GI.Gio.Objects.MenuModel as Gio.MenuModel
    import qualified GI.Gtk.Callbacks as Gtk.Callbacks
    import {-# SOURCE #-} qualified GI.Gtk.Enums as Gtk.Enums
    import {-# SOURCE #-} qualified GI.Gtk.Flags as Gtk.Flags
    import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
    import {-# SOURCE #-} qualified GI.Gtk.Interfaces.StyleProvider as Gtk.StyleProvider
    import {-# SOURCE #-} qualified GI.Gtk.Objects.AccelGroup as Gtk.AccelGroup
    import {-# SOURCE #-} qualified GI.Gtk.Objects.Adjustment as Gtk.Adjustment
    import {-# SOURCE #-} qualified GI.Gtk.Objects.Application as Gtk.Application
    import {-# SOURCE #-} qualified GI.Gtk.Objects.Bin as Gtk.Bin
    import {-# SOURCE #-} qualified GI.Gtk.Objects.Builder as Gtk.Builder
    import {-# SOURCE #-} qualified GI.Gtk.Objects.Clipboard as Gtk.Clipboard
    import {-# SOURCE #-} qualified GI.Gtk.Objects.Container as Gtk.Container
    import {-# SOURCE #-} qualified GI.Gtk.Objects.EventController as Gtk.EventController
    import {-# SOURCE #-} qualified GI.Gtk.Objects.IconFactory as Gtk.IconFactory
    import {-# SOURCE #-} qualified GI.Gtk.Objects.RcStyle as Gtk.RcStyle
    import {-# SOURCE #-} qualified GI.Gtk.Objects.Settings as Gtk.Settings
    import {-# SOURCE #-} qualified GI.Gtk.Objects.Style as Gtk.Style
    import {-# SOURCE #-} qualified GI.Gtk.Objects.StyleContext as Gtk.StyleContext
    import {-# SOURCE #-} qualified GI.Gtk.Objects.StyleProperties as Gtk.StyleProperties
    import {-# SOURCE #-} qualified GI.Gtk.Objects.TextBuffer as Gtk.TextBuffer
    import {-# SOURCE #-} qualified GI.Gtk.Objects.TextChildAnchor as Gtk.TextChildAnchor
    import {-# SOURCE #-} qualified GI.Gtk.Objects.TextMark as Gtk.TextMark
    import {-# SOURCE #-} qualified GI.Gtk.Objects.TextTag as Gtk.TextTag
    import {-# SOURCE #-} qualified GI.Gtk.Objects.TextTagTable as Gtk.TextTagTable
    import {-# SOURCE #-} qualified GI.Gtk.Objects.Tooltip as Gtk.Tooltip
    import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
    import {-# SOURCE #-} qualified GI.Gtk.Objects.Window as Gtk.Window
    import {-# SOURCE #-} qualified GI.Gtk.Objects.WindowGroup as Gtk.WindowGroup
    import {-# SOURCE #-} qualified GI.Gtk.Structs.AccelGroupEntry as Gtk.AccelGroupEntry
    import {-# SOURCE #-} qualified GI.Gtk.Structs.AccelKey as Gtk.AccelKey
    import {-# SOURCE #-} qualified GI.Gtk.Structs.Border as Gtk.Border
    import {-# SOURCE #-} qualified GI.Gtk.Structs.CssSection as Gtk.CssSection
    import {-# SOURCE #-} qualified GI.Gtk.Structs.IconSet as Gtk.IconSet
    import {-# SOURCE #-} qualified GI.Gtk.Structs.IconSource as Gtk.IconSource
    import {-# SOURCE #-} qualified GI.Gtk.Structs.Requisition as Gtk.Requisition
    import {-# SOURCE #-} qualified GI.Gtk.Structs.SelectionData as Gtk.SelectionData
    import {-# SOURCE #-} qualified GI.Gtk.Structs.SettingsValue as Gtk.SettingsValue
    import {-# SOURCE #-} qualified GI.Gtk.Structs.SymbolicColor as Gtk.SymbolicColor
    import {-# SOURCE #-} qualified GI.Gtk.Structs.TargetEntry as Gtk.TargetEntry
    import {-# SOURCE #-} qualified GI.Gtk.Structs.TargetList as Gtk.TargetList
    import {-# SOURCE #-} qualified GI.Gtk.Structs.TextAppearance as Gtk.TextAppearance
    import {-# SOURCE #-} qualified GI.Gtk.Structs.TextAttributes as Gtk.TextAttributes
    import {-# SOURCE #-} qualified GI.Gtk.Structs.TextIter as Gtk.TextIter
    import {-# SOURCE #-} qualified GI.Gtk.Structs.WidgetPath as Gtk.WidgetPath
    import qualified GI.Pango.Enums as Pango.Enums
    import qualified GI.Pango.Objects.Context as Pango.Context
    import qualified GI.Pango.Objects.FontMap as Pango.FontMap
    import qualified GI.Pango.Objects.Layout as Pango.Layout
    import qualified GI.Pango.Structs.FontDescription as Pango.FontDescription
    import qualified GI.Pango.Structs.Language as Pango.Language
    import qualified GI.Pango.Structs.TabArray as Pango.TabArray

    #else
    import qualified GI.GObject.Objects.Object as GObject.Object
    import {-# SOURCE #-} qualified GI.Gtk.Flags as Gtk.Flags
    import {-# SOURCE #-} qualified GI.Gtk.Objects.EventController as Gtk.EventController
    import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget

    #endif

    -- | Memory-managed wrapper type.
    newtype EventControllerScroll = EventControllerScroll (SP.ManagedPtr EventControllerScroll)
        deriving (EventControllerScroll -> EventControllerScroll -> Bool
    (EventControllerScroll -> EventControllerScroll -> Bool)
    -> (EventControllerScroll -> EventControllerScroll -> Bool)
    -> Eq EventControllerScroll
    forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
    $c== :: EventControllerScroll -> EventControllerScroll -> Bool
    == :: EventControllerScroll -> EventControllerScroll -> Bool
    $c/= :: EventControllerScroll -> EventControllerScroll -> Bool
    /= :: EventControllerScroll -> EventControllerScroll -> Bool
    Eq)

    instance SP.ManagedPtrNewtype EventControllerScroll where
        toManagedPtr :: EventControllerScroll -> ManagedPtr EventControllerScroll
    toManagedPtr (EventControllerScroll ManagedPtr EventControllerScroll
    p) = ManagedPtr EventControllerScroll
    p

    foreign import ccall "gtk_event_controller_scroll_get_type"
        c_gtk_event_controller_scroll_get_type :: IO B.Types.GType

    instance B.Types.TypedObject EventControllerScroll where
        glibType :: IO GType
    glibType = IO GType
    c_gtk_event_controller_scroll_get_type

    instance B.Types.GObject EventControllerScroll

    -- | Type class for types which can be safely cast to t'EventControllerScroll', for instance with `toEventControllerScroll`.
    class (SP.GObject o, O.IsDescendantOf EventControllerScroll o) => IsEventControllerScroll o
    instance (SP.GObject o, O.IsDescendantOf EventControllerScroll o) => IsEventControllerScroll o

    instance O.HasParentTypes EventControllerScroll
    type instance O.ParentTypes EventControllerScroll = '[Gtk.EventController.EventController, GObject.Object.Object]

    -- | Cast to t'EventControllerScroll', for types for which this is known to be safe. For general casts, use 'Data.GI.Base.ManagedPtr.castTo'.
    toEventControllerScroll :: (MIO.MonadIO m, IsEventControllerScroll o) => o -> m EventControllerScroll
    toEventControllerScroll :: forall (m :: * -> *) o.
    (MonadIO m, IsEventControllerScroll o) =>
    o -> m EventControllerScroll
    toEventControllerScroll = IO EventControllerScroll -> m EventControllerScroll
    forall a. IO a -> m a
    forall (m :: * -> *) a. MonadIO m => IO a -> m a
    MIO.liftIO (IO EventControllerScroll -> m EventControllerScroll)
    -> (o -> IO EventControllerScroll) -> o -> m EventControllerScroll
    forall b c a. (b -> c) -> (a -> b) -> a -> c
    . (ManagedPtr EventControllerScroll -> EventControllerScroll)
    -> o -> IO EventControllerScroll
    forall o o'.
    (HasCallStack, ManagedPtrNewtype o, TypedObject o,
     ManagedPtrNewtype o', TypedObject o') =>
    (ManagedPtr o' -> o') -> o -> IO o'
    B.ManagedPtr.unsafeCastTo ManagedPtr EventControllerScroll -> EventControllerScroll
    EventControllerScroll

    -- | Convert t'EventControllerScroll' to and from t'Data.GI.Base.GValue.GValue'. See 'Data.GI.Base.GValue.toGValue' and 'Data.GI.Base.GValue.fromGValue'.
    instance B.GValue.IsGValue (Maybe EventControllerScroll) where
        gvalueGType_ :: IO GType
    gvalueGType_ = IO GType
    c_gtk_event_controller_scroll_get_type
        gvalueSet_ :: Ptr GValue -> Maybe EventControllerScroll -> IO ()
    gvalueSet_ Ptr GValue
    gv Maybe EventControllerScroll
    P.Nothing = Ptr GValue -> Ptr EventControllerScroll -> IO ()
    forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
    B.GValue.set_object Ptr GValue
    gv (Ptr EventControllerScroll
    forall a. Ptr a
    FP.nullPtr :: FP.Ptr EventControllerScroll)
        gvalueSet_ Ptr GValue
    gv (P.Just EventControllerScroll
    obj) = EventControllerScroll
    -> (Ptr EventControllerScroll -> IO ()) -> IO ()
    forall a c.
    (HasCallStack, ManagedPtrNewtype a) =>
    a -> (Ptr a -> IO c) -> IO c
    B.ManagedPtr.withManagedPtr EventControllerScroll
    obj (Ptr GValue -> Ptr EventControllerScroll -> IO ()
    forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
    B.GValue.set_object Ptr GValue
    gv)
        gvalueGet_ :: Ptr GValue -> IO (Maybe EventControllerScroll)
    gvalueGet_ Ptr GValue
    gv = do
            ptr <- Ptr GValue -> IO (Ptr EventControllerScroll)
    forall a. GObject a => Ptr GValue -> IO (Ptr a)
    B.GValue.get_object Ptr GValue
    gv :: IO (FP.Ptr EventControllerScroll)
            if ptr /= FP.nullPtr
            then P.Just <$> B.ManagedPtr.newObject EventControllerScroll ptr
            else return P.Nothing

    #if defined(ENABLE_OVERLOADING)
    type family ResolveEventControllerScrollMethod (t :: Symbol) (o :: DK.Type) :: DK.Type where
        ResolveEventControllerScrollMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
        ResolveEventControllerScrollMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
        ResolveEventControllerScrollMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
        ResolveEventControllerScrollMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
        ResolveEventControllerScrollMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
        ResolveEventControllerScrollMethod "handleEvent" o = Gtk.EventController.EventControllerHandleEventMethodInfo
        ResolveEventControllerScrollMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
        ResolveEventControllerScrollMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
        ResolveEventControllerScrollMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
        ResolveEventControllerScrollMethod "ref" o = GObject.Object.ObjectRefMethodInfo
        ResolveEventControllerScrollMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
        ResolveEventControllerScrollMethod "reset" o = Gtk.EventController.EventControllerResetMethodInfo
        ResolveEventControllerScrollMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
        ResolveEventControllerScrollMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
        ResolveEventControllerScrollMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
        ResolveEventControllerScrollMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
        ResolveEventControllerScrollMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
        ResolveEventControllerScrollMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
        ResolveEventControllerScrollMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
        ResolveEventControllerScrollMethod "getFlags" o = EventControllerScrollGetFlagsMethodInfo
        ResolveEventControllerScrollMethod "getPropagationPhase" o = Gtk.EventController.EventControllerGetPropagationPhaseMethodInfo
        ResolveEventControllerScrollMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
        ResolveEventControllerScrollMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
        ResolveEventControllerScrollMethod "getWidget" o = Gtk.EventController.EventControllerGetWidgetMethodInfo
        ResolveEventControllerScrollMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
        ResolveEventControllerScrollMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
        ResolveEventControllerScrollMethod "setFlags" o = EventControllerScrollSetFlagsMethodInfo
        ResolveEventControllerScrollMethod "setPropagationPhase" o = Gtk.EventController.EventControllerSetPropagationPhaseMethodInfo
        ResolveEventControllerScrollMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
        ResolveEventControllerScrollMethod l o = O.MethodResolutionFailed l o

    instance (info ~ ResolveEventControllerScrollMethod t EventControllerScroll, O.OverloadedMethod info EventControllerScroll p) => OL.IsLabel t (EventControllerScroll -> p) where
    #if MIN_VERSION_base(4,10,0)
        fromLabel = O.overloadedMethod @info
    #else
        fromLabel _ = O.overloadedMethod @info
    #endif

    #if MIN_VERSION_base(4,13,0)
    instance (info ~ ResolveEventControllerScrollMethod t EventControllerScroll, O.OverloadedMethod info EventControllerScroll p, R.HasField t EventControllerScroll p) => R.HasField t EventControllerScroll p where
        getField = O.overloadedMethod @info

    #endif

    instance (info ~ ResolveEventControllerScrollMethod t EventControllerScroll, O.OverloadedMethodInfo info EventControllerScroll) => OL.IsLabel t (O.MethodProxy info EventControllerScroll) where
    #if MIN_VERSION_base(4,10,0)
        fromLabel = O.MethodProxy
    #else
        fromLabel _ = O.MethodProxy
    #endif

    #endif

    -- signal EventControllerScroll::decelerate
    -- | Emitted after scroll is finished if the @/GTK_EVENT_CONTROLLER_SCROLL_KINETIC/@
    -- flag is set. /@velX@/ and /@velY@/ express the initial velocity that was
    -- imprinted by the scroll events. /@velX@/ and /@velY@/ are expressed in
    -- pixels\/ms.
    type EventControllerScrollDecelerateCallback =
        Double
        -- ^ /@velX@/: X velocity
        -> Double
        -- ^ /@velY@/: Y velocity
        -> IO ()

    type C_EventControllerScrollDecelerateCallback =
        Ptr EventControllerScroll ->            -- object
        CDouble ->
        CDouble ->
        Ptr () ->                               -- user_data
        IO ()

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

    wrap_EventControllerScrollDecelerateCallback ::
        GObject a => (a -> EventControllerScrollDecelerateCallback) ->
        C_EventControllerScrollDecelerateCallback
    wrap_EventControllerScrollDecelerateCallback :: forall a.
    GObject a =>
    (a -> EventControllerScrollDecelerateCallback)
    -> C_EventControllerScrollDecelerateCallback
    wrap_EventControllerScrollDecelerateCallback a -> EventControllerScrollDecelerateCallback
    gi'cb Ptr EventControllerScroll
    gi'selfPtr CDouble
    velX CDouble
    velY Ptr ()
    _ = do
        let velX' :: Double
    velX' = CDouble -> Double
    forall a b. (Real a, Fractional b) => a -> b
    realToFrac CDouble
    velX
        let velY' :: Double
    velY' = CDouble -> Double
    forall a b. (Real a, Fractional b) => a -> b
    realToFrac CDouble
    velY
        Ptr EventControllerScroll
    -> (EventControllerScroll -> IO ()) -> IO ()
    forall o b.
    (HasCallStack, GObject o) =>
    Ptr o -> (o -> IO b) -> IO b
    B.ManagedPtr.withNewObject Ptr EventControllerScroll
    gi'selfPtr ((EventControllerScroll -> IO ()) -> IO ())
    -> (EventControllerScroll -> IO ()) -> IO ()
    forall a b. (a -> b) -> a -> b
    $ \EventControllerScroll
    gi'self -> a -> EventControllerScrollDecelerateCallback
    gi'cb (EventControllerScroll -> a
    forall a b. Coercible a b => a -> b
    Coerce.coerce EventControllerScroll
    gi'self)  Double
    velX' Double
    velY'

    -- | Connect a signal handler for the [decelerate](#signal:decelerate) 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' eventControllerScroll #decelerate callback
    -- @
    --
    --
    onEventControllerScrollDecelerate :: (IsEventControllerScroll a, MonadIO m) => a -> ((?self :: a) => EventControllerScrollDecelerateCallback) -> m SignalHandlerId
    onEventControllerScrollDecelerate :: forall a (m :: * -> *).
    (IsEventControllerScroll a, MonadIO m) =>
    a
    -> ((?self::a) => EventControllerScrollDecelerateCallback)
    -> m SignalHandlerId
    onEventControllerScrollDecelerate a
    obj (?self::a) => EventControllerScrollDecelerateCallback
    cb = IO SignalHandlerId -> m SignalHandlerId
    forall a. IO a -> m a
    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 wrapped :: a -> EventControllerScrollDecelerateCallback
    wrapped a
    self = let ?self = a
    ?self::a
    self in (?self::a) => EventControllerScrollDecelerateCallback
    EventControllerScrollDecelerateCallback
    cb
        let wrapped' :: C_EventControllerScrollDecelerateCallback
    wrapped' = (a -> EventControllerScrollDecelerateCallback)
    -> C_EventControllerScrollDecelerateCallback
    forall a.
    GObject a =>
    (a -> EventControllerScrollDecelerateCallback)
    -> C_EventControllerScrollDecelerateCallback
    wrap_EventControllerScrollDecelerateCallback a -> EventControllerScrollDecelerateCallback
    wrapped
        wrapped'' <- C_EventControllerScrollDecelerateCallback
    -> IO (FunPtr C_EventControllerScrollDecelerateCallback)
    mk_EventControllerScrollDecelerateCallback C_EventControllerScrollDecelerateCallback
    wrapped'
        connectSignalFunPtr obj "decelerate" wrapped'' SignalConnectBefore Nothing

    -- | Connect a signal handler for the [decelerate](#signal:decelerate) 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' eventControllerScroll #decelerate callback
    -- @
    --
    --
    --
    -- By default the object invoking the signal is not passed to the callback.
    -- If you need to access it, you can use the implit @?self@ parameter.
    -- Note that this requires activating the @ImplicitParams@ GHC extension.
    --
    afterEventControllerScrollDecelerate :: (IsEventControllerScroll a, MonadIO m) => a -> ((?self :: a) => EventControllerScrollDecelerateCallback) -> m SignalHandlerId
    afterEventControllerScrollDecelerate :: forall a (m :: * -> *).
    (IsEventControllerScroll a, MonadIO m) =>
    a
    -> ((?self::a) => EventControllerScrollDecelerateCallback)
    -> m SignalHandlerId
    afterEventControllerScrollDecelerate a
    obj (?self::a) => EventControllerScrollDecelerateCallback
    cb = IO SignalHandlerId -> m SignalHandlerId
    forall a. IO a -> m a
    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 wrapped :: a -> EventControllerScrollDecelerateCallback
    wrapped a
    self = let ?self = a
    ?self::a
    self in (?self::a) => EventControllerScrollDecelerateCallback
    EventControllerScrollDecelerateCallback
    cb
        let wrapped' :: C_EventControllerScrollDecelerateCallback
    wrapped' = (a -> EventControllerScrollDecelerateCallback)
    -> C_EventControllerScrollDecelerateCallback
    forall a.
    GObject a =>
    (a -> EventControllerScrollDecelerateCallback)
    -> C_EventControllerScrollDecelerateCallback
    wrap_EventControllerScrollDecelerateCallback a -> EventControllerScrollDecelerateCallback
    wrapped
        wrapped'' <- C_EventControllerScrollDecelerateCallback
    -> IO (FunPtr C_EventControllerScrollDecelerateCallback)
    mk_EventControllerScrollDecelerateCallback C_EventControllerScrollDecelerateCallback
    wrapped'
        connectSignalFunPtr obj "decelerate" wrapped'' SignalConnectAfter Nothing

    #if defined(ENABLE_OVERLOADING)
    data EventControllerScrollDecelerateSignalInfo
    instance SignalInfo EventControllerScrollDecelerateSignalInfo where
        type HaskellCallbackType EventControllerScrollDecelerateSignalInfo = EventControllerScrollDecelerateCallback
        connectSignal obj cb connectMode detail = do
            let cb' = wrap_EventControllerScrollDecelerateCallback cb
            cb'' <- mk_EventControllerScrollDecelerateCallback cb'
            connectSignalFunPtr obj "decelerate" cb'' connectMode detail
        dbgSignalInfo = P.Just (O.ResolvedSymbolInfo {
            O.resolvedSymbolName = "GI.Gtk.Objects.EventControllerScroll::decelerate"
            , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk3-3.0.44/docs/GI-Gtk-Objects-EventControllerScroll.html#g:signal:decelerate"})

    #endif

    -- signal EventControllerScroll::scroll
    -- | Signals that the widget should scroll by the
    -- amount specified by /@dx@/ and /@dy@/.
    type EventControllerScrollScrollCallback =
        Double
        -- ^ /@dx@/: X delta
        -> Double
        -- ^ /@dy@/: Y delta
        -> IO ()

    type C_EventControllerScrollScrollCallback =
        Ptr EventControllerScroll ->            -- object
        CDouble ->
        CDouble ->
        Ptr () ->                               -- user_data
        IO ()

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

    wrap_EventControllerScrollScrollCallback ::
        GObject a => (a -> EventControllerScrollScrollCallback) ->
        C_EventControllerScrollScrollCallback
    wrap_EventControllerScrollScrollCallback :: forall a.
    GObject a =>
    (a -> EventControllerScrollDecelerateCallback)
    -> C_EventControllerScrollDecelerateCallback
    wrap_EventControllerScrollScrollCallback a -> EventControllerScrollDecelerateCallback
    gi'cb Ptr EventControllerScroll
    gi'selfPtr CDouble
    dx CDouble
    dy Ptr ()
    _ = do
        let dx' :: Double
    dx' = CDouble -> Double
    forall a b. (Real a, Fractional b) => a -> b
    realToFrac CDouble
    dx
        let dy' :: Double
    dy' = CDouble -> Double
    forall a b. (Real a, Fractional b) => a -> b
    realToFrac CDouble
    dy
        Ptr EventControllerScroll
    -> (EventControllerScroll -> IO ()) -> IO ()
    forall o b.
    (HasCallStack, GObject o) =>
    Ptr o -> (o -> IO b) -> IO b
    B.ManagedPtr.withNewObject Ptr EventControllerScroll
    gi'selfPtr ((EventControllerScroll -> IO ()) -> IO ())
    -> (EventControllerScroll -> IO ()) -> IO ()
    forall a b. (a -> b) -> a -> b
    $ \EventControllerScroll
    gi'self -> a -> EventControllerScrollDecelerateCallback
    gi'cb (EventControllerScroll -> a
    forall a b. Coercible a b => a -> b
    Coerce.coerce EventControllerScroll
    gi'self)  Double
    dx' Double
    dy'

    -- | Connect a signal handler for the [scroll](#signal:scroll) 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' eventControllerScroll #scroll callback
    -- @
    --
    --
    onEventControllerScrollScroll :: (IsEventControllerScroll a, MonadIO m) => a -> ((?self :: a) => EventControllerScrollScrollCallback) -> m SignalHandlerId
    onEventControllerScrollScroll :: forall a (m :: * -> *).
    (IsEventControllerScroll a, MonadIO m) =>
    a
    -> ((?self::a) => EventControllerScrollDecelerateCallback)
    -> m SignalHandlerId
    onEventControllerScrollScroll a
    obj (?self::a) => EventControllerScrollDecelerateCallback
    cb = IO SignalHandlerId -> m SignalHandlerId
    forall a. IO a -> m a
    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 wrapped :: a -> EventControllerScrollDecelerateCallback
    wrapped a
    self = let ?self = a
    ?self::a
    self in (?self::a) => EventControllerScrollDecelerateCallback
    EventControllerScrollDecelerateCallback
    cb
        let wrapped' :: C_EventControllerScrollDecelerateCallback
    wrapped' = (a -> EventControllerScrollDecelerateCallback)
    -> C_EventControllerScrollDecelerateCallback
    forall a.
    GObject a =>
    (a -> EventControllerScrollDecelerateCallback)
    -> C_EventControllerScrollDecelerateCallback
    wrap_EventControllerScrollScrollCallback a -> EventControllerScrollDecelerateCallback
    wrapped
        wrapped'' <- C_EventControllerScrollDecelerateCallback
    -> IO (FunPtr C_EventControllerScrollDecelerateCallback)
    mk_EventControllerScrollScrollCallback C_EventControllerScrollDecelerateCallback
    wrapped'
        connectSignalFunPtr obj "scroll" wrapped'' SignalConnectBefore Nothing

    -- | Connect a signal handler for the [scroll](#signal:scroll) 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' eventControllerScroll #scroll callback
    -- @
    --
    --
    --
    -- By default the object invoking the signal is not passed to the callback.
    -- If you need to access it, you can use the implit @?self@ parameter.
    -- Note that this requires activating the @ImplicitParams@ GHC extension.
    --
    afterEventControllerScrollScroll :: (IsEventControllerScroll a, MonadIO m) => a -> ((?self :: a) => EventControllerScrollScrollCallback) -> m SignalHandlerId
    afterEventControllerScrollScroll :: forall a (m :: * -> *).
    (IsEventControllerScroll a, MonadIO m) =>
    a
    -> ((?self::a) => EventControllerScrollDecelerateCallback)
    -> m SignalHandlerId
    afterEventControllerScrollScroll a
    obj (?self::a) => EventControllerScrollDecelerateCallback
    cb = IO SignalHandlerId -> m SignalHandlerId
    forall a. IO a -> m a
    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 wrapped :: a -> EventControllerScrollDecelerateCallback
    wrapped a
    self = let ?self = a
    ?self::a
    self in (?self::a) => EventControllerScrollDecelerateCallback
    EventControllerScrollDecelerateCallback
    cb
        let wrapped' :: C_EventControllerScrollDecelerateCallback
    wrapped' = (a -> EventControllerScrollDecelerateCallback)
    -> C_EventControllerScrollDecelerateCallback
    forall a.
    GObject a =>
    (a -> EventControllerScrollDecelerateCallback)
    -> C_EventControllerScrollDecelerateCallback
    wrap_EventControllerScrollScrollCallback a -> EventControllerScrollDecelerateCallback
    wrapped
        wrapped'' <- C_EventControllerScrollDecelerateCallback
    -> IO (FunPtr C_EventControllerScrollDecelerateCallback)
    mk_EventControllerScrollScrollCallback C_EventControllerScrollDecelerateCallback
    wrapped'
        connectSignalFunPtr obj "scroll" wrapped'' SignalConnectAfter Nothing

    #if defined(ENABLE_OVERLOADING)
    data EventControllerScrollScrollSignalInfo
    instance SignalInfo EventControllerScrollScrollSignalInfo where
        type HaskellCallbackType EventControllerScrollScrollSignalInfo = EventControllerScrollScrollCallback
        connectSignal obj cb connectMode detail = do
            let cb' = wrap_EventControllerScrollScrollCallback cb
            cb'' <- mk_EventControllerScrollScrollCallback cb'
            connectSignalFunPtr obj "scroll" cb'' connectMode detail
        dbgSignalInfo = P.Just (O.ResolvedSymbolInfo {
            O.resolvedSymbolName = "GI.Gtk.Objects.EventControllerScroll::scroll"
            , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk3-3.0.44/docs/GI-Gtk-Objects-EventControllerScroll.html#g:signal:scroll"})

    #endif

    -- signal EventControllerScroll::scroll-begin
    -- | Signals that a new scrolling operation has begun. It will
    -- only be emitted on devices capable of it.
    type EventControllerScrollScrollBeginCallback =
        IO ()

    type C_EventControllerScrollScrollBeginCallback =
        Ptr EventControllerScroll ->            -- object
        Ptr () ->                               -- user_data
        IO ()

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

    wrap_EventControllerScrollScrollBeginCallback ::
        GObject a => (a -> EventControllerScrollScrollBeginCallback) ->
        C_EventControllerScrollScrollBeginCallback
    wrap_EventControllerScrollScrollBeginCallback :: forall a.
    GObject a =>
    (a -> IO ()) -> C_EventControllerScrollScrollBeginCallback
    wrap_EventControllerScrollScrollBeginCallback a -> IO ()
    gi'cb Ptr EventControllerScroll
    gi'selfPtr Ptr ()
    _ = do
        Ptr EventControllerScroll
    -> (EventControllerScroll -> IO ()) -> IO ()
    forall o b.
    (HasCallStack, GObject o) =>
    Ptr o -> (o -> IO b) -> IO b
    B.ManagedPtr.withNewObject Ptr EventControllerScroll
    gi'selfPtr ((EventControllerScroll -> IO ()) -> IO ())
    -> (EventControllerScroll -> IO ()) -> IO ()
    forall a b. (a -> b) -> a -> b
    $ \EventControllerScroll
    gi'self -> a -> IO ()
    gi'cb (EventControllerScroll -> a
    forall a b. Coercible a b => a -> b
    Coerce.coerce EventControllerScroll
    gi'self)

    -- | Connect a signal handler for the [scrollBegin](#signal:scrollBegin) 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' eventControllerScroll #scrollBegin callback
    -- @
    --
    --
    onEventControllerScrollScrollBegin :: (IsEventControllerScroll a, MonadIO m) => a -> ((?self :: a) => EventControllerScrollScrollBeginCallback) -> m SignalHandlerId
    onEventControllerScrollScrollBegin :: forall a (m :: * -> *).
    (IsEventControllerScroll a, MonadIO m) =>
    a -> ((?self::a) => IO ()) -> m SignalHandlerId
    onEventControllerScrollScrollBegin a
    obj (?self::a) => IO ()
    cb = IO SignalHandlerId -> m SignalHandlerId
    forall a. IO a -> m a
    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 wrapped :: a -> IO ()
    wrapped a
    self = let ?self = a
    ?self::a
    self in IO ()
    (?self::a) => IO ()
    cb
        let wrapped' :: C_EventControllerScrollScrollBeginCallback
    wrapped' = (a -> IO ()) -> C_EventControllerScrollScrollBeginCallback
    forall a.
    GObject a =>
    (a -> IO ()) -> C_EventControllerScrollScrollBeginCallback
    wrap_EventControllerScrollScrollBeginCallback a -> IO ()
    wrapped
        wrapped'' <- C_EventControllerScrollScrollBeginCallback
    -> IO (FunPtr C_EventControllerScrollScrollBeginCallback)
    mk_EventControllerScrollScrollBeginCallback C_EventControllerScrollScrollBeginCallback
    wrapped'
        connectSignalFunPtr obj "scroll-begin" wrapped'' SignalConnectBefore Nothing

    -- | Connect a signal handler for the [scrollBegin](#signal:scrollBegin) 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' eventControllerScroll #scrollBegin callback
    -- @
    --
    --
    --
    -- By default the object invoking the signal is not passed to the callback.
    -- If you need to access it, you can use the implit @?self@ parameter.
    -- Note that this requires activating the @ImplicitParams@ GHC extension.
    --
    afterEventControllerScrollScrollBegin :: (IsEventControllerScroll a, MonadIO m) => a -> ((?self :: a) => EventControllerScrollScrollBeginCallback) -> m SignalHandlerId
    afterEventControllerScrollScrollBegin :: forall a (m :: * -> *).
    (IsEventControllerScroll a, MonadIO m) =>
    a -> ((?self::a) => IO ()) -> m SignalHandlerId
    afterEventControllerScrollScrollBegin a
    obj (?self::a) => IO ()
    cb = IO SignalHandlerId -> m SignalHandlerId
    forall a. IO a -> m a
    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 wrapped :: a -> IO ()
    wrapped a
    self = let ?self = a
    ?self::a
    self in IO ()
    (?self::a) => IO ()
    cb
        let wrapped' :: C_EventControllerScrollScrollBeginCallback
    wrapped' = (a -> IO ()) -> C_EventControllerScrollScrollBeginCallback
    forall a.
    GObject a =>
    (a -> IO ()) -> C_EventControllerScrollScrollBeginCallback
    wrap_EventControllerScrollScrollBeginCallback a -> IO ()
    wrapped
        wrapped'' <- C_EventControllerScrollScrollBeginCallback
    -> IO (FunPtr C_EventControllerScrollScrollBeginCallback)
    mk_EventControllerScrollScrollBeginCallback C_EventControllerScrollScrollBeginCallback
    wrapped'
        connectSignalFunPtr obj "scroll-begin" wrapped'' SignalConnectAfter Nothing

    #if defined(ENABLE_OVERLOADING)
    data EventControllerScrollScrollBeginSignalInfo
    instance SignalInfo EventControllerScrollScrollBeginSignalInfo where
        type HaskellCallbackType EventControllerScrollScrollBeginSignalInfo = EventControllerScrollScrollBeginCallback
        connectSignal obj cb connectMode detail = do
            let cb' = wrap_EventControllerScrollScrollBeginCallback cb
            cb'' <- mk_EventControllerScrollScrollBeginCallback cb'
            connectSignalFunPtr obj "scroll-begin" cb'' connectMode detail
        dbgSignalInfo = P.Just (O.ResolvedSymbolInfo {
            O.resolvedSymbolName = "GI.Gtk.Objects.EventControllerScroll::scroll-begin"
            , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk3-3.0.44/docs/GI-Gtk-Objects-EventControllerScroll.html#g:signal:scrollBegin"})

    #endif

    -- signal EventControllerScroll::scroll-end
    -- | Signals that a new scrolling operation has finished. It will
    -- only be emitted on devices capable of it.
    type EventControllerScrollScrollEndCallback =
        IO ()

    type C_EventControllerScrollScrollEndCallback =
        Ptr EventControllerScroll ->            -- object
        Ptr () ->                               -- user_data
        IO ()

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

    wrap_EventControllerScrollScrollEndCallback ::
        GObject a => (a -> EventControllerScrollScrollEndCallback) ->
        C_EventControllerScrollScrollEndCallback
    wrap_EventControllerScrollScrollEndCallback :: forall a.
    GObject a =>
    (a -> IO ()) -> C_EventControllerScrollScrollBeginCallback
    wrap_EventControllerScrollScrollEndCallback a -> IO ()
    gi'cb Ptr EventControllerScroll
    gi'selfPtr Ptr ()
    _ = do
        Ptr EventControllerScroll
    -> (EventControllerScroll -> IO ()) -> IO ()
    forall o b.
    (HasCallStack, GObject o) =>
    Ptr o -> (o -> IO b) -> IO b
    B.ManagedPtr.withNewObject Ptr EventControllerScroll
    gi'selfPtr ((EventControllerScroll -> IO ()) -> IO ())
    -> (EventControllerScroll -> IO ()) -> IO ()
    forall a b. (a -> b) -> a -> b
    $ \EventControllerScroll
    gi'self -> a -> IO ()
    gi'cb (EventControllerScroll -> a
    forall a b. Coercible a b => a -> b
    Coerce.coerce EventControllerScroll
    gi'self)

    -- | Connect a signal handler for the [scrollEnd](#signal:scrollEnd) 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' eventControllerScroll #scrollEnd callback
    -- @
    --
    --
    onEventControllerScrollScrollEnd :: (IsEventControllerScroll a, MonadIO m) => a -> ((?self :: a) => EventControllerScrollScrollEndCallback) -> m SignalHandlerId
    onEventControllerScrollScrollEnd :: forall a (m :: * -> *).
    (IsEventControllerScroll a, MonadIO m) =>
    a -> ((?self::a) => IO ()) -> m SignalHandlerId
    onEventControllerScrollScrollEnd a
    obj (?self::a) => IO ()
    cb = IO SignalHandlerId -> m SignalHandlerId
    forall a. IO a -> m a
    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 wrapped :: a -> IO ()
    wrapped a
    self = let ?self = a
    ?self::a
    self in IO ()
    (?self::a) => IO ()
    cb
        let wrapped' :: C_EventControllerScrollScrollBeginCallback
    wrapped' = (a -> IO ()) -> C_EventControllerScrollScrollBeginCallback
    forall a.
    GObject a =>
    (a -> IO ()) -> C_EventControllerScrollScrollBeginCallback
    wrap_EventControllerScrollScrollEndCallback a -> IO ()
    wrapped
        wrapped'' <- C_EventControllerScrollScrollBeginCallback
    -> IO (FunPtr C_EventControllerScrollScrollBeginCallback)
    mk_EventControllerScrollScrollEndCallback C_EventControllerScrollScrollBeginCallback
    wrapped'
        connectSignalFunPtr obj "scroll-end" wrapped'' SignalConnectBefore Nothing

    -- | Connect a signal handler for the [scrollEnd](#signal:scrollEnd) 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' eventControllerScroll #scrollEnd callback
    -- @
    --
    --
    --
    -- By default the object invoking the signal is not passed to the callback.
    -- If you need to access it, you can use the implit @?self@ parameter.
    -- Note that this requires activating the @ImplicitParams@ GHC extension.
    --
    afterEventControllerScrollScrollEnd :: (IsEventControllerScroll a, MonadIO m) => a -> ((?self :: a) => EventControllerScrollScrollEndCallback) -> m SignalHandlerId
    afterEventControllerScrollScrollEnd :: forall a (m :: * -> *).
    (IsEventControllerScroll a, MonadIO m) =>
    a -> ((?self::a) => IO ()) -> m SignalHandlerId
    afterEventControllerScrollScrollEnd a
    obj (?self::a) => IO ()
    cb = IO SignalHandlerId -> m SignalHandlerId
    forall a. IO a -> m a
    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 wrapped :: a -> IO ()
    wrapped a
    self = let ?self = a
    ?self::a
    self in IO ()
    (?self::a) => IO ()
    cb
        let wrapped' :: C_EventControllerScrollScrollBeginCallback
    wrapped' = (a -> IO ()) -> C_EventControllerScrollScrollBeginCallback
    forall a.
    GObject a =>
    (a -> IO ()) -> C_EventControllerScrollScrollBeginCallback
    wrap_EventControllerScrollScrollEndCallback a -> IO ()
    wrapped
        wrapped'' <- C_EventControllerScrollScrollBeginCallback
    -> IO (FunPtr C_EventControllerScrollScrollBeginCallback)
    mk_EventControllerScrollScrollEndCallback C_EventControllerScrollScrollBeginCallback
    wrapped'
        connectSignalFunPtr obj "scroll-end" wrapped'' SignalConnectAfter Nothing

    #if defined(ENABLE_OVERLOADING)
    data EventControllerScrollScrollEndSignalInfo
    instance SignalInfo EventControllerScrollScrollEndSignalInfo where
        type HaskellCallbackType EventControllerScrollScrollEndSignalInfo = EventControllerScrollScrollEndCallback
        connectSignal obj cb connectMode detail = do
            let cb' = wrap_EventControllerScrollScrollEndCallback cb
            cb'' <- mk_EventControllerScrollScrollEndCallback cb'
            connectSignalFunPtr obj "scroll-end" cb'' connectMode detail
        dbgSignalInfo = P.Just (O.ResolvedSymbolInfo {
            O.resolvedSymbolName = "GI.Gtk.Objects.EventControllerScroll::scroll-end"
            , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk3-3.0.44/docs/GI-Gtk-Objects-EventControllerScroll.html#g:signal:scrollEnd"})

    #endif

    -- VVV Prop "flags"
       -- Type: TInterface (Name {namespace = "Gtk", name = "EventControllerScrollFlags"})
       -- Flags: [PropertyReadable,PropertyWritable]
       -- Nullable: (Just False,Just False)

    -- | Get the value of the “@flags@” property.
    -- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
    --
    -- @
    -- 'Data.GI.Base.Attributes.get' eventControllerScroll #flags
    -- @
    getEventControllerScrollFlags :: (MonadIO m, IsEventControllerScroll o) => o -> m [Gtk.Flags.EventControllerScrollFlags]
    getEventControllerScrollFlags :: forall (m :: * -> *) o.
    (MonadIO m, IsEventControllerScroll o) =>
    o -> m [EventControllerScrollFlags]
    getEventControllerScrollFlags o
    obj = IO [EventControllerScrollFlags] -> m [EventControllerScrollFlags]
    forall a. IO a -> m a
    forall (m :: * -> *) a. MonadIO m => IO a -> m a
    MIO.liftIO (IO [EventControllerScrollFlags] -> m [EventControllerScrollFlags])
    -> IO [EventControllerScrollFlags]
    -> m [EventControllerScrollFlags]
    forall a b. (a -> b) -> a -> b
    $ o -> String -> IO [EventControllerScrollFlags]
    forall a b.
    (GObject a, IsGFlag b, BoxedFlags b) =>
    a -> String -> IO [b]
    B.Properties.getObjectPropertyFlags o
    obj String
    "flags"

    -- | Set the value of the “@flags@” property.
    -- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
    --
    -- @
    -- 'Data.GI.Base.Attributes.set' eventControllerScroll [ #flags 'Data.GI.Base.Attributes.:=' value ]
    -- @
    setEventControllerScrollFlags :: (MonadIO m, IsEventControllerScroll o) => o -> [Gtk.Flags.EventControllerScrollFlags] -> m ()
    setEventControllerScrollFlags :: forall (m :: * -> *) o.
    (MonadIO m, IsEventControllerScroll o) =>
    o -> [EventControllerScrollFlags] -> m ()
    setEventControllerScrollFlags o
    obj [EventControllerScrollFlags]
    val = IO () -> m ()
    forall a. IO a -> m a
    forall (m :: * -> *) a. MonadIO m => IO a -> m a
    MIO.liftIO (IO () -> m ()) -> IO () -> m ()
    forall a b. (a -> b) -> a -> b
    $ do
        o -> String -> [EventControllerScrollFlags] -> IO ()
    forall a b.
    (IsGFlag b, BoxedFlags b, GObject a) =>
    a -> String -> [b] -> IO ()
    B.Properties.setObjectPropertyFlags o
    obj String
    "flags" [EventControllerScrollFlags]
    val

    -- | Construct a t'GValueConstruct' with valid value for the “@flags@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
    constructEventControllerScrollFlags :: (IsEventControllerScroll o, MIO.MonadIO m) => [Gtk.Flags.EventControllerScrollFlags] -> m (GValueConstruct o)
    constructEventControllerScrollFlags :: forall o (m :: * -> *).
    (IsEventControllerScroll o, MonadIO m) =>
    [EventControllerScrollFlags] -> m (GValueConstruct o)
    constructEventControllerScrollFlags [EventControllerScrollFlags]
    val = IO (GValueConstruct o) -> m (GValueConstruct o)
    forall a. IO a -> m a
    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
    $ do
        IO (GValueConstruct o) -> IO (GValueConstruct o)
    forall a. IO a -> IO a
    forall (m :: * -> *) a. MonadIO m => IO a -> m a
    MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
    -> IO (GValueConstruct o) -> IO (GValueConstruct o)
    forall a b. (a -> b) -> a -> b
    $ String -> [EventControllerScrollFlags] -> IO (GValueConstruct o)
    forall a o.
    (IsGFlag a, BoxedFlags a) =>
    String -> [a] -> IO (GValueConstruct o)
    B.Properties.constructObjectPropertyFlags String
    "flags" [EventControllerScrollFlags]
    val

    #if defined(ENABLE_OVERLOADING)
    data EventControllerScrollFlagsPropertyInfo
    instance AttrInfo EventControllerScrollFlagsPropertyInfo where
        type AttrAllowedOps EventControllerScrollFlagsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrPut]
        type AttrBaseTypeConstraint EventControllerScrollFlagsPropertyInfo = IsEventControllerScroll
        type AttrSetTypeConstraint EventControllerScrollFlagsPropertyInfo = (~) [Gtk.Flags.EventControllerScrollFlags]
        type AttrTransferTypeConstraint EventControllerScrollFlagsPropertyInfo = (~) [Gtk.Flags.EventControllerScrollFlags]
        type AttrTransferType EventControllerScrollFlagsPropertyInfo = [Gtk.Flags.EventControllerScrollFlags]
        type AttrGetType EventControllerScrollFlagsPropertyInfo = [Gtk.Flags.EventControllerScrollFlags]
        type AttrLabel EventControllerScrollFlagsPropertyInfo = "flags"
        type AttrOrigin EventControllerScrollFlagsPropertyInfo = EventControllerScroll
        attrGet = getEventControllerScrollFlags
        attrSet = setEventControllerScrollFlags
        attrPut = setEventControllerScrollFlags
        attrTransfer _ v = do
            return v
        attrConstruct = constructEventControllerScrollFlags
        attrClear = undefined
        dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
            O.resolvedSymbolName = "GI.Gtk.Objects.EventControllerScroll.flags"
            , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk3-3.0.44/docs/GI-Gtk-Objects-EventControllerScroll.html#g:attr:flags"
            })
    #endif

    #if defined(ENABLE_OVERLOADING)
    instance O.HasAttributeList EventControllerScroll
    type instance O.AttributeList EventControllerScroll = EventControllerScrollAttributeList
    type EventControllerScrollAttributeList = ('[ '("flags", EventControllerScrollFlagsPropertyInfo), '("propagationPhase", Gtk.EventController.EventControllerPropagationPhasePropertyInfo), '("widget", Gtk.EventController.EventControllerWidgetPropertyInfo)] :: [(Symbol, DK.Type)])
    #endif

    #if defined(ENABLE_OVERLOADING)
    eventControllerScrollFlags :: AttrLabelProxy "flags"
    eventControllerScrollFlags = AttrLabelProxy

    #endif

    #if defined(ENABLE_OVERLOADING)
    type instance O.SignalList EventControllerScroll = EventControllerScrollSignalList
    type EventControllerScrollSignalList = ('[ '("decelerate", EventControllerScrollDecelerateSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("scroll", EventControllerScrollScrollSignalInfo), '("scrollBegin", EventControllerScrollScrollBeginSignalInfo), '("scrollEnd", EventControllerScrollScrollEndSignalInfo)] :: [(Symbol, DK.Type)])

    #endif

    -- method EventControllerScroll::new
    -- method type : Constructor
    -- Args: [ Arg
    --           { argCName = "widget"
    --           , argType = TInterface Name { namespace = "Gtk" , name = "Widget" }
    --           , argCType = Just "GtkWidget*"
    --           , direction = DirectionIn
    --           , mayBeNull = False
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "a #GtkWidget" , sinceVersion = Nothing }
    --           , argScope = ScopeTypeInvalid
    --           , argClosure = -1
    --           , argDestroy = -1
    --           , argCallerAllocates = False
    --           , argCallbackUserData = False
    --           , transfer = TransferNothing
    --           }
    --       , Arg
    --           { argCName = "flags"
    --           , argType =
    --               TInterface
    --                 Name { namespace = "Gtk" , name = "EventControllerScrollFlags" }
    --           , argCType = Just "GtkEventControllerScrollFlags"
    --           , direction = DirectionIn
    --           , mayBeNull = False
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "behavior flags" , sinceVersion = Nothing }
    --           , argScope = ScopeTypeInvalid
    --           , argClosure = -1
    --           , argDestroy = -1
    --           , argCallerAllocates = False
    --           , argCallbackUserData = False
    --           , transfer = TransferNothing
    --           }
    --       ]
    -- Lengths: []
    -- returnType: Just
    --               (TInterface
    --                  Name { namespace = "Gtk" , name = "EventControllerScroll" })
    -- throws : False
    -- Skip return : False

    foreign import ccall "gtk_event_controller_scroll_new" gtk_event_controller_scroll_new ::
        Ptr Gtk.Widget.Widget ->                -- widget : TInterface (Name {namespace = "Gtk", name = "Widget"})
        CUInt ->                                -- flags : TInterface (Name {namespace = "Gtk", name = "EventControllerScrollFlags"})
        IO (Ptr EventControllerScroll)

    -- | Creates a new event controller that will handle scroll events
    -- for the given /@widget@/.
    --
    -- /Since: 3.24/
    eventControllerScrollNew ::
        (B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
        a
        -- ^ /@widget@/: a t'GI.Gtk.Objects.Widget.Widget'
        -> [Gtk.Flags.EventControllerScrollFlags]
        -- ^ /@flags@/: behavior flags
        -> m EventControllerScroll
        -- ^ __Returns:__ a new t'GI.Gtk.Objects.EventControllerScroll.EventControllerScroll'
    eventControllerScrollNew :: forall (m :: * -> *) a.
    (HasCallStack, MonadIO m, IsWidget a) =>
    a -> [EventControllerScrollFlags] -> m EventControllerScroll
    eventControllerScrollNew a
    widget [EventControllerScrollFlags]
    flags = IO EventControllerScroll -> m EventControllerScroll
    forall a. IO a -> m a
    forall (m :: * -> *) a. MonadIO m => IO a -> m a
    liftIO (IO EventControllerScroll -> m EventControllerScroll)
    -> IO EventControllerScroll -> m EventControllerScroll
    forall a b. (a -> b) -> a -> b
    $ do
        widget' <- a -> IO (Ptr Widget)
    forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
    unsafeManagedPtrCastPtr a
    widget
        let flags' = [EventControllerScrollFlags] -> CUInt
    forall b a. (Num b, IsGFlag a) => [a] -> b
    gflagsToWord [EventControllerScrollFlags]
    flags
        result <- gtk_event_controller_scroll_new widget' flags'
        checkUnexpectedReturnNULL "eventControllerScrollNew" result
        result' <- (wrapObject EventControllerScroll) result
        touchManagedPtr widget
        return result'

    #if defined(ENABLE_OVERLOADING)
    #endif

    -- method EventControllerScroll::get_flags
    -- method type : OrdinaryMethod
    -- Args: [ Arg
    --           { argCName = "scroll"
    --           , argType =
    --               TInterface
    --                 Name { namespace = "Gtk" , name = "EventControllerScroll" }
    --           , argCType = Just "GtkEventControllerScroll*"
    --           , direction = DirectionIn
    --           , mayBeNull = False
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "a #GtkEventControllerScroll"
    --                 , sinceVersion = Nothing
    --                 }
    --           , argScope = ScopeTypeInvalid
    --           , argClosure = -1
    --           , argDestroy = -1
    --           , argCallerAllocates = False
    --           , argCallbackUserData = False
    --           , transfer = TransferNothing
    --           }
    --       ]
    -- Lengths: []
    -- returnType: Just
    --               (TInterface
    --                  Name { namespace = "Gtk" , name = "EventControllerScrollFlags" })
    -- throws : False
    -- Skip return : False

    foreign import ccall "gtk_event_controller_scroll_get_flags" gtk_event_controller_scroll_get_flags ::
        Ptr EventControllerScroll ->            -- scroll : TInterface (Name {namespace = "Gtk", name = "EventControllerScroll"})
        IO CUInt

    -- | Gets the flags conditioning the scroll controller behavior.
    --
    -- /Since: 3.24/
    eventControllerScrollGetFlags ::
        (B.CallStack.HasCallStack, MonadIO m, IsEventControllerScroll a) =>
        a
        -- ^ /@scroll@/: a t'GI.Gtk.Objects.EventControllerScroll.EventControllerScroll'
        -> m [Gtk.Flags.EventControllerScrollFlags]
        -- ^ __Returns:__ the controller flags.
    eventControllerScrollGetFlags :: forall (m :: * -> *) a.
    (HasCallStack, MonadIO m, IsEventControllerScroll a) =>
    a -> m [EventControllerScrollFlags]
    eventControllerScrollGetFlags a
    scroll = IO [EventControllerScrollFlags] -> m [EventControllerScrollFlags]
    forall a. IO a -> m a
    forall (m :: * -> *) a. MonadIO m => IO a -> m a
    liftIO (IO [EventControllerScrollFlags] -> m [EventControllerScrollFlags])
    -> IO [EventControllerScrollFlags]
    -> m [EventControllerScrollFlags]
    forall a b. (a -> b) -> a -> b
    $ do
        scroll' <- a -> IO (Ptr EventControllerScroll)
    forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
    unsafeManagedPtrCastPtr a
    scroll
        result <- gtk_event_controller_scroll_get_flags scroll'
        let result' = CUInt -> [EventControllerScrollFlags]
    forall a b. (Storable a, Integral a, Bits a, IsGFlag b) => a -> [b]
    wordToGFlags CUInt
    result
        touchManagedPtr scroll
        return result'

    #if defined(ENABLE_OVERLOADING)
    data EventControllerScrollGetFlagsMethodInfo
    instance (signature ~ (m [Gtk.Flags.EventControllerScrollFlags]), MonadIO m, IsEventControllerScroll a) => O.OverloadedMethod EventControllerScrollGetFlagsMethodInfo a signature where
        overloadedMethod = eventControllerScrollGetFlags

    instance O.OverloadedMethodInfo EventControllerScrollGetFlagsMethodInfo a where
        overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
            O.resolvedSymbolName = "GI.Gtk.Objects.EventControllerScroll.eventControllerScrollGetFlags",
            O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk3-3.0.44/docs/GI-Gtk-Objects-EventControllerScroll.html#v:eventControllerScrollGetFlags"
            })

    #endif

    -- method EventControllerScroll::set_flags
    -- method type : OrdinaryMethod
    -- Args: [ Arg
    --           { argCName = "scroll"
    --           , argType =
    --               TInterface
    --                 Name { namespace = "Gtk" , name = "EventControllerScroll" }
    --           , argCType = Just "GtkEventControllerScroll*"
    --           , direction = DirectionIn
    --           , mayBeNull = False
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "a #GtkEventControllerScroll"
    --                 , sinceVersion = Nothing
    --                 }
    --           , argScope = ScopeTypeInvalid
    --           , argClosure = -1
    --           , argDestroy = -1
    --           , argCallerAllocates = False
    --           , argCallbackUserData = False
    --           , transfer = TransferNothing
    --           }
    --       , Arg
    --           { argCName = "flags"
    --           , argType =
    --               TInterface
    --                 Name { namespace = "Gtk" , name = "EventControllerScrollFlags" }
    --           , argCType = Just "GtkEventControllerScrollFlags"
    --           , direction = DirectionIn
    --           , mayBeNull = False
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "behavior flags" , sinceVersion = Nothing }
    --           , argScope = ScopeTypeInvalid
    --           , argClosure = -1
    --           , argDestroy = -1
    --           , argCallerAllocates = False
    --           , argCallbackUserData = False
    --           , transfer = TransferNothing
    --           }
    --       ]
    -- Lengths: []
    -- returnType: Nothing
    -- throws : False
    -- Skip return : False

    foreign import ccall "gtk_event_controller_scroll_set_flags" gtk_event_controller_scroll_set_flags ::
        Ptr EventControllerScroll ->            -- scroll : TInterface (Name {namespace = "Gtk", name = "EventControllerScroll"})
        CUInt ->                                -- flags : TInterface (Name {namespace = "Gtk", name = "EventControllerScrollFlags"})
        IO ()

    -- | Sets the flags conditioning scroll controller behavior.
    --
    -- /Since: 3.24/
    eventControllerScrollSetFlags ::
        (B.CallStack.HasCallStack, MonadIO m, IsEventControllerScroll a) =>
        a
        -- ^ /@scroll@/: a t'GI.Gtk.Objects.EventControllerScroll.EventControllerScroll'
        -> [Gtk.Flags.EventControllerScrollFlags]
        -- ^ /@flags@/: behavior flags
        -> m ()
    eventControllerScrollSetFlags :: forall (m :: * -> *) a.
    (HasCallStack, MonadIO m, IsEventControllerScroll a) =>
    a -> [EventControllerScrollFlags] -> m ()
    eventControllerScrollSetFlags a
    scroll [EventControllerScrollFlags]
    flags = IO () -> m ()
    forall a. IO a -> m a
    forall (m :: * -> *) a. MonadIO m => IO a -> m a
    liftIO (IO () -> m ()) -> IO () -> m ()
    forall a b. (a -> b) -> a -> b
    $ do
        scroll' <- a -> IO (Ptr EventControllerScroll)
    forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
    unsafeManagedPtrCastPtr a
    scroll
        let flags' = [EventControllerScrollFlags] -> CUInt
    forall b a. (Num b, IsGFlag a) => [a] -> b
    gflagsToWord [EventControllerScrollFlags]
    flags
        gtk_event_controller_scroll_set_flags scroll' flags'
        touchManagedPtr scroll
        return ()

    #if defined(ENABLE_OVERLOADING)
    data EventControllerScrollSetFlagsMethodInfo
    instance (signature ~ ([Gtk.Flags.EventControllerScrollFlags] -> m ()), MonadIO m, IsEventControllerScroll a) => O.OverloadedMethod EventControllerScrollSetFlagsMethodInfo a signature where
        overloadedMethod = eventControllerScrollSetFlags

    instance O.OverloadedMethodInfo EventControllerScrollSetFlagsMethodInfo a where
        overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
            O.resolvedSymbolName = "GI.Gtk.Objects.EventControllerScroll.eventControllerScrollSetFlags",
            O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk3-3.0.44/docs/GI-Gtk-Objects-EventControllerScroll.html#v:eventControllerScrollSetFlags"
            })

    #endif