{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-} module GHCJS.DOM.JSFFI.Generated.SVGPointList (js_clear, clear, js_initialize, initialize, js_getItem, getItem, js_insertItemBefore, insertItemBefore, js_replaceItem, replaceItem, js_removeItem, removeItem, js_appendItem, appendItem, js_getNumberOfItems, getNumberOfItems, SVGPointList, castToSVGPointList, gTypeSVGPointList) 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 (JSRef(..), JSString, castRef) import GHCJS.Foreign (jsNull) import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..)) import GHCJS.Marshal (ToJSRef(..), FromJSRef(..)) import GHCJS.Marshal.Pure (PToJSRef(..), PFromJSRef(..)) import Control.Monad.IO.Class (MonadIO(..)) import Data.Int (Int64) import Data.Word (Word, Word64) import GHCJS.DOM.Types import Control.Applicative ((<$>)) import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName) import GHCJS.DOM.Enums foreign import javascript unsafe "$1[\"clear\"]()" js_clear :: JSRef SVGPointList -> IO () -- | clear :: (MonadIO m) => SVGPointList -> m () clear self = liftIO (js_clear (unSVGPointList self)) foreign import javascript unsafe "$1[\"initialize\"]($2)" js_initialize :: JSRef SVGPointList -> JSRef SVGPoint -> IO (JSRef SVGPoint) -- | initialize :: (MonadIO m) => SVGPointList -> Maybe SVGPoint -> m (Maybe SVGPoint) initialize self item = liftIO ((js_initialize (unSVGPointList self) (maybe jsNull pToJSRef item)) >>= fromJSRef) foreign import javascript unsafe "$1[\"getItem\"]($2)" js_getItem :: JSRef SVGPointList -> Word -> IO (JSRef SVGPoint) -- | getItem :: (MonadIO m) => SVGPointList -> Word -> m (Maybe SVGPoint) getItem self index = liftIO ((js_getItem (unSVGPointList self) index) >>= fromJSRef) foreign import javascript unsafe "$1[\"insertItemBefore\"]($2, $3)" js_insertItemBefore :: JSRef SVGPointList -> JSRef SVGPoint -> Word -> IO (JSRef SVGPoint) -- | insertItemBefore :: (MonadIO m) => SVGPointList -> Maybe SVGPoint -> Word -> m (Maybe SVGPoint) insertItemBefore self item index = liftIO ((js_insertItemBefore (unSVGPointList self) (maybe jsNull pToJSRef item) index) >>= fromJSRef) foreign import javascript unsafe "$1[\"replaceItem\"]($2, $3)" js_replaceItem :: JSRef SVGPointList -> JSRef SVGPoint -> Word -> IO (JSRef SVGPoint) -- | replaceItem :: (MonadIO m) => SVGPointList -> Maybe SVGPoint -> Word -> m (Maybe SVGPoint) replaceItem self item index = liftIO ((js_replaceItem (unSVGPointList self) (maybe jsNull pToJSRef item) index) >>= fromJSRef) foreign import javascript unsafe "$1[\"removeItem\"]($2)" js_removeItem :: JSRef SVGPointList -> Word -> IO (JSRef SVGPoint) -- | removeItem :: (MonadIO m) => SVGPointList -> Word -> m (Maybe SVGPoint) removeItem self index = liftIO ((js_removeItem (unSVGPointList self) index) >>= fromJSRef) foreign import javascript unsafe "$1[\"appendItem\"]($2)" js_appendItem :: JSRef SVGPointList -> JSRef SVGPoint -> IO (JSRef SVGPoint) -- | appendItem :: (MonadIO m) => SVGPointList -> Maybe SVGPoint -> m (Maybe SVGPoint) appendItem self item = liftIO ((js_appendItem (unSVGPointList self) (maybe jsNull pToJSRef item)) >>= fromJSRef) foreign import javascript unsafe "$1[\"numberOfItems\"]" js_getNumberOfItems :: JSRef SVGPointList -> IO Word -- | getNumberOfItems :: (MonadIO m) => SVGPointList -> m Word getNumberOfItems self = liftIO (js_getNumberOfItems (unSVGPointList self))