{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-} module GHCJS.DOM.JSFFI.Generated.NamedNodeMap (js_getNamedItem, getNamedItem, getNamedItem_, getNamedItemUnchecked, js_setNamedItem, setNamedItem, setNamedItem_, setNamedItemUnchecked, js_removeNamedItem, removeNamedItem, removeNamedItem_, removeNamedItemUnchecked, js_item, item, item_, itemUnchecked, js_getNamedItemNS, getNamedItemNS, getNamedItemNS_, getNamedItemNSUnchecked, js_setNamedItemNS, setNamedItemNS, setNamedItemNS_, setNamedItemNSUnchecked, js_removeNamedItemNS, removeNamedItemNS, removeNamedItemNS_, removeNamedItemNSUnchecked, js_getLength, getLength, NamedNodeMap, castToNamedNodeMap, gTypeNamedNodeMap) where import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord) 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[\"getNamedItem\"]($2)" js_getNamedItem :: NamedNodeMap -> JSString -> IO (Nullable Node) -- | getNamedItem :: (MonadIO m, ToJSString name) => NamedNodeMap -> name -> m (Maybe Node) getNamedItem self name = liftIO (nullableToMaybe <$> (js_getNamedItem (self) (toJSString name))) -- | getNamedItem_ :: (MonadIO m, ToJSString name) => NamedNodeMap -> name -> m () getNamedItem_ self name = liftIO (void (js_getNamedItem (self) (toJSString name))) -- | getNamedItemUnchecked :: (MonadIO m, ToJSString name) => NamedNodeMap -> name -> m Node getNamedItemUnchecked self name = liftIO (fromJust . nullableToMaybe <$> (js_getNamedItem (self) (toJSString name))) foreign import javascript unsafe "$1[\"setNamedItem\"]($2)" js_setNamedItem :: NamedNodeMap -> Nullable Node -> IO (Nullable Node) -- | setNamedItem :: (MonadIO m, IsNode node) => NamedNodeMap -> Maybe node -> m (Maybe Node) setNamedItem self node = liftIO (nullableToMaybe <$> (js_setNamedItem (self) (maybeToNullable (fmap toNode node)))) -- | setNamedItem_ :: (MonadIO m, IsNode node) => NamedNodeMap -> Maybe node -> m () setNamedItem_ self node = liftIO (void (js_setNamedItem (self) (maybeToNullable (fmap toNode node)))) -- | setNamedItemUnchecked :: (MonadIO m, IsNode node) => NamedNodeMap -> Maybe node -> m Node setNamedItemUnchecked self node = liftIO (fromJust . nullableToMaybe <$> (js_setNamedItem (self) (maybeToNullable (fmap toNode node)))) foreign import javascript unsafe "$1[\"removeNamedItem\"]($2)" js_removeNamedItem :: NamedNodeMap -> JSString -> IO (Nullable Node) -- | removeNamedItem :: (MonadIO m, ToJSString name) => NamedNodeMap -> name -> m (Maybe Node) removeNamedItem self name = liftIO (nullableToMaybe <$> (js_removeNamedItem (self) (toJSString name))) -- | removeNamedItem_ :: (MonadIO m, ToJSString name) => NamedNodeMap -> name -> m () removeNamedItem_ self name = liftIO (void (js_removeNamedItem (self) (toJSString name))) -- | removeNamedItemUnchecked :: (MonadIO m, ToJSString name) => NamedNodeMap -> name -> m Node removeNamedItemUnchecked self name = liftIO (fromJust . nullableToMaybe <$> (js_removeNamedItem (self) (toJSString name))) foreign import javascript unsafe "$1[\"item\"]($2)" js_item :: NamedNodeMap -> Word -> IO (Nullable Node) -- | item :: (MonadIO m) => NamedNodeMap -> Word -> m (Maybe Node) item self index = liftIO (nullableToMaybe <$> (js_item (self) index)) -- | item_ :: (MonadIO m) => NamedNodeMap -> Word -> m () item_ self index = liftIO (void (js_item (self) index)) -- | itemUnchecked :: (MonadIO m) => NamedNodeMap -> Word -> m Node itemUnchecked self index = liftIO (fromJust . nullableToMaybe <$> (js_item (self) index)) foreign import javascript unsafe "$1[\"getNamedItemNS\"]($2, $3)" js_getNamedItemNS :: NamedNodeMap -> Nullable JSString -> JSString -> IO (Nullable Node) -- | getNamedItemNS :: (MonadIO m, ToJSString namespaceURI, ToJSString localName) => NamedNodeMap -> Maybe namespaceURI -> localName -> m (Maybe Node) getNamedItemNS self namespaceURI localName = liftIO (nullableToMaybe <$> (js_getNamedItemNS (self) (toMaybeJSString namespaceURI) (toJSString localName))) -- | getNamedItemNS_ :: (MonadIO m, ToJSString namespaceURI, ToJSString localName) => NamedNodeMap -> Maybe namespaceURI -> localName -> m () getNamedItemNS_ self namespaceURI localName = liftIO (void (js_getNamedItemNS (self) (toMaybeJSString namespaceURI) (toJSString localName))) -- | getNamedItemNSUnchecked :: (MonadIO m, ToJSString namespaceURI, ToJSString localName) => NamedNodeMap -> Maybe namespaceURI -> localName -> m Node getNamedItemNSUnchecked self namespaceURI localName = liftIO (fromJust . nullableToMaybe <$> (js_getNamedItemNS (self) (toMaybeJSString namespaceURI) (toJSString localName))) foreign import javascript unsafe "$1[\"setNamedItemNS\"]($2)" js_setNamedItemNS :: NamedNodeMap -> Nullable Node -> IO (Nullable Node) -- | setNamedItemNS :: (MonadIO m, IsNode node) => NamedNodeMap -> Maybe node -> m (Maybe Node) setNamedItemNS self node = liftIO (nullableToMaybe <$> (js_setNamedItemNS (self) (maybeToNullable (fmap toNode node)))) -- | setNamedItemNS_ :: (MonadIO m, IsNode node) => NamedNodeMap -> Maybe node -> m () setNamedItemNS_ self node = liftIO (void (js_setNamedItemNS (self) (maybeToNullable (fmap toNode node)))) -- | setNamedItemNSUnchecked :: (MonadIO m, IsNode node) => NamedNodeMap -> Maybe node -> m Node setNamedItemNSUnchecked self node = liftIO (fromJust . nullableToMaybe <$> (js_setNamedItemNS (self) (maybeToNullable (fmap toNode node)))) foreign import javascript unsafe "$1[\"removeNamedItemNS\"]($2, $3)" js_removeNamedItemNS :: NamedNodeMap -> Nullable JSString -> JSString -> IO (Nullable Node) -- | removeNamedItemNS :: (MonadIO m, ToJSString namespaceURI, ToJSString localName) => NamedNodeMap -> Maybe namespaceURI -> localName -> m (Maybe Node) removeNamedItemNS self namespaceURI localName = liftIO (nullableToMaybe <$> (js_removeNamedItemNS (self) (toMaybeJSString namespaceURI) (toJSString localName))) -- | removeNamedItemNS_ :: (MonadIO m, ToJSString namespaceURI, ToJSString localName) => NamedNodeMap -> Maybe namespaceURI -> localName -> m () removeNamedItemNS_ self namespaceURI localName = liftIO (void (js_removeNamedItemNS (self) (toMaybeJSString namespaceURI) (toJSString localName))) -- | removeNamedItemNSUnchecked :: (MonadIO m, ToJSString namespaceURI, ToJSString localName) => NamedNodeMap -> Maybe namespaceURI -> localName -> m Node removeNamedItemNSUnchecked self namespaceURI localName = liftIO (fromJust . nullableToMaybe <$> (js_removeNamedItemNS (self) (toMaybeJSString namespaceURI) (toJSString localName))) foreign import javascript unsafe "$1[\"length\"]" js_getLength :: NamedNodeMap -> IO Word -- | getLength :: (MonadIO m) => NamedNodeMap -> m Word getLength self = liftIO (js_getLength (self))