jsaddle-dom-0.10.0.0: src/JSDOM/Generated/SVGStringList.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from SVG2 (webref). Do not edit.
module JSDOM.Generated.SVGStringList
       (appendItem, appendItem_, clear, getItem, getItem_, initialize, initialize_, insertItemBefore, insertItemBefore_, removeItem, removeItem_, replaceItem, replaceItem_, getLength, getNumberOfItems, SVGStringList(..), gTypeSVGStringList)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import Control.Lens.Operators ((^.))
import Language.Javascript.JSaddle (JSM, JSVal, JSString, toJSVal, valToBool, valToNumber, js, jss, jsf, jsg, new, function, asyncFunction, jsUndefined, jsNull)
import JSDOM.Types
import qualified JSDOM.Types as Types
import JSDOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import JSDOM.Generated.Enums

-- | <https://developer.mozilla.org/docs/Web/API/SVGStringList/appendItem MDN SVGStringList.appendItem documentation>
appendItem :: (MonadDOM m, ToJSString newItem, FromJSString result) => SVGStringList -> newItem -> m result
appendItem self newItem = liftDOM (((self ^. jsf "appendItem" [toJSVal newItem]) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/SVGStringList/appendItem MDN SVGStringList.appendItem documentation>
appendItem_ :: (MonadDOM m, ToJSString newItem) => SVGStringList -> newItem -> m ()
appendItem_ self newItem = liftDOM (void (self ^. jsf "appendItem" [toJSVal newItem]))

-- | <https://developer.mozilla.org/docs/Web/API/SVGStringList/clear MDN SVGStringList.clear documentation>
clear :: (MonadDOM m) => SVGStringList -> m ()
clear self = liftDOM (void (self ^. jsf "clear" ()))

-- | <https://developer.mozilla.org/docs/Web/API/SVGStringList/getItem MDN SVGStringList.getItem documentation>
getItem :: (MonadDOM m, FromJSString result) => SVGStringList -> Word -> m result
getItem self index = liftDOM (((self ^. jsf "getItem" [toJSVal index]) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/SVGStringList/getItem MDN SVGStringList.getItem documentation>
getItem_ :: (MonadDOM m) => SVGStringList -> Word -> m ()
getItem_ self index = liftDOM (void (self ^. jsf "getItem" [toJSVal index]))

-- | <https://developer.mozilla.org/docs/Web/API/SVGStringList/initialize MDN SVGStringList.initialize documentation>
initialize :: (MonadDOM m, ToJSString newItem, FromJSString result) => SVGStringList -> newItem -> m result
initialize self newItem = liftDOM (((self ^. jsf "initialize" [toJSVal newItem]) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/SVGStringList/initialize MDN SVGStringList.initialize documentation>
initialize_ :: (MonadDOM m, ToJSString newItem) => SVGStringList -> newItem -> m ()
initialize_ self newItem = liftDOM (void (self ^. jsf "initialize" [toJSVal newItem]))

-- | <https://developer.mozilla.org/docs/Web/API/SVGStringList/insertItemBefore MDN SVGStringList.insertItemBefore documentation>
insertItemBefore :: (MonadDOM m, ToJSString newItem, FromJSString result) => SVGStringList -> newItem -> Word -> m result
insertItemBefore self newItem index = liftDOM (((self ^. jsf "insertItemBefore" [toJSVal newItem, toJSVal index]) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/SVGStringList/insertItemBefore MDN SVGStringList.insertItemBefore documentation>
insertItemBefore_ :: (MonadDOM m, ToJSString newItem) => SVGStringList -> newItem -> Word -> m ()
insertItemBefore_ self newItem index = liftDOM (void (self ^. jsf "insertItemBefore" [toJSVal newItem, toJSVal index]))

-- | <https://developer.mozilla.org/docs/Web/API/SVGStringList/removeItem MDN SVGStringList.removeItem documentation>
removeItem :: (MonadDOM m, FromJSString result) => SVGStringList -> Word -> m result
removeItem self index = liftDOM (((self ^. jsf "removeItem" [toJSVal index]) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/SVGStringList/removeItem MDN SVGStringList.removeItem documentation>
removeItem_ :: (MonadDOM m) => SVGStringList -> Word -> m ()
removeItem_ self index = liftDOM (void (self ^. jsf "removeItem" [toJSVal index]))

-- | <https://developer.mozilla.org/docs/Web/API/SVGStringList/replaceItem MDN SVGStringList.replaceItem documentation>
replaceItem :: (MonadDOM m, ToJSString newItem, FromJSString result) => SVGStringList -> newItem -> Word -> m result
replaceItem self newItem index = liftDOM (((self ^. jsf "replaceItem" [toJSVal newItem, toJSVal index]) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/SVGStringList/replaceItem MDN SVGStringList.replaceItem documentation>
replaceItem_ :: (MonadDOM m, ToJSString newItem) => SVGStringList -> newItem -> Word -> m ()
replaceItem_ self newItem index = liftDOM (void (self ^. jsf "replaceItem" [toJSVal newItem, toJSVal index]))

-- | <https://developer.mozilla.org/docs/Web/API/SVGStringList/length MDN SVGStringList.length documentation>
getLength :: (MonadDOM m) => SVGStringList -> m Word
getLength self = liftDOM ((P.round <$> ((self ^. js "length") >>= valToNumber)))

-- | <https://developer.mozilla.org/docs/Web/API/SVGStringList/numberOfItems MDN SVGStringList.numberOfItems documentation>
getNumberOfItems :: (MonadDOM m) => SVGStringList -> m Word
getNumberOfItems self = liftDOM ((P.round <$> ((self ^. js "numberOfItems") >>= valToNumber)))