{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-} module GHCJS.DOM.JSFFI.Generated.MutationRecord (js_getType, getType, js_getTarget, getTarget, getTargetUnchecked, js_getAddedNodes, getAddedNodes, getAddedNodesUnchecked, js_getRemovedNodes, getRemovedNodes, getRemovedNodesUnchecked, js_getPreviousSibling, getPreviousSibling, getPreviousSiblingUnchecked, js_getNextSibling, getNextSibling, getNextSiblingUnchecked, js_getAttributeName, getAttributeName, getAttributeNameUnchecked, js_getAttributeNamespace, getAttributeNamespace, getAttributeNamespaceUnchecked, js_getOldValue, getOldValue, getOldValueUnchecked, MutationRecord, castToMutationRecord, gTypeMutationRecord) 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[\"type\"]" js_getType :: MutationRecord -> IO JSString -- | getType :: (MonadIO m, FromJSString result) => MutationRecord -> m result getType self = liftIO (fromJSString <$> (js_getType (self))) foreign import javascript unsafe "$1[\"target\"]" js_getTarget :: MutationRecord -> IO (Nullable Node) -- | getTarget :: (MonadIO m) => MutationRecord -> m (Maybe Node) getTarget self = liftIO (nullableToMaybe <$> (js_getTarget (self))) -- | getTargetUnchecked :: (MonadIO m) => MutationRecord -> m Node getTargetUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getTarget (self))) foreign import javascript unsafe "$1[\"addedNodes\"]" js_getAddedNodes :: MutationRecord -> IO (Nullable NodeList) -- | getAddedNodes :: (MonadIO m) => MutationRecord -> m (Maybe NodeList) getAddedNodes self = liftIO (nullableToMaybe <$> (js_getAddedNodes (self))) -- | getAddedNodesUnchecked :: (MonadIO m) => MutationRecord -> m NodeList getAddedNodesUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getAddedNodes (self))) foreign import javascript unsafe "$1[\"removedNodes\"]" js_getRemovedNodes :: MutationRecord -> IO (Nullable NodeList) -- | getRemovedNodes :: (MonadIO m) => MutationRecord -> m (Maybe NodeList) getRemovedNodes self = liftIO (nullableToMaybe <$> (js_getRemovedNodes (self))) -- | getRemovedNodesUnchecked :: (MonadIO m) => MutationRecord -> m NodeList getRemovedNodesUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getRemovedNodes (self))) foreign import javascript unsafe "$1[\"previousSibling\"]" js_getPreviousSibling :: MutationRecord -> IO (Nullable Node) -- | getPreviousSibling :: (MonadIO m) => MutationRecord -> m (Maybe Node) getPreviousSibling self = liftIO (nullableToMaybe <$> (js_getPreviousSibling (self))) -- | getPreviousSiblingUnchecked :: (MonadIO m) => MutationRecord -> m Node getPreviousSiblingUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getPreviousSibling (self))) foreign import javascript unsafe "$1[\"nextSibling\"]" js_getNextSibling :: MutationRecord -> IO (Nullable Node) -- | getNextSibling :: (MonadIO m) => MutationRecord -> m (Maybe Node) getNextSibling self = liftIO (nullableToMaybe <$> (js_getNextSibling (self))) -- | getNextSiblingUnchecked :: (MonadIO m) => MutationRecord -> m Node getNextSiblingUnchecked self = liftIO (fromJust . nullableToMaybe <$> (js_getNextSibling (self))) foreign import javascript unsafe "$1[\"attributeName\"]" js_getAttributeName :: MutationRecord -> IO (Nullable JSString) -- | getAttributeName :: (MonadIO m, FromJSString result) => MutationRecord -> m (Maybe result) getAttributeName self = liftIO (fromMaybeJSString <$> (js_getAttributeName (self))) -- | getAttributeNameUnchecked :: (MonadIO m, FromJSString result) => MutationRecord -> m result getAttributeNameUnchecked self = liftIO (fromJust . fromMaybeJSString <$> (js_getAttributeName (self))) foreign import javascript unsafe "$1[\"attributeNamespace\"]" js_getAttributeNamespace :: MutationRecord -> IO (Nullable JSString) -- | getAttributeNamespace :: (MonadIO m, FromJSString result) => MutationRecord -> m (Maybe result) getAttributeNamespace self = liftIO (fromMaybeJSString <$> (js_getAttributeNamespace (self))) -- | getAttributeNamespaceUnchecked :: (MonadIO m, FromJSString result) => MutationRecord -> m result getAttributeNamespaceUnchecked self = liftIO (fromJust . fromMaybeJSString <$> (js_getAttributeNamespace (self))) foreign import javascript unsafe "$1[\"oldValue\"]" js_getOldValue :: MutationRecord -> IO (Nullable JSString) -- | getOldValue :: (MonadIO m, FromJSString result) => MutationRecord -> m (Maybe result) getOldValue self = liftIO (fromMaybeJSString <$> (js_getOldValue (self))) -- | getOldValueUnchecked :: (MonadIO m, FromJSString result) => MutationRecord -> m result getOldValueUnchecked self = liftIO (fromJust . fromMaybeJSString <$> (js_getOldValue (self)))