XPathEvaluatorBase.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from dom (webref). Do not edit.
module JSDOM.Generated.XPathEvaluatorBase
       (createExpression, createExpression_, createNSResolver, createNSResolver_, evaluate, evaluate_, XPathEvaluatorBase(..), gTypeXPathEvaluatorBase, IsXPathEvaluatorBase, toXPathEvaluatorBase)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import Control.Lens.Operators ((^.))
import Language.Javascript.JSaddle (JSM, JSVal, JSString, toJSVal, valToBool, valToNumber, js, jss, jsf, jsg, new, function, asyncFunction, jsUndefined, jsNull)
import JSDOM.Types
import qualified JSDOM.Types as Types
import JSDOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import JSDOM.Generated.Enums

-- | <https://developer.mozilla.org/docs/Web/API/Document/createExpression MDN XPathEvaluatorBase.createExpression documentation>
createExpression :: (MonadDOM m, IsXPathEvaluatorBase self, ToJSString expression) => self -> expression -> Maybe XPathNSResolver -> m XPathExpression
createExpression self expression resolver = liftDOM ((((Types.toXPathEvaluatorBase self) ^. jsf "createExpression" [toJSVal expression, toJSVal resolver]) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/Document/createExpression MDN XPathEvaluatorBase.createExpression documentation>
createExpression_ :: (MonadDOM m, IsXPathEvaluatorBase self, ToJSString expression) => self -> expression -> Maybe XPathNSResolver -> m ()
createExpression_ self expression resolver = liftDOM (void ((Types.toXPathEvaluatorBase self) ^. jsf "createExpression" [toJSVal expression, toJSVal resolver]))

-- | <https://developer.mozilla.org/docs/Web/API/Document/createNSResolver MDN XPathEvaluatorBase.createNSResolver documentation>
createNSResolver :: (MonadDOM m, IsXPathEvaluatorBase self, IsNode nodeResolver) => self -> nodeResolver -> m Node
createNSResolver self nodeResolver = liftDOM ((((Types.toXPathEvaluatorBase self) ^. jsf "createNSResolver" [toJSVal nodeResolver]) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/Document/createNSResolver MDN XPathEvaluatorBase.createNSResolver documentation>
createNSResolver_ :: (MonadDOM m, IsXPathEvaluatorBase self, IsNode nodeResolver) => self -> nodeResolver -> m ()
createNSResolver_ self nodeResolver = liftDOM (void ((Types.toXPathEvaluatorBase self) ^. jsf "createNSResolver" [toJSVal nodeResolver]))

-- | <https://developer.mozilla.org/docs/Web/API/Document/evaluate MDN XPathEvaluatorBase.evaluate documentation>
evaluate :: (MonadDOM m, IsXPathEvaluatorBase self, ToJSString expression, IsNode contextNode) => self -> expression -> contextNode -> Maybe XPathNSResolver -> Maybe Word -> Maybe XPathResult -> m XPathResult
evaluate self expression contextNode resolver type' result' = liftDOM ((((Types.toXPathEvaluatorBase self) ^. jsf "evaluate" [toJSVal expression, toJSVal contextNode, toJSVal resolver, P.maybe (P.return jsUndefined) toJSVal type', toJSVal result']) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/Document/evaluate MDN XPathEvaluatorBase.evaluate documentation>
evaluate_ :: (MonadDOM m, IsXPathEvaluatorBase self, ToJSString expression, IsNode contextNode) => self -> expression -> contextNode -> Maybe XPathNSResolver -> Maybe Word -> Maybe XPathResult -> m ()
evaluate_ self expression contextNode resolver type' result' = liftDOM (void ((Types.toXPathEvaluatorBase self) ^. jsf "evaluate" [toJSVal expression, toJSVal contextNode, toJSVal resolver, P.maybe (P.return jsUndefined) toJSVal type', toJSVal result']))