module GHCJS.DOM.JSFFI.Generated.XPathResult
(js_iterateNext, iterateNext, iterateNext_, iterateNextUnsafe,
iterateNextUnchecked, js_snapshotItem, snapshotItem, snapshotItem_,
snapshotItemUnsafe, snapshotItemUnchecked, pattern ANY_TYPE,
pattern NUMBER_TYPE, pattern STRING_TYPE, pattern BOOLEAN_TYPE,
pattern UNORDERED_NODE_ITERATOR_TYPE,
pattern ORDERED_NODE_ITERATOR_TYPE,
pattern UNORDERED_NODE_SNAPSHOT_TYPE,
pattern ORDERED_NODE_SNAPSHOT_TYPE,
pattern ANY_UNORDERED_NODE_TYPE, pattern FIRST_ORDERED_NODE_TYPE,
js_getResultType, getResultType, js_getNumberValue, getNumberValue,
js_getStringValue, getStringValue, js_getBooleanValue,
getBooleanValue, js_getSingleNodeValue, getSingleNodeValue,
getSingleNodeValueUnsafe, getSingleNodeValueUnchecked,
js_getInvalidIteratorState, getInvalidIteratorState,
js_getSnapshotLength, getSnapshotLength, XPathResult(..),
gTypeXPathResult)
where
import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)
import qualified Prelude (error)
import Data.Typeable (Typeable)
import GHCJS.Types (JSVal(..), JSString)
import GHCJS.Foreign (jsNull)
import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))
import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))
import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))
import Control.Monad (void)
import Control.Monad.IO.Class (MonadIO(..))
import Data.Int (Int64)
import Data.Word (Word, Word64)
import Data.Maybe (fromJust)
import GHCJS.DOM.Types
import Control.Applicative ((<$>))
import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)
import GHCJS.DOM.JSFFI.Generated.Enums
foreign import javascript unsafe "$1[\"iterateNext\"]()"
js_iterateNext :: XPathResult -> IO (Nullable Node)
iterateNext :: (MonadIO m) => XPathResult -> m (Maybe Node)
iterateNext self
= liftIO (nullableToMaybe <$> (js_iterateNext (self)))
iterateNext_ :: (MonadIO m) => XPathResult -> m ()
iterateNext_ self = liftIO (void (js_iterateNext (self)))
iterateNextUnsafe ::
(MonadIO m, HasCallStack) => XPathResult -> m Node
iterateNextUnsafe self
= liftIO
((nullableToMaybe <$> (js_iterateNext (self))) >>=
maybe (Prelude.error "Nothing to return") return)
iterateNextUnchecked :: (MonadIO m) => XPathResult -> m Node
iterateNextUnchecked self
= liftIO (fromJust . nullableToMaybe <$> (js_iterateNext (self)))
foreign import javascript unsafe "$1[\"snapshotItem\"]($2)"
js_snapshotItem :: XPathResult -> Word -> IO (Nullable Node)
snapshotItem ::
(MonadIO m) => XPathResult -> Word -> m (Maybe Node)
snapshotItem self index
= liftIO (nullableToMaybe <$> (js_snapshotItem (self) index))
snapshotItem_ :: (MonadIO m) => XPathResult -> Word -> m ()
snapshotItem_ self index
= liftIO (void (js_snapshotItem (self) index))
snapshotItemUnsafe ::
(MonadIO m, HasCallStack) => XPathResult -> Word -> m Node
snapshotItemUnsafe self index
= liftIO
((nullableToMaybe <$> (js_snapshotItem (self) index)) >>=
maybe (Prelude.error "Nothing to return") return)
snapshotItemUnchecked ::
(MonadIO m) => XPathResult -> Word -> m Node
snapshotItemUnchecked self index
= liftIO
(fromJust . nullableToMaybe <$> (js_snapshotItem (self) index))
pattern ANY_TYPE = 0
pattern NUMBER_TYPE = 1
pattern STRING_TYPE = 2
pattern BOOLEAN_TYPE = 3
pattern UNORDERED_NODE_ITERATOR_TYPE = 4
pattern ORDERED_NODE_ITERATOR_TYPE = 5
pattern UNORDERED_NODE_SNAPSHOT_TYPE = 6
pattern ORDERED_NODE_SNAPSHOT_TYPE = 7
pattern ANY_UNORDERED_NODE_TYPE = 8
pattern FIRST_ORDERED_NODE_TYPE = 9
foreign import javascript unsafe "$1[\"resultType\"]"
js_getResultType :: XPathResult -> IO Word
getResultType :: (MonadIO m) => XPathResult -> m Word
getResultType self = liftIO (js_getResultType (self))
foreign import javascript unsafe "$1[\"numberValue\"]"
js_getNumberValue :: XPathResult -> IO Double
getNumberValue :: (MonadIO m) => XPathResult -> m Double
getNumberValue self = liftIO (js_getNumberValue (self))
foreign import javascript unsafe "$1[\"stringValue\"]"
js_getStringValue :: XPathResult -> IO JSString
getStringValue ::
(MonadIO m, FromJSString result) => XPathResult -> m result
getStringValue self
= liftIO (fromJSString <$> (js_getStringValue (self)))
foreign import javascript unsafe "($1[\"booleanValue\"] ? 1 : 0)"
js_getBooleanValue :: XPathResult -> IO Bool
getBooleanValue :: (MonadIO m) => XPathResult -> m Bool
getBooleanValue self = liftIO (js_getBooleanValue (self))
foreign import javascript unsafe "$1[\"singleNodeValue\"]"
js_getSingleNodeValue :: XPathResult -> IO (Nullable Node)
getSingleNodeValue :: (MonadIO m) => XPathResult -> m (Maybe Node)
getSingleNodeValue self
= liftIO (nullableToMaybe <$> (js_getSingleNodeValue (self)))
getSingleNodeValueUnsafe ::
(MonadIO m, HasCallStack) => XPathResult -> m Node
getSingleNodeValueUnsafe self
= liftIO
((nullableToMaybe <$> (js_getSingleNodeValue (self))) >>=
maybe (Prelude.error "Nothing to return") return)
getSingleNodeValueUnchecked :: (MonadIO m) => XPathResult -> m Node
getSingleNodeValueUnchecked self
= liftIO
(fromJust . nullableToMaybe <$> (js_getSingleNodeValue (self)))
foreign import javascript unsafe
"($1[\"invalidIteratorState\"] ? 1 : 0)" js_getInvalidIteratorState
:: XPathResult -> IO Bool
getInvalidIteratorState :: (MonadIO m) => XPathResult -> m Bool
getInvalidIteratorState self
= liftIO (js_getInvalidIteratorState (self))
foreign import javascript unsafe "$1[\"snapshotLength\"]"
js_getSnapshotLength :: XPathResult -> IO Word
getSnapshotLength :: (MonadIO m) => XPathResult -> m Word
getSnapshotLength self = liftIO (js_getSnapshotLength (self))