#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
module GHCJS.DOM.NodeIterator
(ghcjs_dom_node_iterator_detach, nodeIteratorDetach,
ghcjs_dom_node_iterator_get_root, nodeIteratorGetRoot,
ghcjs_dom_node_iterator_get_what_to_show,
nodeIteratorGetWhatToShow, ghcjs_dom_node_iterator_get_filter,
nodeIteratorGetFilter,
ghcjs_dom_node_iterator_get_expand_entity_references,
nodeIteratorGetExpandEntityReferences,
ghcjs_dom_node_iterator_get_reference_node,
nodeIteratorGetReferenceNode,
ghcjs_dom_node_iterator_get_pointer_before_reference_node,
nodeIteratorGetPointerBeforeReferenceNode, NodeIterator,
IsNodeIterator, castToNodeIterator, gTypeNodeIterator,
toNodeIterator)
where
import GHCJS.Types
import GHCJS.Foreign
import GHCJS.Marshal
import Data.Int
import Data.Word
import GHCJS.DOM.Types
import Control.Applicative ((<$>))
import GHCJS.DOM.EventM
foreign import javascript unsafe "$1[\"detach\"]()"
ghcjs_dom_node_iterator_detach :: JSRef NodeIterator -> IO ()
nodeIteratorDetach :: (IsNodeIterator self) => self -> IO ()
nodeIteratorDetach self
= ghcjs_dom_node_iterator_detach
(unNodeIterator (toNodeIterator self))
foreign import javascript unsafe "$1[\"root\"]"
ghcjs_dom_node_iterator_get_root ::
JSRef NodeIterator -> IO (JSRef Node)
nodeIteratorGetRoot ::
(IsNodeIterator self) => self -> IO (Maybe Node)
nodeIteratorGetRoot self
= fmap Node . maybeJSNull <$>
(ghcjs_dom_node_iterator_get_root
(unNodeIterator (toNodeIterator self)))
foreign import javascript unsafe "$1[\"whatToShow\"]"
ghcjs_dom_node_iterator_get_what_to_show ::
JSRef NodeIterator -> IO Word
nodeIteratorGetWhatToShow ::
(IsNodeIterator self) => self -> IO Word
nodeIteratorGetWhatToShow self
= ghcjs_dom_node_iterator_get_what_to_show
(unNodeIterator (toNodeIterator self))
foreign import javascript unsafe "$1[\"filter\"]"
ghcjs_dom_node_iterator_get_filter ::
JSRef NodeIterator -> IO (JSRef NodeFilter)
nodeIteratorGetFilter ::
(IsNodeIterator self) => self -> IO (Maybe NodeFilter)
nodeIteratorGetFilter self
= fmap NodeFilter . maybeJSNull <$>
(ghcjs_dom_node_iterator_get_filter
(unNodeIterator (toNodeIterator self)))
foreign import javascript unsafe
"($1[\"expandEntityReferences\"] ? 1 : 0)"
ghcjs_dom_node_iterator_get_expand_entity_references ::
JSRef NodeIterator -> IO Bool
nodeIteratorGetExpandEntityReferences ::
(IsNodeIterator self) => self -> IO Bool
nodeIteratorGetExpandEntityReferences self
= ghcjs_dom_node_iterator_get_expand_entity_references
(unNodeIterator (toNodeIterator self))
foreign import javascript unsafe "$1[\"referenceNode\"]"
ghcjs_dom_node_iterator_get_reference_node ::
JSRef NodeIterator -> IO (JSRef Node)
nodeIteratorGetReferenceNode ::
(IsNodeIterator self) => self -> IO (Maybe Node)
nodeIteratorGetReferenceNode self
= fmap Node . maybeJSNull <$>
(ghcjs_dom_node_iterator_get_reference_node
(unNodeIterator (toNodeIterator self)))
foreign import javascript unsafe
"($1[\"pointerBeforeReferenceNode\"] ? 1 : 0)"
ghcjs_dom_node_iterator_get_pointer_before_reference_node ::
JSRef NodeIterator -> IO Bool
nodeIteratorGetPointerBeforeReferenceNode ::
(IsNodeIterator self) => self -> IO Bool
nodeIteratorGetPointerBeforeReferenceNode self
= ghcjs_dom_node_iterator_get_pointer_before_reference_node
(unNodeIterator (toNodeIterator self))
#else
module GHCJS.DOM.NodeIterator (
module Graphics.UI.Gtk.WebKit.DOM.NodeIterator
) where
import Graphics.UI.Gtk.WebKit.DOM.NodeIterator
#endif