    {-# LANGUAGE TypeApplications #-}

    -- | Copyright  : Will Thompson and Iñaki García Etxebarria
    -- License    : LGPL-2.1
    -- Maintainer : Iñaki García Etxebarria
    --
    -- Represents a widget tooltip.
    --
    -- Basic tooltips can be realized simply by using
    -- 'GI.Gtk.Objects.Widget.widgetSetTooltipText' or
    -- 'GI.Gtk.Objects.Widget.widgetSetTooltipMarkup' without
    -- any explicit tooltip object.
    --
    -- When you need a tooltip with a little more fancy contents,
    -- like adding an image, or you want the tooltip to have different
    -- contents per @GtkTreeView@ row or cell, you will have to do a
    -- little more work:
    --
    -- * Set the [Widget:hasTooltip]("GI.Gtk.Objects.Widget#g:attr:hasTooltip") property to 'P.True'.
    --   This will make GTK monitor the widget for motion and related events
    --   which are needed to determine when and where to show a tooltip.
    -- * Connect to the [Widget::queryTooltip]("GI.Gtk.Objects.Widget#g:signal:queryTooltip") signal.
    --   This signal will be emitted when a tooltip is supposed to be shown.
    --   One of the arguments passed to the signal handler is a @GtkTooltip@
    --   object. This is the object that we are about to display as a tooltip,
    --   and can be manipulated in your callback using functions like
    --   'GI.Gtk.Objects.Tooltip.tooltipSetIcon'. There are functions for setting
    --   the tooltip’s markup, setting an image from a named icon, or even
    --   putting in a custom widget.
    -- * Return 'P.True' from your [queryTooltip](#g:signal:queryTooltip) handler. This causes the tooltip
    --   to be show. If you return 'P.False', it will not be shown.
    --

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

    module GI.Gtk.Objects.Tooltip
        (

    -- * Exported types
        Tooltip(..)                             ,
        IsTooltip                               ,
        toTooltip                               ,

     -- * 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"), [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"), [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"), [getProperty]("GI.GObject.Objects.Object#g:method:getProperty"), [getQdata]("GI.GObject.Objects.Object#g:method:getQdata").
    --
    -- ==== Setters
    -- [setCustom]("GI.Gtk.Objects.Tooltip#g:method:setCustom"), [setData]("GI.GObject.Objects.Object#g:method:setData"), [setDataFull]("GI.GObject.Objects.Object#g:method:setDataFull"), [setIcon]("GI.Gtk.Objects.Tooltip#g:method:setIcon"), [setIconFromGicon]("GI.Gtk.Objects.Tooltip#g:method:setIconFromGicon"), [setIconFromIconName]("GI.Gtk.Objects.Tooltip#g:method:setIconFromIconName"), [setMarkup]("GI.Gtk.Objects.Tooltip#g:method:setMarkup"), [setProperty]("GI.GObject.Objects.Object#g:method:setProperty"), [setText]("GI.Gtk.Objects.Tooltip#g:method:setText"), [setTipArea]("GI.Gtk.Objects.Tooltip#g:method:setTipArea").

    #if defined(ENABLE_OVERLOADING)
        ResolveTooltipMethod                    ,
    #endif

    -- ** setCustom #method:setCustom#

    #if defined(ENABLE_OVERLOADING)
        TooltipSetCustomMethodInfo              ,
    #endif
        tooltipSetCustom                        ,

    -- ** setIcon #method:setIcon#

    #if defined(ENABLE_OVERLOADING)
        TooltipSetIconMethodInfo                ,
    #endif
        tooltipSetIcon                          ,

    -- ** setIconFromGicon #method:setIconFromGicon#

    #if defined(ENABLE_OVERLOADING)
        TooltipSetIconFromGiconMethodInfo       ,
    #endif
        tooltipSetIconFromGicon                 ,

    -- ** setIconFromIconName #method:setIconFromIconName#

    #if defined(ENABLE_OVERLOADING)
        TooltipSetIconFromIconNameMethodInfo    ,
    #endif
        tooltipSetIconFromIconName              ,

    -- ** setMarkup #method:setMarkup#

    #if defined(ENABLE_OVERLOADING)
        TooltipSetMarkupMethodInfo              ,
    #endif
        tooltipSetMarkup                        ,

    -- ** setText #method:setText#

    #if defined(ENABLE_OVERLOADING)
        TooltipSetTextMethodInfo                ,
    #endif
        tooltipSetText                          ,

    -- ** setTipArea #method:setTipArea#

    #if defined(ENABLE_OVERLOADING)
        TooltipSetTipAreaMethodInfo             ,
    #endif
        tooltipSetTipArea                       ,

        ) 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.Cairo.Structs.Context as Cairo.Context
    import qualified GI.Cairo.Structs.FontOptions as Cairo.FontOptions
    import qualified GI.GLib.Callbacks as GLib.Callbacks
    import qualified GI.GLib.Structs.Bytes as GLib.Bytes
    import qualified GI.GObject.Objects.Object as GObject.Object
    import qualified GI.Gdk.Flags as Gdk.Flags
    import qualified GI.Gdk.Interfaces.Paintable as Gdk.Paintable
    import qualified GI.Gdk.Objects.Clipboard as Gdk.Clipboard
    import qualified GI.Gdk.Objects.Cursor as Gdk.Cursor
    import qualified GI.Gdk.Objects.Device as Gdk.Device
    import qualified GI.Gdk.Objects.Display as Gdk.Display
    import qualified GI.Gdk.Objects.Event as Gdk.Event
    import qualified GI.Gdk.Objects.FrameClock as Gdk.FrameClock
    import qualified GI.Gdk.Objects.Snapshot as Gdk.Snapshot
    import qualified GI.Gdk.Objects.Surface as Gdk.Surface
    import qualified GI.Gdk.Objects.Texture as Gdk.Texture
    import qualified GI.Gdk.Structs.RGBA as Gdk.RGBA
    import qualified GI.Gdk.Structs.Rectangle as Gdk.Rectangle
    import qualified GI.Gio.Interfaces.ActionGroup as Gio.ActionGroup
    import qualified GI.Gio.Interfaces.Icon as Gio.Icon
    import qualified GI.Gio.Interfaces.ListModel as Gio.ListModel
    import qualified GI.Graphene.Structs.Matrix as Graphene.Matrix
    import qualified GI.Graphene.Structs.Point as Graphene.Point
    import qualified GI.Graphene.Structs.Point3D as Graphene.Point3D
    import qualified GI.Graphene.Structs.Rect as Graphene.Rect
    import qualified GI.Graphene.Structs.Size as Graphene.Size
    import qualified GI.Graphene.Structs.Vec3 as Graphene.Vec3
    import qualified GI.Graphene.Structs.Vec4 as Graphene.Vec4
    import qualified GI.Gsk.Enums as Gsk.Enums
    import qualified GI.Gsk.Flags as Gsk.Flags
    import qualified GI.Gsk.Objects.GLShader as Gsk.GLShader
    import qualified GI.Gsk.Objects.RenderNode as Gsk.RenderNode
    import qualified GI.Gsk.Objects.Renderer as Gsk.Renderer
    import qualified GI.Gsk.Structs.ColorStop as Gsk.ColorStop
    import qualified GI.Gsk.Structs.ComponentTransfer as Gsk.ComponentTransfer
    import qualified GI.Gsk.Structs.Path as Gsk.Path
    import qualified GI.Gsk.Structs.RoundedRect as Gsk.RoundedRect
    import qualified GI.Gsk.Structs.Shadow as Gsk.Shadow
    import qualified GI.Gsk.Structs.Stroke as Gsk.Stroke
    import qualified GI.Gsk.Structs.Transform as Gsk.Transform
    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.Accessible as Gtk.Accessible
    import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
    import {-# SOURCE #-} qualified GI.Gtk.Interfaces.ConstraintTarget as Gtk.ConstraintTarget
    import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Native as Gtk.Native
    import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Root as Gtk.Root
    import {-# SOURCE #-} qualified GI.Gtk.Interfaces.StyleProvider as Gtk.StyleProvider
    import {-# SOURCE #-} qualified GI.Gtk.Objects.ATContext as Gtk.ATContext
    import {-# SOURCE #-} qualified GI.Gtk.Objects.EventController as Gtk.EventController
    import {-# SOURCE #-} qualified GI.Gtk.Objects.LayoutChild as Gtk.LayoutChild
    import {-# SOURCE #-} qualified GI.Gtk.Objects.LayoutManager as Gtk.LayoutManager
    import {-# SOURCE #-} qualified GI.Gtk.Objects.Settings as Gtk.Settings
    import {-# SOURCE #-} qualified GI.Gtk.Objects.Snapshot as Gtk.Snapshot
    import {-# SOURCE #-} qualified GI.Gtk.Objects.StyleContext as Gtk.StyleContext
    import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
    import {-# SOURCE #-} qualified GI.Gtk.Structs.Border as Gtk.Border
    import {-# SOURCE #-} qualified GI.Gtk.Structs.Requisition as Gtk.Requisition
    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

    #else
    import qualified GI.GObject.Objects.Object as GObject.Object
    import qualified GI.Gdk.Interfaces.Paintable as Gdk.Paintable
    import qualified GI.Gdk.Structs.Rectangle as Gdk.Rectangle
    import qualified GI.Gio.Interfaces.Icon as Gio.Icon
    import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget

    #endif

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

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

    foreign import ccall "gtk_tooltip_get_type"
        c_gtk_tooltip_get_type :: IO B.Types.GType

    instance B.Types.TypedObject Tooltip where
        glibType :: IO GType
    glibType = IO GType
    c_gtk_tooltip_get_type

    instance B.Types.GObject Tooltip

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

    instance O.HasParentTypes Tooltip
    type instance O.ParentTypes Tooltip = '[GObject.Object.Object]

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

    -- | Convert t'Tooltip' 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 Tooltip) where
        gvalueGType_ :: IO GType
    gvalueGType_ = IO GType
    c_gtk_tooltip_get_type
        gvalueSet_ :: Ptr GValue -> Maybe Tooltip -> IO ()
    gvalueSet_ Ptr GValue
    gv Maybe Tooltip
    P.Nothing = Ptr GValue -> Ptr Tooltip -> IO ()
    forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
    B.GValue.set_object Ptr GValue
    gv (Ptr Tooltip
    forall a. Ptr a
    FP.nullPtr :: FP.Ptr Tooltip)
        gvalueSet_ Ptr GValue
    gv (P.Just Tooltip
    obj) = Tooltip -> (Ptr Tooltip -> IO ()) -> IO ()
    forall a c.
    (HasCallStack, ManagedPtrNewtype a) =>
    a -> (Ptr a -> IO c) -> IO c
    B.ManagedPtr.withManagedPtr Tooltip
    obj (Ptr GValue -> Ptr Tooltip -> IO ()
    forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
    B.GValue.set_object Ptr GValue
    gv)
        gvalueGet_ :: Ptr GValue -> IO (Maybe Tooltip)
    gvalueGet_ Ptr GValue
    gv = do
            ptr <- Ptr GValue -> IO (Ptr Tooltip)
    forall a. GObject a => Ptr GValue -> IO (Ptr a)
    B.GValue.get_object Ptr GValue
    gv :: IO (FP.Ptr Tooltip)
            if ptr /= FP.nullPtr
            then P.Just <$> B.ManagedPtr.newObject Tooltip ptr
            else return P.Nothing

    #if defined(ENABLE_OVERLOADING)
    type family ResolveTooltipMethod (t :: Symbol) (o :: DK.Type) :: DK.Type where
        ResolveTooltipMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
        ResolveTooltipMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
        ResolveTooltipMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
        ResolveTooltipMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
        ResolveTooltipMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
        ResolveTooltipMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
        ResolveTooltipMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
        ResolveTooltipMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
        ResolveTooltipMethod "ref" o = GObject.Object.ObjectRefMethodInfo
        ResolveTooltipMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
        ResolveTooltipMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
        ResolveTooltipMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
        ResolveTooltipMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
        ResolveTooltipMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
        ResolveTooltipMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
        ResolveTooltipMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
        ResolveTooltipMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
        ResolveTooltipMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
        ResolveTooltipMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
        ResolveTooltipMethod "setCustom" o = TooltipSetCustomMethodInfo
        ResolveTooltipMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
        ResolveTooltipMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
        ResolveTooltipMethod "setIcon" o = TooltipSetIconMethodInfo
        ResolveTooltipMethod "setIconFromGicon" o = TooltipSetIconFromGiconMethodInfo
        ResolveTooltipMethod "setIconFromIconName" o = TooltipSetIconFromIconNameMethodInfo
        ResolveTooltipMethod "setMarkup" o = TooltipSetMarkupMethodInfo
        ResolveTooltipMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
        ResolveTooltipMethod "setText" o = TooltipSetTextMethodInfo
        ResolveTooltipMethod "setTipArea" o = TooltipSetTipAreaMethodInfo
        ResolveTooltipMethod l o = O.MethodResolutionFailed l o

    instance (info ~ ResolveTooltipMethod t Tooltip, O.OverloadedMethod info Tooltip p) => OL.IsLabel t (Tooltip -> 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 ~ ResolveTooltipMethod t Tooltip, O.OverloadedMethod info Tooltip p, R.HasField t Tooltip p) => R.HasField t Tooltip p where
        getField = O.overloadedMethod @info

    #endif

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

    #endif

    #if defined(ENABLE_OVERLOADING)
    instance O.HasAttributeList Tooltip
    type instance O.AttributeList Tooltip = TooltipAttributeList
    type TooltipAttributeList = ('[ ] :: [(Symbol, DK.Type)])
    #endif

    #if defined(ENABLE_OVERLOADING)
    #endif

    #if defined(ENABLE_OVERLOADING)
    type instance O.SignalList Tooltip = TooltipSignalList
    type TooltipSignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, DK.Type)])

    #endif

    -- method Tooltip::set_custom
    -- method type : OrdinaryMethod
    -- Args: [ Arg
    --           { argCName = "tooltip"
    --           , argType =
    --               TInterface Name { namespace = "Gtk" , name = "Tooltip" }
    --           , argCType = Just "GtkTooltip*"
    --           , direction = DirectionIn
    --           , mayBeNull = False
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "a `GtkTooltip`" , sinceVersion = Nothing }
    --           , argScope = ScopeTypeInvalid
    --           , argClosure = -1
    --           , argDestroy = -1
    --           , argCallerAllocates = False
    --           , argCallbackUserData = False
    --           , transfer = TransferNothing
    --           }
    --       , Arg
    --           { argCName = "custom_widget"
    --           , argType = TInterface Name { namespace = "Gtk" , name = "Widget" }
    --           , argCType = Just "GtkWidget*"
    --           , direction = DirectionIn
    --           , mayBeNull = True
    --           , argDoc =
    --               Documentation
    --                 { rawDocText =
    --                     Just "a `GtkWidget`, or %NULL to unset the old custom widget."
    --                 , 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_tooltip_set_custom" gtk_tooltip_set_custom ::
        Ptr Tooltip ->                          -- tooltip : TInterface (Name {namespace = "Gtk", name = "Tooltip"})
        Ptr Gtk.Widget.Widget ->                -- custom_widget : TInterface (Name {namespace = "Gtk", name = "Widget"})
        IO ()

    -- | Replaces the widget packed into the tooltip with
    -- /@customWidget@/. /@customWidget@/ does not get destroyed when the tooltip goes
    -- away.
    -- By default a box with a @GtkImage@ and @GtkLabel@ is embedded in
    -- the tooltip, which can be configured using 'GI.Gtk.Objects.Tooltip.tooltipSetMarkup'
    -- and 'GI.Gtk.Objects.Tooltip.tooltipSetIcon'.
    tooltipSetCustom ::
        (B.CallStack.HasCallStack, MonadIO m, IsTooltip a, Gtk.Widget.IsWidget b) =>
        a
        -- ^ /@tooltip@/: a @GtkTooltip@
        -> Maybe (b)
        -- ^ /@customWidget@/: a @GtkWidget@, or 'P.Nothing' to unset the old custom widget.
        -> m ()
    tooltipSetCustom :: forall (m :: * -> *) a b.
    (HasCallStack, MonadIO m, IsTooltip a, IsWidget b) =>
    a -> Maybe b -> m ()
    tooltipSetCustom a
    tooltip Maybe b
    customWidget = 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
        tooltip' <- a -> IO (Ptr Tooltip)
    forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
    unsafeManagedPtrCastPtr a
    tooltip
        maybeCustomWidget <- case customWidget of
            Maybe b
    Nothing -> Ptr Widget -> IO (Ptr Widget)
    forall a. a -> IO a
    forall (m :: * -> *) a. Monad m => a -> m a
    return Ptr Widget
    forall a. Ptr a
    FP.nullPtr
            Just b
    jCustomWidget -> do
                jCustomWidget' <- b -> IO (Ptr Widget)
    forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
    unsafeManagedPtrCastPtr b
    jCustomWidget
                return jCustomWidget'
        gtk_tooltip_set_custom tooltip' maybeCustomWidget
        touchManagedPtr tooltip
        whenJust customWidget touchManagedPtr
        return ()

    #if defined(ENABLE_OVERLOADING)
    data TooltipSetCustomMethodInfo
    instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsTooltip a, Gtk.Widget.IsWidget b) => O.OverloadedMethod TooltipSetCustomMethodInfo a signature where
        overloadedMethod = tooltipSetCustom

    instance O.OverloadedMethodInfo TooltipSetCustomMethodInfo a where
        overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
            O.resolvedSymbolName = "GI.Gtk.Objects.Tooltip.tooltipSetCustom",
            O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk4-4.0.12/docs/GI-Gtk-Objects-Tooltip.html#v:tooltipSetCustom"
            })

    #endif

    -- method Tooltip::set_icon
    -- method type : OrdinaryMethod
    -- Args: [ Arg
    --           { argCName = "tooltip"
    --           , argType =
    --               TInterface Name { namespace = "Gtk" , name = "Tooltip" }
    --           , argCType = Just "GtkTooltip*"
    --           , direction = DirectionIn
    --           , mayBeNull = False
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "a `GtkTooltip`" , sinceVersion = Nothing }
    --           , argScope = ScopeTypeInvalid
    --           , argClosure = -1
    --           , argDestroy = -1
    --           , argCallerAllocates = False
    --           , argCallbackUserData = False
    --           , transfer = TransferNothing
    --           }
    --       , Arg
    --           { argCName = "paintable"
    --           , argType =
    --               TInterface Name { namespace = "Gdk" , name = "Paintable" }
    --           , argCType = Just "GdkPaintable*"
    --           , direction = DirectionIn
    --           , mayBeNull = True
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "a `GdkPaintable`" , 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_tooltip_set_icon" gtk_tooltip_set_icon ::
        Ptr Tooltip ->                          -- tooltip : TInterface (Name {namespace = "Gtk", name = "Tooltip"})
        Ptr Gdk.Paintable.Paintable ->          -- paintable : TInterface (Name {namespace = "Gdk", name = "Paintable"})
        IO ()

    -- | Sets the icon of the tooltip (which is in front of the text) to be
    -- /@paintable@/.  If /@paintable@/ is 'P.Nothing', the image will be hidden.
    tooltipSetIcon ::
        (B.CallStack.HasCallStack, MonadIO m, IsTooltip a, Gdk.Paintable.IsPaintable b) =>
        a
        -- ^ /@tooltip@/: a @GtkTooltip@
        -> Maybe (b)
        -- ^ /@paintable@/: a @GdkPaintable@
        -> m ()
    tooltipSetIcon :: forall (m :: * -> *) a b.
    (HasCallStack, MonadIO m, IsTooltip a, IsPaintable b) =>
    a -> Maybe b -> m ()
    tooltipSetIcon a
    tooltip Maybe b
    paintable = 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
        tooltip' <- a -> IO (Ptr Tooltip)
    forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
    unsafeManagedPtrCastPtr a
    tooltip
        maybePaintable <- case paintable of
            Maybe b
    Nothing -> Ptr Paintable -> IO (Ptr Paintable)
    forall a. a -> IO a
    forall (m :: * -> *) a. Monad m => a -> m a
    return Ptr Paintable
    forall a. Ptr a
    FP.nullPtr
            Just b
    jPaintable -> do
                jPaintable' <- b -> IO (Ptr Paintable)
    forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
    unsafeManagedPtrCastPtr b
    jPaintable
                return jPaintable'
        gtk_tooltip_set_icon tooltip' maybePaintable
        touchManagedPtr tooltip
        whenJust paintable touchManagedPtr
        return ()

    #if defined(ENABLE_OVERLOADING)
    data TooltipSetIconMethodInfo
    instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsTooltip a, Gdk.Paintable.IsPaintable b) => O.OverloadedMethod TooltipSetIconMethodInfo a signature where
        overloadedMethod = tooltipSetIcon

    instance O.OverloadedMethodInfo TooltipSetIconMethodInfo a where
        overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
            O.resolvedSymbolName = "GI.Gtk.Objects.Tooltip.tooltipSetIcon",
            O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk4-4.0.12/docs/GI-Gtk-Objects-Tooltip.html#v:tooltipSetIcon"
            })

    #endif

    -- method Tooltip::set_icon_from_gicon
    -- method type : OrdinaryMethod
    -- Args: [ Arg
    --           { argCName = "tooltip"
    --           , argType =
    --               TInterface Name { namespace = "Gtk" , name = "Tooltip" }
    --           , argCType = Just "GtkTooltip*"
    --           , direction = DirectionIn
    --           , mayBeNull = False
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "a `GtkTooltip`" , sinceVersion = Nothing }
    --           , argScope = ScopeTypeInvalid
    --           , argClosure = -1
    --           , argDestroy = -1
    --           , argCallerAllocates = False
    --           , argCallbackUserData = False
    --           , transfer = TransferNothing
    --           }
    --       , Arg
    --           { argCName = "gicon"
    --           , argType = TInterface Name { namespace = "Gio" , name = "Icon" }
    --           , argCType = Just "GIcon*"
    --           , direction = DirectionIn
    --           , mayBeNull = True
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "a `GIcon` representing the icon"
    --                 , 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_tooltip_set_icon_from_gicon" gtk_tooltip_set_icon_from_gicon ::
        Ptr Tooltip ->                          -- tooltip : TInterface (Name {namespace = "Gtk", name = "Tooltip"})
        Ptr Gio.Icon.Icon ->                    -- gicon : TInterface (Name {namespace = "Gio", name = "Icon"})
        IO ()

    -- | Sets the icon of the tooltip (which is in front of the text)
    -- to be the icon indicated by /@gicon@/ with the size indicated
    -- by /@size@/. If /@gicon@/ is 'P.Nothing', the image will be hidden.
    tooltipSetIconFromGicon ::
        (B.CallStack.HasCallStack, MonadIO m, IsTooltip a, Gio.Icon.IsIcon b) =>
        a
        -- ^ /@tooltip@/: a @GtkTooltip@
        -> Maybe (b)
        -- ^ /@gicon@/: a @GIcon@ representing the icon
        -> m ()
    tooltipSetIconFromGicon :: forall (m :: * -> *) a b.
    (HasCallStack, MonadIO m, IsTooltip a, IsIcon b) =>
    a -> Maybe b -> m ()
    tooltipSetIconFromGicon a
    tooltip Maybe b
    gicon = 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
        tooltip' <- a -> IO (Ptr Tooltip)
    forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
    unsafeManagedPtrCastPtr a
    tooltip
        maybeGicon <- case gicon of
            Maybe b
    Nothing -> Ptr Icon -> IO (Ptr Icon)
    forall a. a -> IO a
    forall (m :: * -> *) a. Monad m => a -> m a
    return Ptr Icon
    forall a. Ptr a
    FP.nullPtr
            Just b
    jGicon -> do
                jGicon' <- b -> IO (Ptr Icon)
    forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
    unsafeManagedPtrCastPtr b
    jGicon
                return jGicon'
        gtk_tooltip_set_icon_from_gicon tooltip' maybeGicon
        touchManagedPtr tooltip
        whenJust gicon touchManagedPtr
        return ()

    #if defined(ENABLE_OVERLOADING)
    data TooltipSetIconFromGiconMethodInfo
    instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsTooltip a, Gio.Icon.IsIcon b) => O.OverloadedMethod TooltipSetIconFromGiconMethodInfo a signature where
        overloadedMethod = tooltipSetIconFromGicon

    instance O.OverloadedMethodInfo TooltipSetIconFromGiconMethodInfo a where
        overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
            O.resolvedSymbolName = "GI.Gtk.Objects.Tooltip.tooltipSetIconFromGicon",
            O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk4-4.0.12/docs/GI-Gtk-Objects-Tooltip.html#v:tooltipSetIconFromGicon"
            })

    #endif

    -- method Tooltip::set_icon_from_icon_name
    -- method type : OrdinaryMethod
    -- Args: [ Arg
    --           { argCName = "tooltip"
    --           , argType =
    --               TInterface Name { namespace = "Gtk" , name = "Tooltip" }
    --           , argCType = Just "GtkTooltip*"
    --           , direction = DirectionIn
    --           , mayBeNull = False
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "a `GtkTooltip`" , sinceVersion = Nothing }
    --           , argScope = ScopeTypeInvalid
    --           , argClosure = -1
    --           , argDestroy = -1
    --           , argCallerAllocates = False
    --           , argCallbackUserData = False
    --           , transfer = TransferNothing
    --           }
    --       , Arg
    --           { argCName = "icon_name"
    --           , argType = TBasicType TUTF8
    --           , argCType = Just "const char*"
    --           , direction = DirectionIn
    --           , mayBeNull = True
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "an icon name" , 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_tooltip_set_icon_from_icon_name" gtk_tooltip_set_icon_from_icon_name ::
        Ptr Tooltip ->                          -- tooltip : TInterface (Name {namespace = "Gtk", name = "Tooltip"})
        CString ->                              -- icon_name : TBasicType TUTF8
        IO ()

    -- | Sets the icon of the tooltip (which is in front of the text) to be
    -- the icon indicated by /@iconName@/ with the size indicated
    -- by /@size@/.  If /@iconName@/ is 'P.Nothing', the image will be hidden.
    tooltipSetIconFromIconName ::
        (B.CallStack.HasCallStack, MonadIO m, IsTooltip a) =>
        a
        -- ^ /@tooltip@/: a @GtkTooltip@
        -> Maybe (T.Text)
        -- ^ /@iconName@/: an icon name
        -> m ()
    tooltipSetIconFromIconName :: forall (m :: * -> *) a.
    (HasCallStack, MonadIO m, IsTooltip a) =>
    a -> Maybe Text -> m ()
    tooltipSetIconFromIconName a
    tooltip Maybe Text
    iconName = 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
        tooltip' <- a -> IO (Ptr Tooltip)
    forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
    unsafeManagedPtrCastPtr a
    tooltip
        maybeIconName <- case iconName of
            Maybe Text
    Nothing -> Ptr CChar -> IO (Ptr CChar)
    forall a. a -> IO a
    forall (m :: * -> *) a. Monad m => a -> m a
    return Ptr CChar
    forall a. Ptr a
    FP.nullPtr
            Just Text
    jIconName -> do
                jIconName' <- Text -> IO (Ptr CChar)
    textToCString Text
    jIconName
                return jIconName'
        gtk_tooltip_set_icon_from_icon_name tooltip' maybeIconName
        touchManagedPtr tooltip
        freeMem maybeIconName
        return ()

    #if defined(ENABLE_OVERLOADING)
    data TooltipSetIconFromIconNameMethodInfo
    instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsTooltip a) => O.OverloadedMethod TooltipSetIconFromIconNameMethodInfo a signature where
        overloadedMethod = tooltipSetIconFromIconName

    instance O.OverloadedMethodInfo TooltipSetIconFromIconNameMethodInfo a where
        overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
            O.resolvedSymbolName = "GI.Gtk.Objects.Tooltip.tooltipSetIconFromIconName",
            O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk4-4.0.12/docs/GI-Gtk-Objects-Tooltip.html#v:tooltipSetIconFromIconName"
            })

    #endif

    -- method Tooltip::set_markup
    -- method type : OrdinaryMethod
    -- Args: [ Arg
    --           { argCName = "tooltip"
    --           , argType =
    --               TInterface Name { namespace = "Gtk" , name = "Tooltip" }
    --           , argCType = Just "GtkTooltip*"
    --           , direction = DirectionIn
    --           , mayBeNull = False
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "a `GtkTooltip`" , sinceVersion = Nothing }
    --           , argScope = ScopeTypeInvalid
    --           , argClosure = -1
    --           , argDestroy = -1
    --           , argCallerAllocates = False
    --           , argCallbackUserData = False
    --           , transfer = TransferNothing
    --           }
    --       , Arg
    --           { argCName = "markup"
    --           , argType = TBasicType TUTF8
    --           , argCType = Just "const char*"
    --           , direction = DirectionIn
    --           , mayBeNull = True
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "a string with Pango markup or %NLL"
    --                 , 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_tooltip_set_markup" gtk_tooltip_set_markup ::
        Ptr Tooltip ->                          -- tooltip : TInterface (Name {namespace = "Gtk", name = "Tooltip"})
        CString ->                              -- markup : TBasicType TUTF8
        IO ()

    -- | Sets the text of the tooltip to be /@markup@/.
    --
    -- The string must be marked up with Pango markup.
    -- If /@markup@/ is 'P.Nothing', the label will be hidden.
    tooltipSetMarkup ::
        (B.CallStack.HasCallStack, MonadIO m, IsTooltip a) =>
        a
        -- ^ /@tooltip@/: a @GtkTooltip@
        -> Maybe (T.Text)
        -- ^ /@markup@/: a string with Pango markup or @/NLL/@
        -> m ()
    tooltipSetMarkup :: forall (m :: * -> *) a.
    (HasCallStack, MonadIO m, IsTooltip a) =>
    a -> Maybe Text -> m ()
    tooltipSetMarkup a
    tooltip Maybe Text
    markup = 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
        tooltip' <- a -> IO (Ptr Tooltip)
    forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
    unsafeManagedPtrCastPtr a
    tooltip
        maybeMarkup <- case markup of
            Maybe Text
    Nothing -> Ptr CChar -> IO (Ptr CChar)
    forall a. a -> IO a
    forall (m :: * -> *) a. Monad m => a -> m a
    return Ptr CChar
    forall a. Ptr a
    FP.nullPtr
            Just Text
    jMarkup -> do
                jMarkup' <- Text -> IO (Ptr CChar)
    textToCString Text
    jMarkup
                return jMarkup'
        gtk_tooltip_set_markup tooltip' maybeMarkup
        touchManagedPtr tooltip
        freeMem maybeMarkup
        return ()

    #if defined(ENABLE_OVERLOADING)
    data TooltipSetMarkupMethodInfo
    instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsTooltip a) => O.OverloadedMethod TooltipSetMarkupMethodInfo a signature where
        overloadedMethod = tooltipSetMarkup

    instance O.OverloadedMethodInfo TooltipSetMarkupMethodInfo a where
        overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
            O.resolvedSymbolName = "GI.Gtk.Objects.Tooltip.tooltipSetMarkup",
            O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk4-4.0.12/docs/GI-Gtk-Objects-Tooltip.html#v:tooltipSetMarkup"
            })

    #endif

    -- method Tooltip::set_text
    -- method type : OrdinaryMethod
    -- Args: [ Arg
    --           { argCName = "tooltip"
    --           , argType =
    --               TInterface Name { namespace = "Gtk" , name = "Tooltip" }
    --           , argCType = Just "GtkTooltip*"
    --           , direction = DirectionIn
    --           , mayBeNull = False
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "a `GtkTooltip`" , sinceVersion = Nothing }
    --           , argScope = ScopeTypeInvalid
    --           , argClosure = -1
    --           , argDestroy = -1
    --           , argCallerAllocates = False
    --           , argCallbackUserData = False
    --           , transfer = TransferNothing
    --           }
    --       , Arg
    --           { argCName = "text"
    --           , argType = TBasicType TUTF8
    --           , argCType = Just "const char*"
    --           , direction = DirectionIn
    --           , mayBeNull = True
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "a text string" , 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_tooltip_set_text" gtk_tooltip_set_text ::
        Ptr Tooltip ->                          -- tooltip : TInterface (Name {namespace = "Gtk", name = "Tooltip"})
        CString ->                              -- text : TBasicType TUTF8
        IO ()

    -- | Sets the text of the tooltip to be /@text@/.
    --
    -- If /@text@/ is 'P.Nothing', the label will be hidden.
    -- See also 'GI.Gtk.Objects.Tooltip.tooltipSetMarkup'.
    tooltipSetText ::
        (B.CallStack.HasCallStack, MonadIO m, IsTooltip a) =>
        a
        -- ^ /@tooltip@/: a @GtkTooltip@
        -> Maybe (T.Text)
        -- ^ /@text@/: a text string
        -> m ()
    tooltipSetText :: forall (m :: * -> *) a.
    (HasCallStack, MonadIO m, IsTooltip a) =>
    a -> Maybe Text -> m ()
    tooltipSetText a
    tooltip Maybe Text
    text = 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
        tooltip' <- a -> IO (Ptr Tooltip)
    forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
    unsafeManagedPtrCastPtr a
    tooltip
        maybeText <- case text of
            Maybe Text
    Nothing -> Ptr CChar -> IO (Ptr CChar)
    forall a. a -> IO a
    forall (m :: * -> *) a. Monad m => a -> m a
    return Ptr CChar
    forall a. Ptr a
    FP.nullPtr
            Just Text
    jText -> do
                jText' <- Text -> IO (Ptr CChar)
    textToCString Text
    jText
                return jText'
        gtk_tooltip_set_text tooltip' maybeText
        touchManagedPtr tooltip
        freeMem maybeText
        return ()

    #if defined(ENABLE_OVERLOADING)
    data TooltipSetTextMethodInfo
    instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsTooltip a) => O.OverloadedMethod TooltipSetTextMethodInfo a signature where
        overloadedMethod = tooltipSetText

    instance O.OverloadedMethodInfo TooltipSetTextMethodInfo a where
        overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
            O.resolvedSymbolName = "GI.Gtk.Objects.Tooltip.tooltipSetText",
            O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk4-4.0.12/docs/GI-Gtk-Objects-Tooltip.html#v:tooltipSetText"
            })

    #endif

    -- method Tooltip::set_tip_area
    -- method type : OrdinaryMethod
    -- Args: [ Arg
    --           { argCName = "tooltip"
    --           , argType =
    --               TInterface Name { namespace = "Gtk" , name = "Tooltip" }
    --           , argCType = Just "GtkTooltip*"
    --           , direction = DirectionIn
    --           , mayBeNull = False
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "a `GtkTooltip`" , sinceVersion = Nothing }
    --           , argScope = ScopeTypeInvalid
    --           , argClosure = -1
    --           , argDestroy = -1
    --           , argCallerAllocates = False
    --           , argCallbackUserData = False
    --           , transfer = TransferNothing
    --           }
    --       , Arg
    --           { argCName = "rect"
    --           , argType =
    --               TInterface Name { namespace = "Gdk" , name = "Rectangle" }
    --           , argCType = Just "const GdkRectangle*"
    --           , direction = DirectionIn
    --           , mayBeNull = False
    --           , argDoc =
    --               Documentation
    --                 { rawDocText = Just "a `GdkRectangle`" , 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_tooltip_set_tip_area" gtk_tooltip_set_tip_area ::
        Ptr Tooltip ->                          -- tooltip : TInterface (Name {namespace = "Gtk", name = "Tooltip"})
        Ptr Gdk.Rectangle.Rectangle ->          -- rect : TInterface (Name {namespace = "Gdk", name = "Rectangle"})
        IO ()

    -- | Sets the area of the widget, where the contents of this tooltip apply,
    -- to be /@rect@/ (in widget coordinates).  This is especially useful for
    -- properly setting tooltips on @GtkTreeView@ rows and cells, @GtkIconViews@,
    -- etc.
    --
    -- For setting tooltips on @GtkTreeView@, please refer to the convenience
    -- functions for this: 'GI.Gtk.Objects.TreeView.treeViewSetTooltipRow' and
    -- 'GI.Gtk.Objects.TreeView.treeViewSetTooltipCell'.
    tooltipSetTipArea ::
        (B.CallStack.HasCallStack, MonadIO m, IsTooltip a) =>
        a
        -- ^ /@tooltip@/: a @GtkTooltip@
        -> Gdk.Rectangle.Rectangle
        -- ^ /@rect@/: a @GdkRectangle@
        -> m ()
    tooltipSetTipArea :: forall (m :: * -> *) a.
    (HasCallStack, MonadIO m, IsTooltip a) =>
    a -> Rectangle -> m ()
    tooltipSetTipArea a
    tooltip Rectangle
    rect = 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
        tooltip' <- a -> IO (Ptr Tooltip)
    forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
    unsafeManagedPtrCastPtr a
    tooltip
        rect' <- unsafeManagedPtrGetPtr rect
        gtk_tooltip_set_tip_area tooltip' rect'
        touchManagedPtr tooltip
        touchManagedPtr rect
        return ()

    #if defined(ENABLE_OVERLOADING)
    data TooltipSetTipAreaMethodInfo
    instance (signature ~ (Gdk.Rectangle.Rectangle -> m ()), MonadIO m, IsTooltip a) => O.OverloadedMethod TooltipSetTipAreaMethodInfo a signature where
        overloadedMethod = tooltipSetTipArea

    instance O.OverloadedMethodInfo TooltipSetTipAreaMethodInfo a where
        overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
            O.resolvedSymbolName = "GI.Gtk.Objects.Tooltip.tooltipSetTipArea",
            O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk4-4.0.12/docs/GI-Gtk-Objects-Tooltip.html#v:tooltipSetTipArea"
            })

    #endif