{-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE ForeignFunctionInterface #-} {-# LANGUAGE JavaScriptFFI #-} -- For HasCallStack compatibility {-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-} module GHCJS.DOM.JSFFI.Generated.SVGGradientElement (pattern SVG_SPREADMETHOD_UNKNOWN, pattern SVG_SPREADMETHOD_PAD, pattern SVG_SPREADMETHOD_REFLECT, pattern SVG_SPREADMETHOD_REPEAT, js_getGradientUnits, getGradientUnits, js_getGradientTransform, getGradientTransform, js_getSpreadMethod, getSpreadMethod, SVGGradientElement(..), gTypeSVGGradientElement, IsSVGGradientElement, toSVGGradientElement) where import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord) import qualified Prelude (error) import Data.Typeable (Typeable) import GHCJS.Types (JSVal(..), JSString) import GHCJS.Foreign (jsNull, jsUndefined) 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 Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>)) import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern SVG_SPREADMETHOD_UNKNOWN = 0 pattern SVG_SPREADMETHOD_PAD = 1 pattern SVG_SPREADMETHOD_REFLECT = 2 pattern SVG_SPREADMETHOD_REPEAT = 3 foreign import javascript unsafe "$1[\"gradientUnits\"]" js_getGradientUnits :: SVGGradientElement -> IO SVGAnimatedEnumeration -- | getGradientUnits :: (MonadIO m, IsSVGGradientElement self) => self -> m SVGAnimatedEnumeration getGradientUnits self = liftIO (js_getGradientUnits (toSVGGradientElement self)) foreign import javascript unsafe "$1[\"gradientTransform\"]" js_getGradientTransform :: SVGGradientElement -> IO SVGAnimatedTransformList -- | getGradientTransform :: (MonadIO m, IsSVGGradientElement self) => self -> m SVGAnimatedTransformList getGradientTransform self = liftIO (js_getGradientTransform (toSVGGradientElement self)) foreign import javascript unsafe "$1[\"spreadMethod\"]" js_getSpreadMethod :: SVGGradientElement -> IO SVGAnimatedEnumeration -- | getSpreadMethod :: (MonadIO m, IsSVGGradientElement self) => self -> m SVGAnimatedEnumeration getSpreadMethod self = liftIO (js_getSpreadMethod (toSVGGradientElement self))