module GI.WebKit2WebExtension.Objects.DOMXPathExpression
(
DOMXPathExpression(..) ,
IsDOMXPathExpression ,
toDOMXPathExpression ,
noDOMXPathExpression ,
DOMXPathExpressionEvaluateMethodInfo ,
dOMXPathExpressionEvaluate ,
) 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.Objects.DOMNode as WebKit2WebExtension.DOMNode
import qualified GI.WebKit2WebExtension.Objects.DOMObject as WebKit2WebExtension.DOMObject
import qualified GI.WebKit2WebExtension.Objects.DOMXPathResult as WebKit2WebExtension.DOMXPathResult
newtype DOMXPathExpression = DOMXPathExpression (ManagedPtr DOMXPathExpression)
foreign import ccall "webkit_dom_xpath_expression_get_type"
c_webkit_dom_xpath_expression_get_type :: IO GType
instance GObject DOMXPathExpression where
gobjectType _ = c_webkit_dom_xpath_expression_get_type
class GObject o => IsDOMXPathExpression o
#if MIN_VERSION_base(4,9,0)
instance (GObject a, O.UnknownAncestorError DOMXPathExpression a) =>
IsDOMXPathExpression a
#endif
instance IsDOMXPathExpression DOMXPathExpression
instance WebKit2WebExtension.DOMObject.IsDOMObject DOMXPathExpression
instance GObject.Object.IsObject DOMXPathExpression
toDOMXPathExpression :: IsDOMXPathExpression o => o -> IO DOMXPathExpression
toDOMXPathExpression = unsafeCastTo DOMXPathExpression
noDOMXPathExpression :: Maybe DOMXPathExpression
noDOMXPathExpression = Nothing
type family ResolveDOMXPathExpressionMethod (t :: Symbol) (o :: *) :: * where
ResolveDOMXPathExpressionMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveDOMXPathExpressionMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveDOMXPathExpressionMethod "evaluate" o = DOMXPathExpressionEvaluateMethodInfo
ResolveDOMXPathExpressionMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveDOMXPathExpressionMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveDOMXPathExpressionMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveDOMXPathExpressionMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveDOMXPathExpressionMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveDOMXPathExpressionMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveDOMXPathExpressionMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveDOMXPathExpressionMethod "replaceData" o = GObject.Object.ObjectReplaceDataMethodInfo
ResolveDOMXPathExpressionMethod "replaceQdata" o = GObject.Object.ObjectReplaceQdataMethodInfo
ResolveDOMXPathExpressionMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveDOMXPathExpressionMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveDOMXPathExpressionMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveDOMXPathExpressionMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveDOMXPathExpressionMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveDOMXPathExpressionMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveDOMXPathExpressionMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveDOMXPathExpressionMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveDOMXPathExpressionMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveDOMXPathExpressionMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveDOMXPathExpressionMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveDOMXPathExpressionMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveDOMXPathExpressionMethod t DOMXPathExpression, O.MethodInfo info DOMXPathExpression p) => O.IsLabelProxy t (DOMXPathExpression -> p) where
fromLabelProxy _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#if MIN_VERSION_base(4,9,0)
instance (info ~ ResolveDOMXPathExpressionMethod t DOMXPathExpression, O.MethodInfo info DOMXPathExpression p) => O.IsLabel t (DOMXPathExpression -> p) where
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
instance O.HasAttributeList DOMXPathExpression
type instance O.AttributeList DOMXPathExpression = DOMXPathExpressionAttributeList
type DOMXPathExpressionAttributeList = ('[ '("coreObject", WebKit2WebExtension.DOMObject.DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)])
type instance O.SignalList DOMXPathExpression = DOMXPathExpressionSignalList
type DOMXPathExpressionSignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
foreign import ccall "webkit_dom_xpath_expression_evaluate" webkit_dom_xpath_expression_evaluate ::
Ptr DOMXPathExpression ->
Ptr WebKit2WebExtension.DOMNode.DOMNode ->
Word16 ->
Ptr WebKit2WebExtension.DOMXPathResult.DOMXPathResult ->
Ptr (Ptr GError) ->
IO (Ptr WebKit2WebExtension.DOMXPathResult.DOMXPathResult)
dOMXPathExpressionEvaluate ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMXPathExpression a, WebKit2WebExtension.DOMNode.IsDOMNode b, WebKit2WebExtension.DOMXPathResult.IsDOMXPathResult c) =>
a
-> b
-> Word16
-> c
-> m WebKit2WebExtension.DOMXPathResult.DOMXPathResult
dOMXPathExpressionEvaluate self contextNode type_ inResult = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
contextNode' <- unsafeManagedPtrCastPtr contextNode
inResult' <- unsafeManagedPtrCastPtr inResult
onException (do
result <- propagateGError $ webkit_dom_xpath_expression_evaluate self' contextNode' type_ inResult'
checkUnexpectedReturnNULL "dOMXPathExpressionEvaluate" result
result' <- (wrapObject WebKit2WebExtension.DOMXPathResult.DOMXPathResult) result
touchManagedPtr self
touchManagedPtr contextNode
touchManagedPtr inResult
return result'
) (do
return ()
)
data DOMXPathExpressionEvaluateMethodInfo
instance (signature ~ (b -> Word16 -> c -> m WebKit2WebExtension.DOMXPathResult.DOMXPathResult), MonadIO m, IsDOMXPathExpression a, WebKit2WebExtension.DOMNode.IsDOMNode b, WebKit2WebExtension.DOMXPathResult.IsDOMXPathResult c) => O.MethodInfo DOMXPathExpressionEvaluateMethodInfo a signature where
overloadedMethod _ = dOMXPathExpressionEvaluate