module JSDOM.Generated.SVGNumberList
(clear, initialize, initialize_, initializeUnchecked, getItem,
getItem_, getItemUnchecked, insertItemBefore, insertItemBefore_,
insertItemBeforeUnchecked, replaceItem, replaceItem_,
replaceItemUnchecked, removeItem, removeItem_, removeItemUnchecked,
appendItem, appendItem_, appendItemUnchecked, getNumberOfItems,
SVGNumberList, castToSVGNumberList, gTypeSVGNumberList)
where
import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, realToFrac, fmap, Show, Read, Eq, Ord, Maybe(..))
import Data.Typeable (Typeable)
import Language.Javascript.JSaddle (JSM(..), JSVal(..), JSString, strictEqual, toJSVal, valToStr, valToNumber, valToBool, js, jss, jsf, jsg, function, new, array)
import Data.Int (Int64)
import Data.Word (Word, Word64)
import JSDOM.Types
import Control.Applicative ((<$>))
import Control.Monad (void)
import Control.Lens.Operators ((^.))
import JSDOM.EventTargetClosures (EventName, unsafeEventName)
import JSDOM.Enums
clear :: (MonadDOM m) => SVGNumberList -> m ()
clear self = liftDOM (void (self ^. jsf "clear" ()))
initialize ::
(MonadDOM m) =>
SVGNumberList -> Maybe SVGNumber -> m (Maybe SVGNumber)
initialize self item
= liftDOM ((self ^. jsf "initialize" [toJSVal item]) >>= fromJSVal)
initialize_ ::
(MonadDOM m) => SVGNumberList -> Maybe SVGNumber -> m ()
initialize_ self item
= liftDOM (void (self ^. jsf "initialize" [toJSVal item]))
initializeUnchecked ::
(MonadDOM m) => SVGNumberList -> Maybe SVGNumber -> m SVGNumber
initializeUnchecked self item
= liftDOM
((self ^. jsf "initialize" [toJSVal item]) >>= fromJSValUnchecked)
getItem ::
(MonadDOM m) => SVGNumberList -> Word -> m (Maybe SVGNumber)
getItem self index
= liftDOM ((self ^. jsf "getItem" [toJSVal index]) >>= fromJSVal)
getItem_ :: (MonadDOM m) => SVGNumberList -> Word -> m ()
getItem_ self index
= liftDOM (void (self ^. jsf "getItem" [toJSVal index]))
getItemUnchecked ::
(MonadDOM m) => SVGNumberList -> Word -> m SVGNumber
getItemUnchecked self index
= liftDOM
((self ^. jsf "getItem" [toJSVal index]) >>= fromJSValUnchecked)
insertItemBefore ::
(MonadDOM m) =>
SVGNumberList -> Maybe SVGNumber -> Word -> m (Maybe SVGNumber)
insertItemBefore self item index
= liftDOM
((self ^. jsf "insertItemBefore" [toJSVal item, toJSVal index]) >>=
fromJSVal)
insertItemBefore_ ::
(MonadDOM m) => SVGNumberList -> Maybe SVGNumber -> Word -> m ()
insertItemBefore_ self item index
= liftDOM
(void
(self ^. jsf "insertItemBefore" [toJSVal item, toJSVal index]))
insertItemBeforeUnchecked ::
(MonadDOM m) =>
SVGNumberList -> Maybe SVGNumber -> Word -> m SVGNumber
insertItemBeforeUnchecked self item index
= liftDOM
((self ^. jsf "insertItemBefore" [toJSVal item, toJSVal index]) >>=
fromJSValUnchecked)
replaceItem ::
(MonadDOM m) =>
SVGNumberList -> Maybe SVGNumber -> Word -> m (Maybe SVGNumber)
replaceItem self item index
= liftDOM
((self ^. jsf "replaceItem" [toJSVal item, toJSVal index]) >>=
fromJSVal)
replaceItem_ ::
(MonadDOM m) => SVGNumberList -> Maybe SVGNumber -> Word -> m ()
replaceItem_ self item index
= liftDOM
(void (self ^. jsf "replaceItem" [toJSVal item, toJSVal index]))
replaceItemUnchecked ::
(MonadDOM m) =>
SVGNumberList -> Maybe SVGNumber -> Word -> m SVGNumber
replaceItemUnchecked self item index
= liftDOM
((self ^. jsf "replaceItem" [toJSVal item, toJSVal index]) >>=
fromJSValUnchecked)
removeItem ::
(MonadDOM m) => SVGNumberList -> Word -> m (Maybe SVGNumber)
removeItem self index
= liftDOM
((self ^. jsf "removeItem" [toJSVal index]) >>= fromJSVal)
removeItem_ :: (MonadDOM m) => SVGNumberList -> Word -> m ()
removeItem_ self index
= liftDOM (void (self ^. jsf "removeItem" [toJSVal index]))
removeItemUnchecked ::
(MonadDOM m) => SVGNumberList -> Word -> m SVGNumber
removeItemUnchecked self index
= liftDOM
((self ^. jsf "removeItem" [toJSVal index]) >>= fromJSValUnchecked)
appendItem ::
(MonadDOM m) =>
SVGNumberList -> Maybe SVGNumber -> m (Maybe SVGNumber)
appendItem self item
= liftDOM ((self ^. jsf "appendItem" [toJSVal item]) >>= fromJSVal)
appendItem_ ::
(MonadDOM m) => SVGNumberList -> Maybe SVGNumber -> m ()
appendItem_ self item
= liftDOM (void (self ^. jsf "appendItem" [toJSVal item]))
appendItemUnchecked ::
(MonadDOM m) => SVGNumberList -> Maybe SVGNumber -> m SVGNumber
appendItemUnchecked self item
= liftDOM
((self ^. jsf "appendItem" [toJSVal item]) >>= fromJSValUnchecked)
getNumberOfItems :: (MonadDOM m) => SVGNumberList -> m Word
getNumberOfItems self
= liftDOM
(round <$> ((self ^. js "numberOfItems") >>= valToNumber))