#define ENABLE_OVERLOADING (MIN_VERSION_haskell_gi_overloading(1,0,0) \
&& !defined(__HADDOCK_VERSION__))
module GI.WebKit2WebExtension.Objects.DOMXPathResult
(
DOMXPathResult(..) ,
IsDOMXPathResult ,
toDOMXPathResult ,
noDOMXPathResult ,
#if ENABLE_OVERLOADING
DOMXPathResultGetBooleanValueMethodInfo ,
#endif
dOMXPathResultGetBooleanValue ,
#if ENABLE_OVERLOADING
DOMXPathResultGetInvalidIteratorStateMethodInfo,
#endif
dOMXPathResultGetInvalidIteratorState ,
#if ENABLE_OVERLOADING
DOMXPathResultGetNumberValueMethodInfo ,
#endif
dOMXPathResultGetNumberValue ,
#if ENABLE_OVERLOADING
DOMXPathResultGetResultTypeMethodInfo ,
#endif
dOMXPathResultGetResultType ,
#if ENABLE_OVERLOADING
DOMXPathResultGetSingleNodeValueMethodInfo,
#endif
dOMXPathResultGetSingleNodeValue ,
#if ENABLE_OVERLOADING
DOMXPathResultGetSnapshotLengthMethodInfo,
#endif
dOMXPathResultGetSnapshotLength ,
#if ENABLE_OVERLOADING
DOMXPathResultGetStringValueMethodInfo ,
#endif
dOMXPathResultGetStringValue ,
#if ENABLE_OVERLOADING
DOMXPathResultIterateNextMethodInfo ,
#endif
dOMXPathResultIterateNext ,
#if ENABLE_OVERLOADING
DOMXPathResultSnapshotItemMethodInfo ,
#endif
dOMXPathResultSnapshotItem ,
#if ENABLE_OVERLOADING
DOMXPathResultBooleanValuePropertyInfo ,
#endif
#if ENABLE_OVERLOADING
dOMXPathResultBooleanValue ,
#endif
getDOMXPathResultBooleanValue ,
#if ENABLE_OVERLOADING
DOMXPathResultInvalidIteratorStatePropertyInfo,
#endif
#if ENABLE_OVERLOADING
dOMXPathResultInvalidIteratorState ,
#endif
getDOMXPathResultInvalidIteratorState ,
#if ENABLE_OVERLOADING
DOMXPathResultNumberValuePropertyInfo ,
#endif
#if ENABLE_OVERLOADING
dOMXPathResultNumberValue ,
#endif
getDOMXPathResultNumberValue ,
#if ENABLE_OVERLOADING
DOMXPathResultResultTypePropertyInfo ,
#endif
#if ENABLE_OVERLOADING
dOMXPathResultResultType ,
#endif
getDOMXPathResultResultType ,
#if ENABLE_OVERLOADING
DOMXPathResultSingleNodeValuePropertyInfo,
#endif
#if ENABLE_OVERLOADING
dOMXPathResultSingleNodeValue ,
#endif
getDOMXPathResultSingleNodeValue ,
#if ENABLE_OVERLOADING
DOMXPathResultSnapshotLengthPropertyInfo,
#endif
#if ENABLE_OVERLOADING
dOMXPathResultSnapshotLength ,
#endif
getDOMXPathResultSnapshotLength ,
#if ENABLE_OVERLOADING
DOMXPathResultStringValuePropertyInfo ,
#endif
#if ENABLE_OVERLOADING
dOMXPathResultStringValue ,
#endif
getDOMXPathResultStringValue ,
) 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.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GI.GObject.Objects.Object as GObject.Object
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMNode as WebKit2WebExtension.DOMNode
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMObject as WebKit2WebExtension.DOMObject
newtype DOMXPathResult = DOMXPathResult (ManagedPtr DOMXPathResult)
foreign import ccall "webkit_dom_xpath_result_get_type"
c_webkit_dom_xpath_result_get_type :: IO GType
instance GObject DOMXPathResult where
gobjectType = c_webkit_dom_xpath_result_get_type
class (GObject o, O.IsDescendantOf DOMXPathResult o) => IsDOMXPathResult o
instance (GObject o, O.IsDescendantOf DOMXPathResult o) => IsDOMXPathResult o
instance O.HasParentTypes DOMXPathResult
type instance O.ParentTypes DOMXPathResult = '[WebKit2WebExtension.DOMObject.DOMObject, GObject.Object.Object]
toDOMXPathResult :: (MonadIO m, IsDOMXPathResult o) => o -> m DOMXPathResult
toDOMXPathResult = liftIO . unsafeCastTo DOMXPathResult
noDOMXPathResult :: Maybe DOMXPathResult
noDOMXPathResult = Nothing
#if ENABLE_OVERLOADING
type family ResolveDOMXPathResultMethod (t :: Symbol) (o :: *) :: * where
ResolveDOMXPathResultMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveDOMXPathResultMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveDOMXPathResultMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveDOMXPathResultMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveDOMXPathResultMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveDOMXPathResultMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveDOMXPathResultMethod "iterateNext" o = DOMXPathResultIterateNextMethodInfo
ResolveDOMXPathResultMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveDOMXPathResultMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveDOMXPathResultMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveDOMXPathResultMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveDOMXPathResultMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveDOMXPathResultMethod "snapshotItem" o = DOMXPathResultSnapshotItemMethodInfo
ResolveDOMXPathResultMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveDOMXPathResultMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveDOMXPathResultMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveDOMXPathResultMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveDOMXPathResultMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveDOMXPathResultMethod "getBooleanValue" o = DOMXPathResultGetBooleanValueMethodInfo
ResolveDOMXPathResultMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveDOMXPathResultMethod "getInvalidIteratorState" o = DOMXPathResultGetInvalidIteratorStateMethodInfo
ResolveDOMXPathResultMethod "getNumberValue" o = DOMXPathResultGetNumberValueMethodInfo
ResolveDOMXPathResultMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveDOMXPathResultMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveDOMXPathResultMethod "getResultType" o = DOMXPathResultGetResultTypeMethodInfo
ResolveDOMXPathResultMethod "getSingleNodeValue" o = DOMXPathResultGetSingleNodeValueMethodInfo
ResolveDOMXPathResultMethod "getSnapshotLength" o = DOMXPathResultGetSnapshotLengthMethodInfo
ResolveDOMXPathResultMethod "getStringValue" o = DOMXPathResultGetStringValueMethodInfo
ResolveDOMXPathResultMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveDOMXPathResultMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveDOMXPathResultMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveDOMXPathResultMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveDOMXPathResultMethod t DOMXPathResult, O.MethodInfo info DOMXPathResult p) => OL.IsLabel t (DOMXPathResult -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#else
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
#endif
getDOMXPathResultBooleanValue :: (MonadIO m, IsDOMXPathResult o) => o -> m Bool
getDOMXPathResultBooleanValue obj = liftIO $ B.Properties.getObjectPropertyBool obj "boolean-value"
#if ENABLE_OVERLOADING
data DOMXPathResultBooleanValuePropertyInfo
instance AttrInfo DOMXPathResultBooleanValuePropertyInfo where
type AttrAllowedOps DOMXPathResultBooleanValuePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMXPathResultBooleanValuePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMXPathResultBooleanValuePropertyInfo = IsDOMXPathResult
type AttrGetType DOMXPathResultBooleanValuePropertyInfo = Bool
type AttrLabel DOMXPathResultBooleanValuePropertyInfo = "boolean-value"
type AttrOrigin DOMXPathResultBooleanValuePropertyInfo = DOMXPathResult
attrGet _ = getDOMXPathResultBooleanValue
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
getDOMXPathResultInvalidIteratorState :: (MonadIO m, IsDOMXPathResult o) => o -> m Bool
getDOMXPathResultInvalidIteratorState obj = liftIO $ B.Properties.getObjectPropertyBool obj "invalid-iterator-state"
#if ENABLE_OVERLOADING
data DOMXPathResultInvalidIteratorStatePropertyInfo
instance AttrInfo DOMXPathResultInvalidIteratorStatePropertyInfo where
type AttrAllowedOps DOMXPathResultInvalidIteratorStatePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMXPathResultInvalidIteratorStatePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMXPathResultInvalidIteratorStatePropertyInfo = IsDOMXPathResult
type AttrGetType DOMXPathResultInvalidIteratorStatePropertyInfo = Bool
type AttrLabel DOMXPathResultInvalidIteratorStatePropertyInfo = "invalid-iterator-state"
type AttrOrigin DOMXPathResultInvalidIteratorStatePropertyInfo = DOMXPathResult
attrGet _ = getDOMXPathResultInvalidIteratorState
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
getDOMXPathResultNumberValue :: (MonadIO m, IsDOMXPathResult o) => o -> m Double
getDOMXPathResultNumberValue obj = liftIO $ B.Properties.getObjectPropertyDouble obj "number-value"
#if ENABLE_OVERLOADING
data DOMXPathResultNumberValuePropertyInfo
instance AttrInfo DOMXPathResultNumberValuePropertyInfo where
type AttrAllowedOps DOMXPathResultNumberValuePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMXPathResultNumberValuePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMXPathResultNumberValuePropertyInfo = IsDOMXPathResult
type AttrGetType DOMXPathResultNumberValuePropertyInfo = Double
type AttrLabel DOMXPathResultNumberValuePropertyInfo = "number-value"
type AttrOrigin DOMXPathResultNumberValuePropertyInfo = DOMXPathResult
attrGet _ = getDOMXPathResultNumberValue
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
getDOMXPathResultResultType :: (MonadIO m, IsDOMXPathResult o) => o -> m Word32
getDOMXPathResultResultType obj = liftIO $ B.Properties.getObjectPropertyUInt32 obj "result-type"
#if ENABLE_OVERLOADING
data DOMXPathResultResultTypePropertyInfo
instance AttrInfo DOMXPathResultResultTypePropertyInfo where
type AttrAllowedOps DOMXPathResultResultTypePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMXPathResultResultTypePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMXPathResultResultTypePropertyInfo = IsDOMXPathResult
type AttrGetType DOMXPathResultResultTypePropertyInfo = Word32
type AttrLabel DOMXPathResultResultTypePropertyInfo = "result-type"
type AttrOrigin DOMXPathResultResultTypePropertyInfo = DOMXPathResult
attrGet _ = getDOMXPathResultResultType
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
getDOMXPathResultSingleNodeValue :: (MonadIO m, IsDOMXPathResult o) => o -> m (Maybe WebKit2WebExtension.DOMNode.DOMNode)
getDOMXPathResultSingleNodeValue obj = liftIO $ B.Properties.getObjectPropertyObject obj "single-node-value" WebKit2WebExtension.DOMNode.DOMNode
#if ENABLE_OVERLOADING
data DOMXPathResultSingleNodeValuePropertyInfo
instance AttrInfo DOMXPathResultSingleNodeValuePropertyInfo where
type AttrAllowedOps DOMXPathResultSingleNodeValuePropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMXPathResultSingleNodeValuePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMXPathResultSingleNodeValuePropertyInfo = IsDOMXPathResult
type AttrGetType DOMXPathResultSingleNodeValuePropertyInfo = (Maybe WebKit2WebExtension.DOMNode.DOMNode)
type AttrLabel DOMXPathResultSingleNodeValuePropertyInfo = "single-node-value"
type AttrOrigin DOMXPathResultSingleNodeValuePropertyInfo = DOMXPathResult
attrGet _ = getDOMXPathResultSingleNodeValue
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
getDOMXPathResultSnapshotLength :: (MonadIO m, IsDOMXPathResult o) => o -> m CULong
getDOMXPathResultSnapshotLength obj = liftIO $ B.Properties.getObjectPropertyULong obj "snapshot-length"
#if ENABLE_OVERLOADING
data DOMXPathResultSnapshotLengthPropertyInfo
instance AttrInfo DOMXPathResultSnapshotLengthPropertyInfo where
type AttrAllowedOps DOMXPathResultSnapshotLengthPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMXPathResultSnapshotLengthPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMXPathResultSnapshotLengthPropertyInfo = IsDOMXPathResult
type AttrGetType DOMXPathResultSnapshotLengthPropertyInfo = CULong
type AttrLabel DOMXPathResultSnapshotLengthPropertyInfo = "snapshot-length"
type AttrOrigin DOMXPathResultSnapshotLengthPropertyInfo = DOMXPathResult
attrGet _ = getDOMXPathResultSnapshotLength
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
getDOMXPathResultStringValue :: (MonadIO m, IsDOMXPathResult o) => o -> m (Maybe T.Text)
getDOMXPathResultStringValue obj = liftIO $ B.Properties.getObjectPropertyString obj "string-value"
#if ENABLE_OVERLOADING
data DOMXPathResultStringValuePropertyInfo
instance AttrInfo DOMXPathResultStringValuePropertyInfo where
type AttrAllowedOps DOMXPathResultStringValuePropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMXPathResultStringValuePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMXPathResultStringValuePropertyInfo = IsDOMXPathResult
type AttrGetType DOMXPathResultStringValuePropertyInfo = (Maybe T.Text)
type AttrLabel DOMXPathResultStringValuePropertyInfo = "string-value"
type AttrOrigin DOMXPathResultStringValuePropertyInfo = DOMXPathResult
attrGet _ = getDOMXPathResultStringValue
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
#if ENABLE_OVERLOADING
instance O.HasAttributeList DOMXPathResult
type instance O.AttributeList DOMXPathResult = DOMXPathResultAttributeList
type DOMXPathResultAttributeList = ('[ '("booleanValue", DOMXPathResultBooleanValuePropertyInfo), '("coreObject", WebKit2WebExtension.DOMObject.DOMObjectCoreObjectPropertyInfo), '("invalidIteratorState", DOMXPathResultInvalidIteratorStatePropertyInfo), '("numberValue", DOMXPathResultNumberValuePropertyInfo), '("resultType", DOMXPathResultResultTypePropertyInfo), '("singleNodeValue", DOMXPathResultSingleNodeValuePropertyInfo), '("snapshotLength", DOMXPathResultSnapshotLengthPropertyInfo), '("stringValue", DOMXPathResultStringValuePropertyInfo)] :: [(Symbol, *)])
#endif
#if ENABLE_OVERLOADING
dOMXPathResultBooleanValue :: AttrLabelProxy "booleanValue"
dOMXPathResultBooleanValue = AttrLabelProxy
dOMXPathResultInvalidIteratorState :: AttrLabelProxy "invalidIteratorState"
dOMXPathResultInvalidIteratorState = AttrLabelProxy
dOMXPathResultNumberValue :: AttrLabelProxy "numberValue"
dOMXPathResultNumberValue = AttrLabelProxy
dOMXPathResultResultType :: AttrLabelProxy "resultType"
dOMXPathResultResultType = AttrLabelProxy
dOMXPathResultSingleNodeValue :: AttrLabelProxy "singleNodeValue"
dOMXPathResultSingleNodeValue = AttrLabelProxy
dOMXPathResultSnapshotLength :: AttrLabelProxy "snapshotLength"
dOMXPathResultSnapshotLength = AttrLabelProxy
dOMXPathResultStringValue :: AttrLabelProxy "stringValue"
dOMXPathResultStringValue = AttrLabelProxy
#endif
#if ENABLE_OVERLOADING
type instance O.SignalList DOMXPathResult = DOMXPathResultSignalList
type DOMXPathResultSignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "webkit_dom_xpath_result_get_boolean_value" webkit_dom_xpath_result_get_boolean_value ::
Ptr DOMXPathResult ->
Ptr (Ptr GError) ->
IO CInt
{-# DEPRECATED dOMXPathResultGetBooleanValue ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMXPathResultGetBooleanValue ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMXPathResult a) =>
a
-> m ()
dOMXPathResultGetBooleanValue self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
onException (do
_ <- propagateGError $ webkit_dom_xpath_result_get_boolean_value self'
touchManagedPtr self
return ()
) (do
return ()
)
#if ENABLE_OVERLOADING
data DOMXPathResultGetBooleanValueMethodInfo
instance (signature ~ (m ()), MonadIO m, IsDOMXPathResult a) => O.MethodInfo DOMXPathResultGetBooleanValueMethodInfo a signature where
overloadedMethod _ = dOMXPathResultGetBooleanValue
#endif
foreign import ccall "webkit_dom_xpath_result_get_invalid_iterator_state" webkit_dom_xpath_result_get_invalid_iterator_state ::
Ptr DOMXPathResult ->
IO CInt
{-# DEPRECATED dOMXPathResultGetInvalidIteratorState ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMXPathResultGetInvalidIteratorState ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMXPathResult a) =>
a
-> m Bool
dOMXPathResultGetInvalidIteratorState self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_xpath_result_get_invalid_iterator_state self'
let result' = (/= 0) result
touchManagedPtr self
return result'
#if ENABLE_OVERLOADING
data DOMXPathResultGetInvalidIteratorStateMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMXPathResult a) => O.MethodInfo DOMXPathResultGetInvalidIteratorStateMethodInfo a signature where
overloadedMethod _ = dOMXPathResultGetInvalidIteratorState
#endif
foreign import ccall "webkit_dom_xpath_result_get_number_value" webkit_dom_xpath_result_get_number_value ::
Ptr DOMXPathResult ->
Ptr (Ptr GError) ->
IO CDouble
{-# DEPRECATED dOMXPathResultGetNumberValue ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMXPathResultGetNumberValue ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMXPathResult a) =>
a
-> m Double
dOMXPathResultGetNumberValue self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
onException (do
result <- propagateGError $ webkit_dom_xpath_result_get_number_value self'
let result' = realToFrac result
touchManagedPtr self
return result'
) (do
return ()
)
#if ENABLE_OVERLOADING
data DOMXPathResultGetNumberValueMethodInfo
instance (signature ~ (m Double), MonadIO m, IsDOMXPathResult a) => O.MethodInfo DOMXPathResultGetNumberValueMethodInfo a signature where
overloadedMethod _ = dOMXPathResultGetNumberValue
#endif
foreign import ccall "webkit_dom_xpath_result_get_result_type" webkit_dom_xpath_result_get_result_type ::
Ptr DOMXPathResult ->
IO Word16
{-# DEPRECATED dOMXPathResultGetResultType ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMXPathResultGetResultType ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMXPathResult a) =>
a
-> m Word16
dOMXPathResultGetResultType self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_xpath_result_get_result_type self'
touchManagedPtr self
return result
#if ENABLE_OVERLOADING
data DOMXPathResultGetResultTypeMethodInfo
instance (signature ~ (m Word16), MonadIO m, IsDOMXPathResult a) => O.MethodInfo DOMXPathResultGetResultTypeMethodInfo a signature where
overloadedMethod _ = dOMXPathResultGetResultType
#endif
foreign import ccall "webkit_dom_xpath_result_get_single_node_value" webkit_dom_xpath_result_get_single_node_value ::
Ptr DOMXPathResult ->
Ptr (Ptr GError) ->
IO (Ptr WebKit2WebExtension.DOMNode.DOMNode)
{-# DEPRECATED dOMXPathResultGetSingleNodeValue ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMXPathResultGetSingleNodeValue ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMXPathResult a) =>
a
-> m WebKit2WebExtension.DOMNode.DOMNode
dOMXPathResultGetSingleNodeValue self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
onException (do
result <- propagateGError $ webkit_dom_xpath_result_get_single_node_value self'
checkUnexpectedReturnNULL "dOMXPathResultGetSingleNodeValue" result
result' <- (newObject WebKit2WebExtension.DOMNode.DOMNode) result
touchManagedPtr self
return result'
) (do
return ()
)
#if ENABLE_OVERLOADING
data DOMXPathResultGetSingleNodeValueMethodInfo
instance (signature ~ (m WebKit2WebExtension.DOMNode.DOMNode), MonadIO m, IsDOMXPathResult a) => O.MethodInfo DOMXPathResultGetSingleNodeValueMethodInfo a signature where
overloadedMethod _ = dOMXPathResultGetSingleNodeValue
#endif
foreign import ccall "webkit_dom_xpath_result_get_snapshot_length" webkit_dom_xpath_result_get_snapshot_length ::
Ptr DOMXPathResult ->
Ptr (Ptr GError) ->
IO CULong
{-# DEPRECATED dOMXPathResultGetSnapshotLength ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMXPathResultGetSnapshotLength ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMXPathResult a) =>
a
-> m CULong
dOMXPathResultGetSnapshotLength self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
onException (do
result <- propagateGError $ webkit_dom_xpath_result_get_snapshot_length self'
touchManagedPtr self
return result
) (do
return ()
)
#if ENABLE_OVERLOADING
data DOMXPathResultGetSnapshotLengthMethodInfo
instance (signature ~ (m CULong), MonadIO m, IsDOMXPathResult a) => O.MethodInfo DOMXPathResultGetSnapshotLengthMethodInfo a signature where
overloadedMethod _ = dOMXPathResultGetSnapshotLength
#endif
foreign import ccall "webkit_dom_xpath_result_get_string_value" webkit_dom_xpath_result_get_string_value ::
Ptr DOMXPathResult ->
Ptr (Ptr GError) ->
IO CString
{-# DEPRECATED dOMXPathResultGetStringValue ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMXPathResultGetStringValue ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMXPathResult a) =>
a
-> m T.Text
dOMXPathResultGetStringValue self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
onException (do
result <- propagateGError $ webkit_dom_xpath_result_get_string_value self'
checkUnexpectedReturnNULL "dOMXPathResultGetStringValue" result
result' <- cstringToText result
freeMem result
touchManagedPtr self
return result'
) (do
return ()
)
#if ENABLE_OVERLOADING
data DOMXPathResultGetStringValueMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMXPathResult a) => O.MethodInfo DOMXPathResultGetStringValueMethodInfo a signature where
overloadedMethod _ = dOMXPathResultGetStringValue
#endif
foreign import ccall "webkit_dom_xpath_result_iterate_next" webkit_dom_xpath_result_iterate_next ::
Ptr DOMXPathResult ->
Ptr (Ptr GError) ->
IO (Ptr WebKit2WebExtension.DOMNode.DOMNode)
{-# DEPRECATED dOMXPathResultIterateNext ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMXPathResultIterateNext ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMXPathResult a) =>
a
-> m WebKit2WebExtension.DOMNode.DOMNode
dOMXPathResultIterateNext self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
onException (do
result <- propagateGError $ webkit_dom_xpath_result_iterate_next self'
checkUnexpectedReturnNULL "dOMXPathResultIterateNext" result
result' <- (newObject WebKit2WebExtension.DOMNode.DOMNode) result
touchManagedPtr self
return result'
) (do
return ()
)
#if ENABLE_OVERLOADING
data DOMXPathResultIterateNextMethodInfo
instance (signature ~ (m WebKit2WebExtension.DOMNode.DOMNode), MonadIO m, IsDOMXPathResult a) => O.MethodInfo DOMXPathResultIterateNextMethodInfo a signature where
overloadedMethod _ = dOMXPathResultIterateNext
#endif
foreign import ccall "webkit_dom_xpath_result_snapshot_item" webkit_dom_xpath_result_snapshot_item ::
Ptr DOMXPathResult ->
CULong ->
Ptr (Ptr GError) ->
IO (Ptr WebKit2WebExtension.DOMNode.DOMNode)
{-# DEPRECATED dOMXPathResultSnapshotItem ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMXPathResultSnapshotItem ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMXPathResult a) =>
a
-> CULong
-> m WebKit2WebExtension.DOMNode.DOMNode
dOMXPathResultSnapshotItem self index = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
onException (do
result <- propagateGError $ webkit_dom_xpath_result_snapshot_item self' index
checkUnexpectedReturnNULL "dOMXPathResultSnapshotItem" result
result' <- (newObject WebKit2WebExtension.DOMNode.DOMNode) result
touchManagedPtr self
return result'
) (do
return ()
)
#if ENABLE_OVERLOADING
data DOMXPathResultSnapshotItemMethodInfo
instance (signature ~ (CULong -> m WebKit2WebExtension.DOMNode.DOMNode), MonadIO m, IsDOMXPathResult a) => O.MethodInfo DOMXPathResultSnapshotItemMethodInfo a signature where
overloadedMethod _ = dOMXPathResultSnapshotItem
#endif