ghcjs-dom-javascript-0.10.0.0: src/GHCJS/DOM/JSFFI/Generated/ComputedEffectTiming.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from web-animations-1 (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.ComputedEffectTiming
       (js_newComputedEffectTiming, js_setProgress, js_getProgress, js_setCurrentIteration, js_getCurrentIteration, js_setStartTime, js_getStartTime, js_setEndTime, js_getEndTime, js_setActiveDuration, js_getActiveDuration, js_setLocalTime, js_getLocalTime, newComputedEffectTiming, setProgress, getProgress, getProgressUnsafe, getProgressUnchecked, setCurrentIteration, getCurrentIteration, getCurrentIterationUnsafe, getCurrentIterationUnchecked, setStartTime, getStartTime, getStartTimeUnsafe, getStartTimeUnchecked, setEndTime, getEndTime, getEndTimeUnsafe, getEndTimeUnchecked, setActiveDuration, getActiveDuration, getActiveDurationUnsafe, getActiveDurationUnchecked, setLocalTime, getLocalTime, getLocalTimeUnsafe, getLocalTimeUnchecked, ComputedEffectTiming(..), gTypeComputedEffectTiming)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import GHCJS.Types (JSVal, JSString)
import GHCJS.Foreign (jsUndefined, jsNull)
import GHCJS.DOM.Types
import qualified GHCJS.DOM.Types as Types
import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import GHCJS.DOM.JSFFI.Generated.Enums

foreign import javascript safe "(() => { return ({}); })"
        js_newComputedEffectTiming :: IO ComputedEffectTiming
-- | <https://drafts.csswg.org/web-animations-1/#dictdef-computedeffecttiming ComputedEffectTiming specification>
newComputedEffectTiming :: (MonadDOM m) => m ComputedEffectTiming
newComputedEffectTiming = liftDOM ((js_newComputedEffectTiming))

foreign import javascript safe "(($1, $2) => { $1[\"progress\"] = $2; })"
        js_setProgress :: ComputedEffectTiming -> JSVal -> IO ()
-- | <https://drafts.csswg.org/web-animations-1/#dom-computedeffecttiming-progress ComputedEffectTiming.progress specification>
setProgress :: (MonadDOM m) => ComputedEffectTiming -> Maybe Double -> m ()
setProgress self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setProgress (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"progress\"]; })"
        js_getProgress :: ComputedEffectTiming -> IO JSVal
-- | <https://drafts.csswg.org/web-animations-1/#dom-computedeffecttiming-progress ComputedEffectTiming.progress specification>
getProgress :: (MonadDOM m) => ComputedEffectTiming -> m (Maybe Double)
getProgress self = liftDOM (((js_getProgress (self)) >>= fromJSValUnchecked))

-- | <https://drafts.csswg.org/web-animations-1/#dom-computedeffecttiming-progress ComputedEffectTiming.progress specification>
getProgressUnsafe :: (MonadDOM m, HasCallStack) => ComputedEffectTiming -> m Double
getProgressUnsafe self = liftDOM ((((js_getProgress (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/web-animations-1/#dom-computedeffecttiming-progress ComputedEffectTiming.progress specification>
getProgressUnchecked :: (MonadDOM m) => ComputedEffectTiming -> m Double
getProgressUnchecked self = liftDOM ((pFromJSVal <$> (js_getProgress (self))))

foreign import javascript safe "(($1, $2) => { $1[\"currentIteration\"] = $2; })"
        js_setCurrentIteration :: ComputedEffectTiming -> JSVal -> IO ()
-- | <https://drafts.csswg.org/web-animations-1/#dom-computedeffecttiming-currentiteration ComputedEffectTiming.currentIteration specification>
setCurrentIteration :: (MonadDOM m) => ComputedEffectTiming -> Maybe Double -> m ()
setCurrentIteration self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setCurrentIteration (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"currentIteration\"]; })"
        js_getCurrentIteration :: ComputedEffectTiming -> IO JSVal
-- | <https://drafts.csswg.org/web-animations-1/#dom-computedeffecttiming-currentiteration ComputedEffectTiming.currentIteration specification>
getCurrentIteration :: (MonadDOM m) => ComputedEffectTiming -> m (Maybe Double)
getCurrentIteration self = liftDOM (((js_getCurrentIteration (self)) >>= fromJSValUnchecked))

-- | <https://drafts.csswg.org/web-animations-1/#dom-computedeffecttiming-currentiteration ComputedEffectTiming.currentIteration specification>
getCurrentIterationUnsafe :: (MonadDOM m, HasCallStack) => ComputedEffectTiming -> m Double
getCurrentIterationUnsafe self = liftDOM ((((js_getCurrentIteration (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/web-animations-1/#dom-computedeffecttiming-currentiteration ComputedEffectTiming.currentIteration specification>
getCurrentIterationUnchecked :: (MonadDOM m) => ComputedEffectTiming -> m Double
getCurrentIterationUnchecked self = liftDOM ((pFromJSVal <$> (js_getCurrentIteration (self))))

foreign import javascript safe "(($1, $2) => { $1[\"startTime\"] = $2; })"
        js_setStartTime :: ComputedEffectTiming -> CSSNumberish -> IO ()
-- | <https://drafts.csswg.org/web-animations-2/#dom-computedeffecttiming-starttime ComputedEffectTiming.startTime specification>
setStartTime :: (MonadDOM m, IsCSSNumberish val) => ComputedEffectTiming -> val -> m ()
setStartTime self val = liftDOM (void ((js_setStartTime (self) (Types.toCSSNumberish val))))

foreign import javascript unsafe "(($1) => { return $1[\"startTime\"]; })"
        js_getStartTime :: ComputedEffectTiming -> IO JSVal
-- | <https://drafts.csswg.org/web-animations-2/#dom-computedeffecttiming-starttime ComputedEffectTiming.startTime specification>
getStartTime :: (MonadDOM m) => ComputedEffectTiming -> m (Maybe CSSNumberish)
getStartTime self = liftDOM (((js_getStartTime (self)) >>= fromJSValUnchecked))

-- | <https://drafts.csswg.org/web-animations-2/#dom-computedeffecttiming-starttime ComputedEffectTiming.startTime specification>
getStartTimeUnsafe :: (MonadDOM m, HasCallStack) => ComputedEffectTiming -> m CSSNumberish
getStartTimeUnsafe self = liftDOM ((((js_getStartTime (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/web-animations-2/#dom-computedeffecttiming-starttime ComputedEffectTiming.startTime specification>
getStartTimeUnchecked :: (MonadDOM m) => ComputedEffectTiming -> m CSSNumberish
getStartTimeUnchecked self = liftDOM ((pFromJSVal <$> (js_getStartTime (self))))

foreign import javascript safe "(($1, $2) => { $1[\"endTime\"] = $2; })"
        js_setEndTime :: ComputedEffectTiming -> CSSNumberish -> IO ()
-- | <https://drafts.csswg.org/web-animations-2/#dom-computedeffecttiming-endtime ComputedEffectTiming.endTime specification>
setEndTime :: (MonadDOM m, IsCSSNumberish val) => ComputedEffectTiming -> val -> m ()
setEndTime self val = liftDOM (void ((js_setEndTime (self) (Types.toCSSNumberish val))))

foreign import javascript unsafe "(($1) => { return $1[\"endTime\"]; })"
        js_getEndTime :: ComputedEffectTiming -> IO JSVal
-- | <https://drafts.csswg.org/web-animations-2/#dom-computedeffecttiming-endtime ComputedEffectTiming.endTime specification>
getEndTime :: (MonadDOM m) => ComputedEffectTiming -> m (Maybe CSSNumberish)
getEndTime self = liftDOM (((js_getEndTime (self)) >>= fromJSValUnchecked))

-- | <https://drafts.csswg.org/web-animations-2/#dom-computedeffecttiming-endtime ComputedEffectTiming.endTime specification>
getEndTimeUnsafe :: (MonadDOM m, HasCallStack) => ComputedEffectTiming -> m CSSNumberish
getEndTimeUnsafe self = liftDOM ((((js_getEndTime (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/web-animations-2/#dom-computedeffecttiming-endtime ComputedEffectTiming.endTime specification>
getEndTimeUnchecked :: (MonadDOM m) => ComputedEffectTiming -> m CSSNumberish
getEndTimeUnchecked self = liftDOM ((pFromJSVal <$> (js_getEndTime (self))))

foreign import javascript safe "(($1, $2) => { $1[\"activeDuration\"] = $2; })"
        js_setActiveDuration :: ComputedEffectTiming -> CSSNumberish -> IO ()
-- | <https://drafts.csswg.org/web-animations-2/#dom-computedeffecttiming-activeduration ComputedEffectTiming.activeDuration specification>
setActiveDuration :: (MonadDOM m, IsCSSNumberish val) => ComputedEffectTiming -> val -> m ()
setActiveDuration self val = liftDOM (void ((js_setActiveDuration (self) (Types.toCSSNumberish val))))

foreign import javascript unsafe "(($1) => { return $1[\"activeDuration\"]; })"
        js_getActiveDuration :: ComputedEffectTiming -> IO JSVal
-- | <https://drafts.csswg.org/web-animations-2/#dom-computedeffecttiming-activeduration ComputedEffectTiming.activeDuration specification>
getActiveDuration :: (MonadDOM m) => ComputedEffectTiming -> m (Maybe CSSNumberish)
getActiveDuration self = liftDOM (((js_getActiveDuration (self)) >>= fromJSValUnchecked))

-- | <https://drafts.csswg.org/web-animations-2/#dom-computedeffecttiming-activeduration ComputedEffectTiming.activeDuration specification>
getActiveDurationUnsafe :: (MonadDOM m, HasCallStack) => ComputedEffectTiming -> m CSSNumberish
getActiveDurationUnsafe self = liftDOM ((((js_getActiveDuration (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/web-animations-2/#dom-computedeffecttiming-activeduration ComputedEffectTiming.activeDuration specification>
getActiveDurationUnchecked :: (MonadDOM m) => ComputedEffectTiming -> m CSSNumberish
getActiveDurationUnchecked self = liftDOM ((pFromJSVal <$> (js_getActiveDuration (self))))

foreign import javascript safe "(($1, $2) => { $1[\"localTime\"] = $2; })"
        js_setLocalTime :: ComputedEffectTiming -> JSVal -> IO ()
-- | <https://drafts.csswg.org/web-animations-2/#dom-computedeffecttiming-localtime ComputedEffectTiming.localTime specification>
setLocalTime :: (MonadDOM m, IsCSSNumberish val) => ComputedEffectTiming -> Maybe val -> m ()
setLocalTime self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setLocalTime (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"localTime\"]; })"
        js_getLocalTime :: ComputedEffectTiming -> IO JSVal
-- | <https://drafts.csswg.org/web-animations-2/#dom-computedeffecttiming-localtime ComputedEffectTiming.localTime specification>
getLocalTime :: (MonadDOM m) => ComputedEffectTiming -> m (Maybe CSSNumberish)
getLocalTime self = liftDOM (((js_getLocalTime (self)) >>= fromJSValUnchecked))

-- | <https://drafts.csswg.org/web-animations-2/#dom-computedeffecttiming-localtime ComputedEffectTiming.localTime specification>
getLocalTimeUnsafe :: (MonadDOM m, HasCallStack) => ComputedEffectTiming -> m CSSNumberish
getLocalTimeUnsafe self = liftDOM ((((js_getLocalTime (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/web-animations-2/#dom-computedeffecttiming-localtime ComputedEffectTiming.localTime specification>
getLocalTimeUnchecked :: (MonadDOM m) => ComputedEffectTiming -> m CSSNumberish
getLocalTimeUnchecked self = liftDOM ((pFromJSVal <$> (js_getLocalTime (self))))