module GI.WebKit2WebExtension.Objects.DOMNodeIterator
(
DOMNodeIterator(..) ,
IsDOMNodeIterator ,
toDOMNodeIterator ,
noDOMNodeIterator ,
DOMNodeIteratorDetachMethodInfo ,
dOMNodeIteratorDetach ,
DOMNodeIteratorGetExpandEntityReferencesMethodInfo,
dOMNodeIteratorGetExpandEntityReferences,
DOMNodeIteratorGetFilterMethodInfo ,
dOMNodeIteratorGetFilter ,
DOMNodeIteratorGetPointerBeforeReferenceNodeMethodInfo,
dOMNodeIteratorGetPointerBeforeReferenceNode,
DOMNodeIteratorGetReferenceNodeMethodInfo,
dOMNodeIteratorGetReferenceNode ,
DOMNodeIteratorGetRootMethodInfo ,
dOMNodeIteratorGetRoot ,
DOMNodeIteratorGetWhatToShowMethodInfo ,
dOMNodeIteratorGetWhatToShow ,
DOMNodeIteratorNextNodeMethodInfo ,
dOMNodeIteratorNextNode ,
DOMNodeIteratorPreviousNodeMethodInfo ,
dOMNodeIteratorPreviousNode ,
DOMNodeIteratorFilterPropertyInfo ,
dOMNodeIteratorFilter ,
getDOMNodeIteratorFilter ,
DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo,
dOMNodeIteratorPointerBeforeReferenceNode,
getDOMNodeIteratorPointerBeforeReferenceNode,
DOMNodeIteratorReferenceNodePropertyInfo,
dOMNodeIteratorReferenceNode ,
getDOMNodeIteratorReferenceNode ,
DOMNodeIteratorRootPropertyInfo ,
dOMNodeIteratorRoot ,
getDOMNodeIteratorRoot ,
DOMNodeIteratorWhatToShowPropertyInfo ,
dOMNodeIteratorWhatToShow ,
getDOMNodeIteratorWhatToShow ,
) 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.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
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 GI.GObject.Objects.Object as GObject.Object
import qualified GI.WebKit2WebExtension.Interfaces.DOMNodeFilter as WebKit2WebExtension.DOMNodeFilter
import qualified GI.WebKit2WebExtension.Objects.DOMNode as WebKit2WebExtension.DOMNode
import qualified GI.WebKit2WebExtension.Objects.DOMObject as WebKit2WebExtension.DOMObject
newtype DOMNodeIterator = DOMNodeIterator (ManagedPtr DOMNodeIterator)
foreign import ccall "webkit_dom_node_iterator_get_type"
c_webkit_dom_node_iterator_get_type :: IO GType
instance GObject DOMNodeIterator where
gobjectType _ = c_webkit_dom_node_iterator_get_type
class GObject o => IsDOMNodeIterator o
#if MIN_VERSION_base(4,9,0)
instance (GObject a, O.UnknownAncestorError DOMNodeIterator a) =>
IsDOMNodeIterator a
#endif
instance IsDOMNodeIterator DOMNodeIterator
instance WebKit2WebExtension.DOMObject.IsDOMObject DOMNodeIterator
instance GObject.Object.IsObject DOMNodeIterator
toDOMNodeIterator :: IsDOMNodeIterator o => o -> IO DOMNodeIterator
toDOMNodeIterator = unsafeCastTo DOMNodeIterator
noDOMNodeIterator :: Maybe DOMNodeIterator
noDOMNodeIterator = Nothing
type family ResolveDOMNodeIteratorMethod (t :: Symbol) (o :: *) :: * where
ResolveDOMNodeIteratorMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveDOMNodeIteratorMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveDOMNodeIteratorMethod "detach" o = DOMNodeIteratorDetachMethodInfo
ResolveDOMNodeIteratorMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveDOMNodeIteratorMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveDOMNodeIteratorMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveDOMNodeIteratorMethod "nextNode" o = DOMNodeIteratorNextNodeMethodInfo
ResolveDOMNodeIteratorMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveDOMNodeIteratorMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveDOMNodeIteratorMethod "previousNode" o = DOMNodeIteratorPreviousNodeMethodInfo
ResolveDOMNodeIteratorMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveDOMNodeIteratorMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveDOMNodeIteratorMethod "replaceData" o = GObject.Object.ObjectReplaceDataMethodInfo
ResolveDOMNodeIteratorMethod "replaceQdata" o = GObject.Object.ObjectReplaceQdataMethodInfo
ResolveDOMNodeIteratorMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveDOMNodeIteratorMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveDOMNodeIteratorMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveDOMNodeIteratorMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveDOMNodeIteratorMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveDOMNodeIteratorMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveDOMNodeIteratorMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveDOMNodeIteratorMethod "getExpandEntityReferences" o = DOMNodeIteratorGetExpandEntityReferencesMethodInfo
ResolveDOMNodeIteratorMethod "getFilter" o = DOMNodeIteratorGetFilterMethodInfo
ResolveDOMNodeIteratorMethod "getPointerBeforeReferenceNode" o = DOMNodeIteratorGetPointerBeforeReferenceNodeMethodInfo
ResolveDOMNodeIteratorMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveDOMNodeIteratorMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveDOMNodeIteratorMethod "getReferenceNode" o = DOMNodeIteratorGetReferenceNodeMethodInfo
ResolveDOMNodeIteratorMethod "getRoot" o = DOMNodeIteratorGetRootMethodInfo
ResolveDOMNodeIteratorMethod "getWhatToShow" o = DOMNodeIteratorGetWhatToShowMethodInfo
ResolveDOMNodeIteratorMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveDOMNodeIteratorMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveDOMNodeIteratorMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveDOMNodeIteratorMethod t DOMNodeIterator, O.MethodInfo info DOMNodeIterator p) => O.IsLabelProxy t (DOMNodeIterator -> p) where
fromLabelProxy _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#if MIN_VERSION_base(4,9,0)
instance (info ~ ResolveDOMNodeIteratorMethod t DOMNodeIterator, O.MethodInfo info DOMNodeIterator p) => O.IsLabel t (DOMNodeIterator -> p) where
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
getDOMNodeIteratorFilter :: (MonadIO m, IsDOMNodeIterator o) => o -> m (Maybe WebKit2WebExtension.DOMNodeFilter.DOMNodeFilter)
getDOMNodeIteratorFilter obj = liftIO $ getObjectPropertyObject obj "filter" WebKit2WebExtension.DOMNodeFilter.DOMNodeFilter
data DOMNodeIteratorFilterPropertyInfo
instance AttrInfo DOMNodeIteratorFilterPropertyInfo where
type AttrAllowedOps DOMNodeIteratorFilterPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMNodeIteratorFilterPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMNodeIteratorFilterPropertyInfo = IsDOMNodeIterator
type AttrGetType DOMNodeIteratorFilterPropertyInfo = (Maybe WebKit2WebExtension.DOMNodeFilter.DOMNodeFilter)
type AttrLabel DOMNodeIteratorFilterPropertyInfo = "filter"
type AttrOrigin DOMNodeIteratorFilterPropertyInfo = DOMNodeIterator
attrGet _ = getDOMNodeIteratorFilter
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMNodeIteratorPointerBeforeReferenceNode :: (MonadIO m, IsDOMNodeIterator o) => o -> m Bool
getDOMNodeIteratorPointerBeforeReferenceNode obj = liftIO $ getObjectPropertyBool obj "pointer-before-reference-node"
data DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo
instance AttrInfo DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo where
type AttrAllowedOps DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo = IsDOMNodeIterator
type AttrGetType DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo = Bool
type AttrLabel DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo = "pointer-before-reference-node"
type AttrOrigin DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo = DOMNodeIterator
attrGet _ = getDOMNodeIteratorPointerBeforeReferenceNode
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMNodeIteratorReferenceNode :: (MonadIO m, IsDOMNodeIterator o) => o -> m WebKit2WebExtension.DOMNode.DOMNode
getDOMNodeIteratorReferenceNode obj = liftIO $ checkUnexpectedNothing "getDOMNodeIteratorReferenceNode" $ getObjectPropertyObject obj "reference-node" WebKit2WebExtension.DOMNode.DOMNode
data DOMNodeIteratorReferenceNodePropertyInfo
instance AttrInfo DOMNodeIteratorReferenceNodePropertyInfo where
type AttrAllowedOps DOMNodeIteratorReferenceNodePropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMNodeIteratorReferenceNodePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMNodeIteratorReferenceNodePropertyInfo = IsDOMNodeIterator
type AttrGetType DOMNodeIteratorReferenceNodePropertyInfo = WebKit2WebExtension.DOMNode.DOMNode
type AttrLabel DOMNodeIteratorReferenceNodePropertyInfo = "reference-node"
type AttrOrigin DOMNodeIteratorReferenceNodePropertyInfo = DOMNodeIterator
attrGet _ = getDOMNodeIteratorReferenceNode
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMNodeIteratorRoot :: (MonadIO m, IsDOMNodeIterator o) => o -> m WebKit2WebExtension.DOMNode.DOMNode
getDOMNodeIteratorRoot obj = liftIO $ checkUnexpectedNothing "getDOMNodeIteratorRoot" $ getObjectPropertyObject obj "root" WebKit2WebExtension.DOMNode.DOMNode
data DOMNodeIteratorRootPropertyInfo
instance AttrInfo DOMNodeIteratorRootPropertyInfo where
type AttrAllowedOps DOMNodeIteratorRootPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMNodeIteratorRootPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMNodeIteratorRootPropertyInfo = IsDOMNodeIterator
type AttrGetType DOMNodeIteratorRootPropertyInfo = WebKit2WebExtension.DOMNode.DOMNode
type AttrLabel DOMNodeIteratorRootPropertyInfo = "root"
type AttrOrigin DOMNodeIteratorRootPropertyInfo = DOMNodeIterator
attrGet _ = getDOMNodeIteratorRoot
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMNodeIteratorWhatToShow :: (MonadIO m, IsDOMNodeIterator o) => o -> m CULong
getDOMNodeIteratorWhatToShow obj = liftIO $ getObjectPropertyULong obj "what-to-show"
data DOMNodeIteratorWhatToShowPropertyInfo
instance AttrInfo DOMNodeIteratorWhatToShowPropertyInfo where
type AttrAllowedOps DOMNodeIteratorWhatToShowPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMNodeIteratorWhatToShowPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMNodeIteratorWhatToShowPropertyInfo = IsDOMNodeIterator
type AttrGetType DOMNodeIteratorWhatToShowPropertyInfo = CULong
type AttrLabel DOMNodeIteratorWhatToShowPropertyInfo = "what-to-show"
type AttrOrigin DOMNodeIteratorWhatToShowPropertyInfo = DOMNodeIterator
attrGet _ = getDOMNodeIteratorWhatToShow
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
instance O.HasAttributeList DOMNodeIterator
type instance O.AttributeList DOMNodeIterator = DOMNodeIteratorAttributeList
type DOMNodeIteratorAttributeList = ('[ '("coreObject", WebKit2WebExtension.DOMObject.DOMObjectCoreObjectPropertyInfo), '("filter", DOMNodeIteratorFilterPropertyInfo), '("pointerBeforeReferenceNode", DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo), '("referenceNode", DOMNodeIteratorReferenceNodePropertyInfo), '("root", DOMNodeIteratorRootPropertyInfo), '("whatToShow", DOMNodeIteratorWhatToShowPropertyInfo)] :: [(Symbol, *)])
dOMNodeIteratorFilter :: AttrLabelProxy "filter"
dOMNodeIteratorFilter = AttrLabelProxy
dOMNodeIteratorPointerBeforeReferenceNode :: AttrLabelProxy "pointerBeforeReferenceNode"
dOMNodeIteratorPointerBeforeReferenceNode = AttrLabelProxy
dOMNodeIteratorReferenceNode :: AttrLabelProxy "referenceNode"
dOMNodeIteratorReferenceNode = AttrLabelProxy
dOMNodeIteratorRoot :: AttrLabelProxy "root"
dOMNodeIteratorRoot = AttrLabelProxy
dOMNodeIteratorWhatToShow :: AttrLabelProxy "whatToShow"
dOMNodeIteratorWhatToShow = AttrLabelProxy
type instance O.SignalList DOMNodeIterator = DOMNodeIteratorSignalList
type DOMNodeIteratorSignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
foreign import ccall "webkit_dom_node_iterator_detach" webkit_dom_node_iterator_detach ::
Ptr DOMNodeIterator ->
IO ()
dOMNodeIteratorDetach ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMNodeIterator a) =>
a
-> m ()
dOMNodeIteratorDetach self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
webkit_dom_node_iterator_detach self'
touchManagedPtr self
return ()
data DOMNodeIteratorDetachMethodInfo
instance (signature ~ (m ()), MonadIO m, IsDOMNodeIterator a) => O.MethodInfo DOMNodeIteratorDetachMethodInfo a signature where
overloadedMethod _ = dOMNodeIteratorDetach
foreign import ccall "webkit_dom_node_iterator_get_expand_entity_references" webkit_dom_node_iterator_get_expand_entity_references ::
Ptr DOMNodeIterator ->
IO CInt
dOMNodeIteratorGetExpandEntityReferences ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMNodeIterator a) =>
a
-> m Bool
dOMNodeIteratorGetExpandEntityReferences self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_node_iterator_get_expand_entity_references self'
let result' = (/= 0) result
touchManagedPtr self
return result'
data DOMNodeIteratorGetExpandEntityReferencesMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMNodeIterator a) => O.MethodInfo DOMNodeIteratorGetExpandEntityReferencesMethodInfo a signature where
overloadedMethod _ = dOMNodeIteratorGetExpandEntityReferences
foreign import ccall "webkit_dom_node_iterator_get_filter" webkit_dom_node_iterator_get_filter ::
Ptr DOMNodeIterator ->
IO (Ptr WebKit2WebExtension.DOMNodeFilter.DOMNodeFilter)
dOMNodeIteratorGetFilter ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMNodeIterator a) =>
a
-> m WebKit2WebExtension.DOMNodeFilter.DOMNodeFilter
dOMNodeIteratorGetFilter self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_node_iterator_get_filter self'
checkUnexpectedReturnNULL "dOMNodeIteratorGetFilter" result
result' <- (wrapObject WebKit2WebExtension.DOMNodeFilter.DOMNodeFilter) result
touchManagedPtr self
return result'
data DOMNodeIteratorGetFilterMethodInfo
instance (signature ~ (m WebKit2WebExtension.DOMNodeFilter.DOMNodeFilter), MonadIO m, IsDOMNodeIterator a) => O.MethodInfo DOMNodeIteratorGetFilterMethodInfo a signature where
overloadedMethod _ = dOMNodeIteratorGetFilter
foreign import ccall "webkit_dom_node_iterator_get_pointer_before_reference_node" webkit_dom_node_iterator_get_pointer_before_reference_node ::
Ptr DOMNodeIterator ->
IO CInt
dOMNodeIteratorGetPointerBeforeReferenceNode ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMNodeIterator a) =>
a
-> m Bool
dOMNodeIteratorGetPointerBeforeReferenceNode self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_node_iterator_get_pointer_before_reference_node self'
let result' = (/= 0) result
touchManagedPtr self
return result'
data DOMNodeIteratorGetPointerBeforeReferenceNodeMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMNodeIterator a) => O.MethodInfo DOMNodeIteratorGetPointerBeforeReferenceNodeMethodInfo a signature where
overloadedMethod _ = dOMNodeIteratorGetPointerBeforeReferenceNode
foreign import ccall "webkit_dom_node_iterator_get_reference_node" webkit_dom_node_iterator_get_reference_node ::
Ptr DOMNodeIterator ->
IO (Ptr WebKit2WebExtension.DOMNode.DOMNode)
dOMNodeIteratorGetReferenceNode ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMNodeIterator a) =>
a
-> m WebKit2WebExtension.DOMNode.DOMNode
dOMNodeIteratorGetReferenceNode self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_node_iterator_get_reference_node self'
checkUnexpectedReturnNULL "dOMNodeIteratorGetReferenceNode" result
result' <- (newObject WebKit2WebExtension.DOMNode.DOMNode) result
touchManagedPtr self
return result'
data DOMNodeIteratorGetReferenceNodeMethodInfo
instance (signature ~ (m WebKit2WebExtension.DOMNode.DOMNode), MonadIO m, IsDOMNodeIterator a) => O.MethodInfo DOMNodeIteratorGetReferenceNodeMethodInfo a signature where
overloadedMethod _ = dOMNodeIteratorGetReferenceNode
foreign import ccall "webkit_dom_node_iterator_get_root" webkit_dom_node_iterator_get_root ::
Ptr DOMNodeIterator ->
IO (Ptr WebKit2WebExtension.DOMNode.DOMNode)
dOMNodeIteratorGetRoot ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMNodeIterator a) =>
a
-> m WebKit2WebExtension.DOMNode.DOMNode
dOMNodeIteratorGetRoot self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_node_iterator_get_root self'
checkUnexpectedReturnNULL "dOMNodeIteratorGetRoot" result
result' <- (newObject WebKit2WebExtension.DOMNode.DOMNode) result
touchManagedPtr self
return result'
data DOMNodeIteratorGetRootMethodInfo
instance (signature ~ (m WebKit2WebExtension.DOMNode.DOMNode), MonadIO m, IsDOMNodeIterator a) => O.MethodInfo DOMNodeIteratorGetRootMethodInfo a signature where
overloadedMethod _ = dOMNodeIteratorGetRoot
foreign import ccall "webkit_dom_node_iterator_get_what_to_show" webkit_dom_node_iterator_get_what_to_show ::
Ptr DOMNodeIterator ->
IO CULong
dOMNodeIteratorGetWhatToShow ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMNodeIterator a) =>
a
-> m CULong
dOMNodeIteratorGetWhatToShow self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_node_iterator_get_what_to_show self'
touchManagedPtr self
return result
data DOMNodeIteratorGetWhatToShowMethodInfo
instance (signature ~ (m CULong), MonadIO m, IsDOMNodeIterator a) => O.MethodInfo DOMNodeIteratorGetWhatToShowMethodInfo a signature where
overloadedMethod _ = dOMNodeIteratorGetWhatToShow
foreign import ccall "webkit_dom_node_iterator_next_node" webkit_dom_node_iterator_next_node ::
Ptr DOMNodeIterator ->
Ptr (Ptr GError) ->
IO (Ptr WebKit2WebExtension.DOMNode.DOMNode)
dOMNodeIteratorNextNode ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMNodeIterator a) =>
a
-> m WebKit2WebExtension.DOMNode.DOMNode
dOMNodeIteratorNextNode self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
onException (do
result <- propagateGError $ webkit_dom_node_iterator_next_node self'
checkUnexpectedReturnNULL "dOMNodeIteratorNextNode" result
result' <- (newObject WebKit2WebExtension.DOMNode.DOMNode) result
touchManagedPtr self
return result'
) (do
return ()
)
data DOMNodeIteratorNextNodeMethodInfo
instance (signature ~ (m WebKit2WebExtension.DOMNode.DOMNode), MonadIO m, IsDOMNodeIterator a) => O.MethodInfo DOMNodeIteratorNextNodeMethodInfo a signature where
overloadedMethod _ = dOMNodeIteratorNextNode
foreign import ccall "webkit_dom_node_iterator_previous_node" webkit_dom_node_iterator_previous_node ::
Ptr DOMNodeIterator ->
Ptr (Ptr GError) ->
IO (Ptr WebKit2WebExtension.DOMNode.DOMNode)
dOMNodeIteratorPreviousNode ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMNodeIterator a) =>
a
-> m WebKit2WebExtension.DOMNode.DOMNode
dOMNodeIteratorPreviousNode self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
onException (do
result <- propagateGError $ webkit_dom_node_iterator_previous_node self'
checkUnexpectedReturnNULL "dOMNodeIteratorPreviousNode" result
result' <- (newObject WebKit2WebExtension.DOMNode.DOMNode) result
touchManagedPtr self
return result'
) (do
return ()
)
data DOMNodeIteratorPreviousNodeMethodInfo
instance (signature ~ (m WebKit2WebExtension.DOMNode.DOMNode), MonadIO m, IsDOMNodeIterator a) => O.MethodInfo DOMNodeIteratorPreviousNodeMethodInfo a signature where
overloadedMethod _ = dOMNodeIteratorPreviousNode