{-# LANGUAGE TypeApplications #-}


-- | Copyright  : Will Thompson and Iñaki García Etxebarria
-- License    : LGPL-2.1
-- Maintainer : Iñaki García Etxebarria
-- 
-- Result of a Hit Test (Web Process Extensions).
-- 
-- WebKitWebHitTestResult extends t'GI.WebKitWebProcessExtension.Objects.HitTestResult.HitTestResult' to provide information
-- about the @/WebKitDOMNode/@ in the coordinates of the Hit Test.
-- 
-- /Since: 2.8/

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

module GI.WebKitWebProcessExtension.Objects.WebHitTestResult
    ( 

-- * Exported types
    WebHitTestResult(..)                    ,
    IsWebHitTestResult                      ,
    toWebHitTestResult                      ,


 -- * 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"), [contextIsEditable]("GI.WebKitWebProcessExtension.Objects.WebHitTestResult#g:method:contextIsEditable"), [contextIsImage]("GI.WebKitWebProcessExtension.Objects.WebHitTestResult#g:method:contextIsImage"), [contextIsLink]("GI.WebKitWebProcessExtension.Objects.WebHitTestResult#g:method:contextIsLink"), [contextIsMedia]("GI.WebKitWebProcessExtension.Objects.WebHitTestResult#g:method:contextIsMedia"), [contextIsScrollbar]("GI.WebKitWebProcessExtension.Objects.WebHitTestResult#g:method:contextIsScrollbar"), [contextIsSelection]("GI.WebKitWebProcessExtension.Objects.WebHitTestResult#g:method:contextIsSelection"), [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
-- [getContext]("GI.WebKitWebProcessExtension.Objects.WebHitTestResult#g:method:getContext"), [getData]("GI.GObject.Objects.Object#g:method:getData"), [getImageUri]("GI.WebKitWebProcessExtension.Objects.WebHitTestResult#g:method:getImageUri"), [getJsNode]("GI.WebKitWebProcessExtension.Objects.WebHitTestResult#g:method:getJsNode"), [getLinkLabel]("GI.WebKitWebProcessExtension.Objects.WebHitTestResult#g:method:getLinkLabel"), [getLinkTitle]("GI.WebKitWebProcessExtension.Objects.WebHitTestResult#g:method:getLinkTitle"), [getLinkUri]("GI.WebKitWebProcessExtension.Objects.WebHitTestResult#g:method:getLinkUri"), [getMediaUri]("GI.WebKitWebProcessExtension.Objects.WebHitTestResult#g:method:getMediaUri"), [getProperty]("GI.GObject.Objects.Object#g:method:getProperty"), [getQdata]("GI.GObject.Objects.Object#g:method:getQdata").
-- 
-- ==== Setters
-- [setData]("GI.GObject.Objects.Object#g:method:setData"), [setDataFull]("GI.GObject.Objects.Object#g:method:setDataFull"), [setProperty]("GI.GObject.Objects.Object#g:method:setProperty").

#if defined(ENABLE_OVERLOADING)
    ResolveWebHitTestResultMethod           ,
#endif

-- ** contextIsEditable #method:contextIsEditable#

#if defined(ENABLE_OVERLOADING)
    WebHitTestResultContextIsEditableMethodInfo,
#endif
    webHitTestResultContextIsEditable       ,


-- ** contextIsImage #method:contextIsImage#

#if defined(ENABLE_OVERLOADING)
    WebHitTestResultContextIsImageMethodInfo,
#endif
    webHitTestResultContextIsImage          ,


-- ** contextIsLink #method:contextIsLink#

#if defined(ENABLE_OVERLOADING)
    WebHitTestResultContextIsLinkMethodInfo ,
#endif
    webHitTestResultContextIsLink           ,


-- ** contextIsMedia #method:contextIsMedia#

#if defined(ENABLE_OVERLOADING)
    WebHitTestResultContextIsMediaMethodInfo,
#endif
    webHitTestResultContextIsMedia          ,


-- ** contextIsScrollbar #method:contextIsScrollbar#

#if defined(ENABLE_OVERLOADING)
    WebHitTestResultContextIsScrollbarMethodInfo,
#endif
    webHitTestResultContextIsScrollbar      ,


-- ** contextIsSelection #method:contextIsSelection#

#if defined(ENABLE_OVERLOADING)
    WebHitTestResultContextIsSelectionMethodInfo,
#endif
    webHitTestResultContextIsSelection      ,


-- ** getContext #method:getContext#

#if defined(ENABLE_OVERLOADING)
    WebHitTestResultGetContextMethodInfo    ,
#endif
    webHitTestResultGetContext              ,


-- ** getImageUri #method:getImageUri#

#if defined(ENABLE_OVERLOADING)
    WebHitTestResultGetImageUriMethodInfo   ,
#endif
    webHitTestResultGetImageUri             ,


-- ** getJsNode #method:getJsNode#

#if defined(ENABLE_OVERLOADING)
    WebHitTestResultGetJsNodeMethodInfo     ,
#endif
    webHitTestResultGetJsNode               ,


-- ** getLinkLabel #method:getLinkLabel#

#if defined(ENABLE_OVERLOADING)
    WebHitTestResultGetLinkLabelMethodInfo  ,
#endif
    webHitTestResultGetLinkLabel            ,


-- ** getLinkTitle #method:getLinkTitle#

#if defined(ENABLE_OVERLOADING)
    WebHitTestResultGetLinkTitleMethodInfo  ,
#endif
    webHitTestResultGetLinkTitle            ,


-- ** getLinkUri #method:getLinkUri#

#if defined(ENABLE_OVERLOADING)
    WebHitTestResultGetLinkUriMethodInfo    ,
#endif
    webHitTestResultGetLinkUri              ,


-- ** getMediaUri #method:getMediaUri#

#if defined(ENABLE_OVERLOADING)
    WebHitTestResultGetMediaUriMethodInfo   ,
#endif
    webHitTestResultGetMediaUri             ,




    ) 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 GI.GObject.Objects.Object as GObject.Object
import qualified GI.JavaScriptCore.Objects.Value as JavaScriptCore.Value
import {-# SOURCE #-} qualified GI.WebKitWebProcessExtension.Objects.ScriptWorld as WebKitWebProcessExtension.ScriptWorld

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

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

foreign import ccall "webkit_web_hit_test_result_get_type"
    c_webkit_web_hit_test_result_get_type :: IO B.Types.GType

instance B.Types.TypedObject WebHitTestResult where
    glibType :: IO GType
glibType = IO GType
c_webkit_web_hit_test_result_get_type

instance B.Types.GObject WebHitTestResult

-- | Type class for types which can be safely cast to `WebHitTestResult`, for instance with `toWebHitTestResult`.
class (SP.GObject o, O.IsDescendantOf WebHitTestResult o) => IsWebHitTestResult o
instance (SP.GObject o, O.IsDescendantOf WebHitTestResult o) => IsWebHitTestResult o

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

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

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

#if defined(ENABLE_OVERLOADING)
type family ResolveWebHitTestResultMethod (t :: Symbol) (o :: DK.Type) :: DK.Type where
    ResolveWebHitTestResultMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
    ResolveWebHitTestResultMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
    ResolveWebHitTestResultMethod "contextIsEditable" o = WebHitTestResultContextIsEditableMethodInfo
    ResolveWebHitTestResultMethod "contextIsImage" o = WebHitTestResultContextIsImageMethodInfo
    ResolveWebHitTestResultMethod "contextIsLink" o = WebHitTestResultContextIsLinkMethodInfo
    ResolveWebHitTestResultMethod "contextIsMedia" o = WebHitTestResultContextIsMediaMethodInfo
    ResolveWebHitTestResultMethod "contextIsScrollbar" o = WebHitTestResultContextIsScrollbarMethodInfo
    ResolveWebHitTestResultMethod "contextIsSelection" o = WebHitTestResultContextIsSelectionMethodInfo
    ResolveWebHitTestResultMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
    ResolveWebHitTestResultMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
    ResolveWebHitTestResultMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
    ResolveWebHitTestResultMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
    ResolveWebHitTestResultMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
    ResolveWebHitTestResultMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
    ResolveWebHitTestResultMethod "ref" o = GObject.Object.ObjectRefMethodInfo
    ResolveWebHitTestResultMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
    ResolveWebHitTestResultMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
    ResolveWebHitTestResultMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
    ResolveWebHitTestResultMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
    ResolveWebHitTestResultMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
    ResolveWebHitTestResultMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
    ResolveWebHitTestResultMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
    ResolveWebHitTestResultMethod "getContext" o = WebHitTestResultGetContextMethodInfo
    ResolveWebHitTestResultMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
    ResolveWebHitTestResultMethod "getImageUri" o = WebHitTestResultGetImageUriMethodInfo
    ResolveWebHitTestResultMethod "getJsNode" o = WebHitTestResultGetJsNodeMethodInfo
    ResolveWebHitTestResultMethod "getLinkLabel" o = WebHitTestResultGetLinkLabelMethodInfo
    ResolveWebHitTestResultMethod "getLinkTitle" o = WebHitTestResultGetLinkTitleMethodInfo
    ResolveWebHitTestResultMethod "getLinkUri" o = WebHitTestResultGetLinkUriMethodInfo
    ResolveWebHitTestResultMethod "getMediaUri" o = WebHitTestResultGetMediaUriMethodInfo
    ResolveWebHitTestResultMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
    ResolveWebHitTestResultMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
    ResolveWebHitTestResultMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
    ResolveWebHitTestResultMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
    ResolveWebHitTestResultMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
    ResolveWebHitTestResultMethod l o = O.MethodResolutionFailed l o

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

#endif

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

#endif

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

#if defined(ENABLE_OVERLOADING)
#endif

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

#endif

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

foreign import ccall "webkit_web_hit_test_result_context_is_editable" webkit_web_hit_test_result_context_is_editable :: 
    Ptr WebHitTestResult ->                 -- web_hit_test_result : TInterface (Name {namespace = "WebKitWebProcessExtension", name = "WebHitTestResult"})
    IO CInt

-- | Check whether there is an editable element at the hit test position.
-- 
-- Checks whether 'GI.WebKitWebProcessExtension.Flags.HitTestResultContextEditable' flag is present in
-- the context flags.
webHitTestResultContextIsEditable ::
    (B.CallStack.HasCallStack, MonadIO m, IsWebHitTestResult a) =>
    a
    -- ^ /@webHitTestResult@/: a @/WebWebKitHitTestResult/@
    -> m Bool
    -- ^ __Returns:__ 'P.True' if the hit test covers an editable element or 'P.False' otherwise.
webHitTestResultContextIsEditable :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsWebHitTestResult a) =>
a -> m Bool
webHitTestResultContextIsEditable a
webHitTestResult = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
    Ptr WebHitTestResult
webHitTestResult' <- a -> IO (Ptr WebHitTestResult)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
webHitTestResult
    CInt
result <- Ptr WebHitTestResult -> IO CInt
webkit_web_hit_test_result_context_is_editable Ptr WebHitTestResult
webHitTestResult'
    let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
webHitTestResult
    Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'

#if defined(ENABLE_OVERLOADING)
data WebHitTestResultContextIsEditableMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsWebHitTestResult a) => O.OverloadedMethod WebHitTestResultContextIsEditableMethodInfo a signature where
    overloadedMethod = webHitTestResultContextIsEditable

instance O.OverloadedMethodInfo WebHitTestResultContextIsEditableMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.WebKitWebProcessExtension.Objects.WebHitTestResult.webHitTestResultContextIsEditable",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkitwebprocessextension-6.0.2/docs/GI-WebKitWebProcessExtension-Objects-WebHitTestResult.html#v:webHitTestResultContextIsEditable"
        })


#endif

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

foreign import ccall "webkit_web_hit_test_result_context_is_image" webkit_web_hit_test_result_context_is_image :: 
    Ptr WebHitTestResult ->                 -- web_hit_test_result : TInterface (Name {namespace = "WebKitWebProcessExtension", name = "WebHitTestResult"})
    IO CInt

-- | Check whether there is an image element at the hit test position.
-- 
-- Checks whether 'GI.WebKitWebProcessExtension.Flags.HitTestResultContextImage' flag is present in
-- the context flags.
webHitTestResultContextIsImage ::
    (B.CallStack.HasCallStack, MonadIO m, IsWebHitTestResult a) =>
    a
    -- ^ /@webHitTestResult@/: a @/WebWebKitHitTestResult/@
    -> m Bool
    -- ^ __Returns:__ 'P.True' if the hit test covers an image element or 'P.False' otherwise.
webHitTestResultContextIsImage :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsWebHitTestResult a) =>
a -> m Bool
webHitTestResultContextIsImage a
webHitTestResult = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
    Ptr WebHitTestResult
webHitTestResult' <- a -> IO (Ptr WebHitTestResult)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
webHitTestResult
    CInt
result <- Ptr WebHitTestResult -> IO CInt
webkit_web_hit_test_result_context_is_image Ptr WebHitTestResult
webHitTestResult'
    let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
webHitTestResult
    Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'

#if defined(ENABLE_OVERLOADING)
data WebHitTestResultContextIsImageMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsWebHitTestResult a) => O.OverloadedMethod WebHitTestResultContextIsImageMethodInfo a signature where
    overloadedMethod = webHitTestResultContextIsImage

instance O.OverloadedMethodInfo WebHitTestResultContextIsImageMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.WebKitWebProcessExtension.Objects.WebHitTestResult.webHitTestResultContextIsImage",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkitwebprocessextension-6.0.2/docs/GI-WebKitWebProcessExtension-Objects-WebHitTestResult.html#v:webHitTestResultContextIsImage"
        })


#endif

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

foreign import ccall "webkit_web_hit_test_result_context_is_link" webkit_web_hit_test_result_context_is_link :: 
    Ptr WebHitTestResult ->                 -- web_hit_test_result : TInterface (Name {namespace = "WebKitWebProcessExtension", name = "WebHitTestResult"})
    IO CInt

-- | Check whether there is a link element at the hit test position.
-- 
-- Checks whether 'GI.WebKitWebProcessExtension.Flags.HitTestResultContextLink' flag is present in
-- the context flags.
webHitTestResultContextIsLink ::
    (B.CallStack.HasCallStack, MonadIO m, IsWebHitTestResult a) =>
    a
    -- ^ /@webHitTestResult@/: a @/WebWebKitHitTestResult/@
    -> m Bool
    -- ^ __Returns:__ 'P.True' if the hit test covers a link element or 'P.False' otherwise.
webHitTestResultContextIsLink :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsWebHitTestResult a) =>
a -> m Bool
webHitTestResultContextIsLink a
webHitTestResult = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
    Ptr WebHitTestResult
webHitTestResult' <- a -> IO (Ptr WebHitTestResult)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
webHitTestResult
    CInt
result <- Ptr WebHitTestResult -> IO CInt
webkit_web_hit_test_result_context_is_link Ptr WebHitTestResult
webHitTestResult'
    let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
webHitTestResult
    Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'

#if defined(ENABLE_OVERLOADING)
data WebHitTestResultContextIsLinkMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsWebHitTestResult a) => O.OverloadedMethod WebHitTestResultContextIsLinkMethodInfo a signature where
    overloadedMethod = webHitTestResultContextIsLink

instance O.OverloadedMethodInfo WebHitTestResultContextIsLinkMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.WebKitWebProcessExtension.Objects.WebHitTestResult.webHitTestResultContextIsLink",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkitwebprocessextension-6.0.2/docs/GI-WebKitWebProcessExtension-Objects-WebHitTestResult.html#v:webHitTestResultContextIsLink"
        })


#endif

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

foreign import ccall "webkit_web_hit_test_result_context_is_media" webkit_web_hit_test_result_context_is_media :: 
    Ptr WebHitTestResult ->                 -- web_hit_test_result : TInterface (Name {namespace = "WebKitWebProcessExtension", name = "WebHitTestResult"})
    IO CInt

-- | Check whether there is a media element at the hit test position.
-- 
-- Checks whether 'GI.WebKitWebProcessExtension.Flags.HitTestResultContextMedia' flag is present in
-- the context flags.
webHitTestResultContextIsMedia ::
    (B.CallStack.HasCallStack, MonadIO m, IsWebHitTestResult a) =>
    a
    -- ^ /@webHitTestResult@/: a @/WebWebKitHitTestResult/@
    -> m Bool
    -- ^ __Returns:__ 'P.True' if the hit test covers a media element or 'P.False' otherwise.
webHitTestResultContextIsMedia :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsWebHitTestResult a) =>
a -> m Bool
webHitTestResultContextIsMedia a
webHitTestResult = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
    Ptr WebHitTestResult
webHitTestResult' <- a -> IO (Ptr WebHitTestResult)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
webHitTestResult
    CInt
result <- Ptr WebHitTestResult -> IO CInt
webkit_web_hit_test_result_context_is_media Ptr WebHitTestResult
webHitTestResult'
    let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
webHitTestResult
    Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'

#if defined(ENABLE_OVERLOADING)
data WebHitTestResultContextIsMediaMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsWebHitTestResult a) => O.OverloadedMethod WebHitTestResultContextIsMediaMethodInfo a signature where
    overloadedMethod = webHitTestResultContextIsMedia

instance O.OverloadedMethodInfo WebHitTestResultContextIsMediaMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.WebKitWebProcessExtension.Objects.WebHitTestResult.webHitTestResultContextIsMedia",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkitwebprocessextension-6.0.2/docs/GI-WebKitWebProcessExtension-Objects-WebHitTestResult.html#v:webHitTestResultContextIsMedia"
        })


#endif

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

foreign import ccall "webkit_web_hit_test_result_context_is_scrollbar" webkit_web_hit_test_result_context_is_scrollbar :: 
    Ptr WebHitTestResult ->                 -- web_hit_test_result : TInterface (Name {namespace = "WebKitWebProcessExtension", name = "WebHitTestResult"})
    IO CInt

-- | Check whether there is a scrollbar at the hit test position.
-- 
-- Checks whether 'GI.WebKitWebProcessExtension.Flags.HitTestResultContextScrollbar' flag is present in
-- the context flags.
webHitTestResultContextIsScrollbar ::
    (B.CallStack.HasCallStack, MonadIO m, IsWebHitTestResult a) =>
    a
    -- ^ /@webHitTestResult@/: a @/WebWebKitHitTestResult/@
    -> m Bool
    -- ^ __Returns:__ 'P.True' if the hit test covers a scrollbar or 'P.False' otherwise.
webHitTestResultContextIsScrollbar :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsWebHitTestResult a) =>
a -> m Bool
webHitTestResultContextIsScrollbar a
webHitTestResult = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
    Ptr WebHitTestResult
webHitTestResult' <- a -> IO (Ptr WebHitTestResult)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
webHitTestResult
    CInt
result <- Ptr WebHitTestResult -> IO CInt
webkit_web_hit_test_result_context_is_scrollbar Ptr WebHitTestResult
webHitTestResult'
    let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
webHitTestResult
    Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'

#if defined(ENABLE_OVERLOADING)
data WebHitTestResultContextIsScrollbarMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsWebHitTestResult a) => O.OverloadedMethod WebHitTestResultContextIsScrollbarMethodInfo a signature where
    overloadedMethod = webHitTestResultContextIsScrollbar

instance O.OverloadedMethodInfo WebHitTestResultContextIsScrollbarMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.WebKitWebProcessExtension.Objects.WebHitTestResult.webHitTestResultContextIsScrollbar",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkitwebprocessextension-6.0.2/docs/GI-WebKitWebProcessExtension-Objects-WebHitTestResult.html#v:webHitTestResultContextIsScrollbar"
        })


#endif

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

foreign import ccall "webkit_web_hit_test_result_context_is_selection" webkit_web_hit_test_result_context_is_selection :: 
    Ptr WebHitTestResult ->                 -- web_hit_test_result : TInterface (Name {namespace = "WebKitWebProcessExtension", name = "WebHitTestResult"})
    IO CInt

-- | Check whether there is a selected element at the hit test position.
-- 
-- Checks whether 'GI.WebKitWebProcessExtension.Flags.HitTestResultContextSelection' flag is present in
-- the context flags.
webHitTestResultContextIsSelection ::
    (B.CallStack.HasCallStack, MonadIO m, IsWebHitTestResult a) =>
    a
    -- ^ /@webHitTestResult@/: a @/WebWebKitHitTestResult/@
    -> m Bool
    -- ^ __Returns:__ 'P.True' if the hit test covers a selected element or 'P.False' otherwise.
webHitTestResultContextIsSelection :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsWebHitTestResult a) =>
a -> m Bool
webHitTestResultContextIsSelection a
webHitTestResult = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
    Ptr WebHitTestResult
webHitTestResult' <- a -> IO (Ptr WebHitTestResult)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
webHitTestResult
    CInt
result <- Ptr WebHitTestResult -> IO CInt
webkit_web_hit_test_result_context_is_selection Ptr WebHitTestResult
webHitTestResult'
    let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
webHitTestResult
    Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'

#if defined(ENABLE_OVERLOADING)
data WebHitTestResultContextIsSelectionMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsWebHitTestResult a) => O.OverloadedMethod WebHitTestResultContextIsSelectionMethodInfo a signature where
    overloadedMethod = webHitTestResultContextIsSelection

instance O.OverloadedMethodInfo WebHitTestResultContextIsSelectionMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.WebKitWebProcessExtension.Objects.WebHitTestResult.webHitTestResultContextIsSelection",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkitwebprocessextension-6.0.2/docs/GI-WebKitWebProcessExtension-Objects-WebHitTestResult.html#v:webHitTestResultContextIsSelection"
        })


#endif

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

foreign import ccall "webkit_web_hit_test_result_get_context" webkit_web_hit_test_result_get_context :: 
    Ptr WebHitTestResult ->                 -- web_hit_test_result : TInterface (Name {namespace = "WebKitWebProcessExtension", name = "WebHitTestResult"})
    IO Word32

-- | Gets the the context flags for the hit test result.
webHitTestResultGetContext ::
    (B.CallStack.HasCallStack, MonadIO m, IsWebHitTestResult a) =>
    a
    -- ^ /@webHitTestResult@/: a t'GI.WebKitWebProcessExtension.Objects.WebHitTestResult.WebHitTestResult'
    -> m Word32
    -- ^ __Returns:__ a bitmask of t'GI.WebKitWebProcessExtension.Flags.HitTestResultContext' flags
webHitTestResultGetContext :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsWebHitTestResult a) =>
a -> m Word32
webHitTestResultGetContext a
webHitTestResult = IO Word32 -> m Word32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ do
    Ptr WebHitTestResult
webHitTestResult' <- a -> IO (Ptr WebHitTestResult)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
webHitTestResult
    Word32
result <- Ptr WebHitTestResult -> IO Word32
webkit_web_hit_test_result_get_context Ptr WebHitTestResult
webHitTestResult'
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
webHitTestResult
    Word32 -> IO Word32
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Word32
result

#if defined(ENABLE_OVERLOADING)
data WebHitTestResultGetContextMethodInfo
instance (signature ~ (m Word32), MonadIO m, IsWebHitTestResult a) => O.OverloadedMethod WebHitTestResultGetContextMethodInfo a signature where
    overloadedMethod = webHitTestResultGetContext

instance O.OverloadedMethodInfo WebHitTestResultGetContextMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.WebKitWebProcessExtension.Objects.WebHitTestResult.webHitTestResultGetContext",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkitwebprocessextension-6.0.2/docs/GI-WebKitWebProcessExtension-Objects-WebHitTestResult.html#v:webHitTestResultGetContext"
        })


#endif

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

foreign import ccall "webkit_web_hit_test_result_get_image_uri" webkit_web_hit_test_result_get_image_uri :: 
    Ptr WebHitTestResult ->                 -- web_hit_test_result : TInterface (Name {namespace = "WebKitWebProcessExtension", name = "WebHitTestResult"})
    IO CString

-- | Obtains the URI associated with the image element at the hit test position.
webHitTestResultGetImageUri ::
    (B.CallStack.HasCallStack, MonadIO m, IsWebHitTestResult a) =>
    a
    -- ^ /@webHitTestResult@/: a @/WebWebKitHitTestResult/@
    -> m T.Text
    -- ^ __Returns:__ the URI of the image element, or 'P.Nothing' if the hit test does not cover an image element.
webHitTestResultGetImageUri :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsWebHitTestResult a) =>
a -> m Text
webHitTestResultGetImageUri a
webHitTestResult = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
    Ptr WebHitTestResult
webHitTestResult' <- a -> IO (Ptr WebHitTestResult)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
webHitTestResult
    CString
result <- Ptr WebHitTestResult -> IO CString
webkit_web_hit_test_result_get_image_uri Ptr WebHitTestResult
webHitTestResult'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"webHitTestResultGetImageUri" CString
result
    Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
webHitTestResult
    Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'

#if defined(ENABLE_OVERLOADING)
data WebHitTestResultGetImageUriMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsWebHitTestResult a) => O.OverloadedMethod WebHitTestResultGetImageUriMethodInfo a signature where
    overloadedMethod = webHitTestResultGetImageUri

instance O.OverloadedMethodInfo WebHitTestResultGetImageUriMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.WebKitWebProcessExtension.Objects.WebHitTestResult.webHitTestResultGetImageUri",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkitwebprocessextension-6.0.2/docs/GI-WebKitWebProcessExtension-Objects-WebHitTestResult.html#v:webHitTestResultGetImageUri"
        })


#endif

-- method WebHitTestResult::get_js_node
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "web_hit_test_result"
--           , argType =
--               TInterface
--                 Name
--                   { namespace = "WebKitWebProcessExtension"
--                   , name = "WebHitTestResult"
--                   }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #WebKitWebHitTestResult"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "world"
--           , argType =
--               TInterface
--                 Name
--                   { namespace = "WebKitWebProcessExtension" , name = "ScriptWorld" }
--           , direction = DirectionIn
--           , mayBeNull = True
--           , argDoc =
--               Documentation
--                 { rawDocText =
--                     Just "a #WebKitScriptWorld, or %NULL to use the default"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just
--               (TInterface Name { namespace = "JavaScriptCore" , name = "Value" })
-- throws : False
-- Skip return : False

foreign import ccall "webkit_web_hit_test_result_get_js_node" webkit_web_hit_test_result_get_js_node :: 
    Ptr WebHitTestResult ->                 -- web_hit_test_result : TInterface (Name {namespace = "WebKitWebProcessExtension", name = "WebHitTestResult"})
    Ptr WebKitWebProcessExtension.ScriptWorld.ScriptWorld -> -- world : TInterface (Name {namespace = "WebKitWebProcessExtension", name = "ScriptWorld"})
    IO (Ptr JavaScriptCore.Value.Value)

-- | Get the t'GI.JavaScriptCore.Objects.Value.Value' for the DOM node in /@world@/ at the coordinates of the Hit Test.
-- 
-- /Since: 2.40/
webHitTestResultGetJsNode ::
    (B.CallStack.HasCallStack, MonadIO m, IsWebHitTestResult a, WebKitWebProcessExtension.ScriptWorld.IsScriptWorld b) =>
    a
    -- ^ /@webHitTestResult@/: a t'GI.WebKitWebProcessExtension.Objects.WebHitTestResult.WebHitTestResult'
    -> Maybe (b)
    -- ^ /@world@/: a t'GI.WebKitWebProcessExtension.Objects.ScriptWorld.ScriptWorld', or 'P.Nothing' to use the default
    -> m (Maybe JavaScriptCore.Value.Value)
    -- ^ __Returns:__ a t'GI.JavaScriptCore.Objects.Value.Value' for the DOM node, or 'P.Nothing'
webHitTestResultGetJsNode :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsWebHitTestResult a, IsScriptWorld b) =>
a -> Maybe b -> m (Maybe Value)
webHitTestResultGetJsNode a
webHitTestResult Maybe b
world = IO (Maybe Value) -> m (Maybe Value)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Value) -> m (Maybe Value))
-> IO (Maybe Value) -> m (Maybe Value)
forall a b. (a -> b) -> a -> b
$ do
    Ptr WebHitTestResult
webHitTestResult' <- a -> IO (Ptr WebHitTestResult)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
webHitTestResult
    Ptr ScriptWorld
maybeWorld <- case Maybe b
world of
        Maybe b
Nothing -> Ptr ScriptWorld -> IO (Ptr ScriptWorld)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr ScriptWorld
forall a. Ptr a
nullPtr
        Just b
jWorld -> do
            Ptr ScriptWorld
jWorld' <- b -> IO (Ptr ScriptWorld)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
jWorld
            Ptr ScriptWorld -> IO (Ptr ScriptWorld)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr ScriptWorld
jWorld'
    Ptr Value
result <- Ptr WebHitTestResult -> Ptr ScriptWorld -> IO (Ptr Value)
webkit_web_hit_test_result_get_js_node Ptr WebHitTestResult
webHitTestResult' Ptr ScriptWorld
maybeWorld
    Maybe Value
maybeResult <- Ptr Value -> (Ptr Value -> IO Value) -> IO (Maybe Value)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull Ptr Value
result ((Ptr Value -> IO Value) -> IO (Maybe Value))
-> (Ptr Value -> IO Value) -> IO (Maybe Value)
forall a b. (a -> b) -> a -> b
$ \Ptr Value
result' -> do
        Value
result'' <- ((ManagedPtr Value -> Value) -> Ptr Value -> IO Value
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
wrapObject ManagedPtr Value -> Value
JavaScriptCore.Value.Value) Ptr Value
result'
        Value -> IO Value
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Value
result''
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
webHitTestResult
    Maybe b -> (b -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe b
world b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
    Maybe Value -> IO (Maybe Value)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Value
maybeResult

#if defined(ENABLE_OVERLOADING)
data WebHitTestResultGetJsNodeMethodInfo
instance (signature ~ (Maybe (b) -> m (Maybe JavaScriptCore.Value.Value)), MonadIO m, IsWebHitTestResult a, WebKitWebProcessExtension.ScriptWorld.IsScriptWorld b) => O.OverloadedMethod WebHitTestResultGetJsNodeMethodInfo a signature where
    overloadedMethod = webHitTestResultGetJsNode

instance O.OverloadedMethodInfo WebHitTestResultGetJsNodeMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.WebKitWebProcessExtension.Objects.WebHitTestResult.webHitTestResultGetJsNode",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkitwebprocessextension-6.0.2/docs/GI-WebKitWebProcessExtension-Objects-WebHitTestResult.html#v:webHitTestResultGetJsNode"
        })


#endif

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

foreign import ccall "webkit_web_hit_test_result_get_link_label" webkit_web_hit_test_result_get_link_label :: 
    Ptr WebHitTestResult ->                 -- web_hit_test_result : TInterface (Name {namespace = "WebKitWebProcessExtension", name = "WebHitTestResult"})
    IO CString

-- | Obtains the label associated with the link element at the hit test position.
webHitTestResultGetLinkLabel ::
    (B.CallStack.HasCallStack, MonadIO m, IsWebHitTestResult a) =>
    a
    -- ^ /@webHitTestResult@/: a @/WebWebKitHitTestResult/@
    -> m T.Text
    -- ^ __Returns:__ the label of the link element, or 'P.Nothing' if the hit test does not cover a link element
    --    or the link element does not have a label.
webHitTestResultGetLinkLabel :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsWebHitTestResult a) =>
a -> m Text
webHitTestResultGetLinkLabel a
webHitTestResult = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
    Ptr WebHitTestResult
webHitTestResult' <- a -> IO (Ptr WebHitTestResult)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
webHitTestResult
    CString
result <- Ptr WebHitTestResult -> IO CString
webkit_web_hit_test_result_get_link_label Ptr WebHitTestResult
webHitTestResult'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"webHitTestResultGetLinkLabel" CString
result
    Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
webHitTestResult
    Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'

#if defined(ENABLE_OVERLOADING)
data WebHitTestResultGetLinkLabelMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsWebHitTestResult a) => O.OverloadedMethod WebHitTestResultGetLinkLabelMethodInfo a signature where
    overloadedMethod = webHitTestResultGetLinkLabel

instance O.OverloadedMethodInfo WebHitTestResultGetLinkLabelMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.WebKitWebProcessExtension.Objects.WebHitTestResult.webHitTestResultGetLinkLabel",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkitwebprocessextension-6.0.2/docs/GI-WebKitWebProcessExtension-Objects-WebHitTestResult.html#v:webHitTestResultGetLinkLabel"
        })


#endif

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

foreign import ccall "webkit_web_hit_test_result_get_link_title" webkit_web_hit_test_result_get_link_title :: 
    Ptr WebHitTestResult ->                 -- web_hit_test_result : TInterface (Name {namespace = "WebKitWebProcessExtension", name = "WebHitTestResult"})
    IO CString

-- | Obtains the title associated with the link element at the hit test position.
webHitTestResultGetLinkTitle ::
    (B.CallStack.HasCallStack, MonadIO m, IsWebHitTestResult a) =>
    a
    -- ^ /@webHitTestResult@/: a @/WebWebKitHitTestResult/@
    -> m T.Text
    -- ^ __Returns:__ the title of the link element, or 'P.Nothing' if the hit test does not cover a link element
    --    or the link element does not have a title.
webHitTestResultGetLinkTitle :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsWebHitTestResult a) =>
a -> m Text
webHitTestResultGetLinkTitle a
webHitTestResult = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
    Ptr WebHitTestResult
webHitTestResult' <- a -> IO (Ptr WebHitTestResult)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
webHitTestResult
    CString
result <- Ptr WebHitTestResult -> IO CString
webkit_web_hit_test_result_get_link_title Ptr WebHitTestResult
webHitTestResult'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"webHitTestResultGetLinkTitle" CString
result
    Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
webHitTestResult
    Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'

#if defined(ENABLE_OVERLOADING)
data WebHitTestResultGetLinkTitleMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsWebHitTestResult a) => O.OverloadedMethod WebHitTestResultGetLinkTitleMethodInfo a signature where
    overloadedMethod = webHitTestResultGetLinkTitle

instance O.OverloadedMethodInfo WebHitTestResultGetLinkTitleMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.WebKitWebProcessExtension.Objects.WebHitTestResult.webHitTestResultGetLinkTitle",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkitwebprocessextension-6.0.2/docs/GI-WebKitWebProcessExtension-Objects-WebHitTestResult.html#v:webHitTestResultGetLinkTitle"
        })


#endif

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

foreign import ccall "webkit_web_hit_test_result_get_link_uri" webkit_web_hit_test_result_get_link_uri :: 
    Ptr WebHitTestResult ->                 -- web_hit_test_result : TInterface (Name {namespace = "WebKitWebProcessExtension", name = "WebHitTestResult"})
    IO CString

-- | Obtains the URI associated with the link element at the hit test position.
webHitTestResultGetLinkUri ::
    (B.CallStack.HasCallStack, MonadIO m, IsWebHitTestResult a) =>
    a
    -- ^ /@webHitTestResult@/: a @/WebWebKitHitTestResult/@
    -> m T.Text
    -- ^ __Returns:__ the URI of the link element, or 'P.Nothing' if the hit test does not cover a link element.
webHitTestResultGetLinkUri :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsWebHitTestResult a) =>
a -> m Text
webHitTestResultGetLinkUri a
webHitTestResult = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
    Ptr WebHitTestResult
webHitTestResult' <- a -> IO (Ptr WebHitTestResult)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
webHitTestResult
    CString
result <- Ptr WebHitTestResult -> IO CString
webkit_web_hit_test_result_get_link_uri Ptr WebHitTestResult
webHitTestResult'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"webHitTestResultGetLinkUri" CString
result
    Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
webHitTestResult
    Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'

#if defined(ENABLE_OVERLOADING)
data WebHitTestResultGetLinkUriMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsWebHitTestResult a) => O.OverloadedMethod WebHitTestResultGetLinkUriMethodInfo a signature where
    overloadedMethod = webHitTestResultGetLinkUri

instance O.OverloadedMethodInfo WebHitTestResultGetLinkUriMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.WebKitWebProcessExtension.Objects.WebHitTestResult.webHitTestResultGetLinkUri",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkitwebprocessextension-6.0.2/docs/GI-WebKitWebProcessExtension-Objects-WebHitTestResult.html#v:webHitTestResultGetLinkUri"
        })


#endif

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

foreign import ccall "webkit_web_hit_test_result_get_media_uri" webkit_web_hit_test_result_get_media_uri :: 
    Ptr WebHitTestResult ->                 -- web_hit_test_result : TInterface (Name {namespace = "WebKitWebProcessExtension", name = "WebHitTestResult"})
    IO CString

-- | Obtains the URI associated with the media element at the hit test position.
webHitTestResultGetMediaUri ::
    (B.CallStack.HasCallStack, MonadIO m, IsWebHitTestResult a) =>
    a
    -- ^ /@webHitTestResult@/: a @/WebWebKitHitTestResult/@
    -> m T.Text
    -- ^ __Returns:__ the URI of the media element, or 'P.Nothing' if the hit test does not cover a media element.
webHitTestResultGetMediaUri :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsWebHitTestResult a) =>
a -> m Text
webHitTestResultGetMediaUri a
webHitTestResult = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
    Ptr WebHitTestResult
webHitTestResult' <- a -> IO (Ptr WebHitTestResult)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
webHitTestResult
    CString
result <- Ptr WebHitTestResult -> IO CString
webkit_web_hit_test_result_get_media_uri Ptr WebHitTestResult
webHitTestResult'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"webHitTestResultGetMediaUri" CString
result
    Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
webHitTestResult
    Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'

#if defined(ENABLE_OVERLOADING)
data WebHitTestResultGetMediaUriMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsWebHitTestResult a) => O.OverloadedMethod WebHitTestResultGetMediaUriMethodInfo a signature where
    overloadedMethod = webHitTestResultGetMediaUri

instance O.OverloadedMethodInfo WebHitTestResultGetMediaUriMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.WebKitWebProcessExtension.Objects.WebHitTestResult.webHitTestResultGetMediaUri",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkitwebprocessextension-6.0.2/docs/GI-WebKitWebProcessExtension-Objects-WebHitTestResult.html#v:webHitTestResultGetMediaUri"
        })


#endif