CanvasShadowStyles.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from html (webref). Do not edit.
module JSDOM.Generated.CanvasShadowStyles
       (setShadowOffsetX, getShadowOffsetX, setShadowOffsetY, getShadowOffsetY, setShadowBlur, getShadowBlur, setShadowColor, getShadowColor, CanvasShadowStyles(..), gTypeCanvasShadowStyles, IsCanvasShadowStyles, toCanvasShadowStyles)
       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/CanvasRenderingContext2D/shadowOffsetX MDN CanvasShadowStyles.shadowOffsetX documentation>
setShadowOffsetX :: (MonadDOM m, IsCanvasShadowStyles self) => self -> Double -> m ()
setShadowOffsetX self val = liftDOM (void ((Types.toCanvasShadowStyles self) ^. jss "shadowOffsetX" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/shadowOffsetX MDN CanvasShadowStyles.shadowOffsetX documentation>
getShadowOffsetX :: (MonadDOM m, IsCanvasShadowStyles self) => self -> m Double
getShadowOffsetX self = liftDOM ((((Types.toCanvasShadowStyles self) ^. js "shadowOffsetX") >>= valToNumber))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/shadowOffsetY MDN CanvasShadowStyles.shadowOffsetY documentation>
setShadowOffsetY :: (MonadDOM m, IsCanvasShadowStyles self) => self -> Double -> m ()
setShadowOffsetY self val = liftDOM (void ((Types.toCanvasShadowStyles self) ^. jss "shadowOffsetY" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/shadowOffsetY MDN CanvasShadowStyles.shadowOffsetY documentation>
getShadowOffsetY :: (MonadDOM m, IsCanvasShadowStyles self) => self -> m Double
getShadowOffsetY self = liftDOM ((((Types.toCanvasShadowStyles self) ^. js "shadowOffsetY") >>= valToNumber))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/shadowBlur MDN CanvasShadowStyles.shadowBlur documentation>
setShadowBlur :: (MonadDOM m, IsCanvasShadowStyles self) => self -> Double -> m ()
setShadowBlur self val = liftDOM (void ((Types.toCanvasShadowStyles self) ^. jss "shadowBlur" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/shadowBlur MDN CanvasShadowStyles.shadowBlur documentation>
getShadowBlur :: (MonadDOM m, IsCanvasShadowStyles self) => self -> m Double
getShadowBlur self = liftDOM ((((Types.toCanvasShadowStyles self) ^. js "shadowBlur") >>= valToNumber))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/shadowColor MDN CanvasShadowStyles.shadowColor documentation>
setShadowColor :: (MonadDOM m, IsCanvasShadowStyles self, ToJSString val) => self -> val -> m ()
setShadowColor self val = liftDOM (void ((Types.toCanvasShadowStyles self) ^. jss "shadowColor" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/shadowColor MDN CanvasShadowStyles.shadowColor documentation>
getShadowColor :: (MonadDOM m, IsCanvasShadowStyles self, FromJSString result) => self -> m result
getShadowColor self = liftDOM ((((Types.toCanvasShadowStyles self) ^. js "shadowColor") >>= fromJSValUnchecked))