packages feed

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

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from cssom-view-1 (webref). Do not edit.
module JSDOM.Generated.CheckVisibilityOptions
       (newCheckVisibilityOptions, setCheckOpacity, getCheckOpacity, getCheckOpacityUnsafe, getCheckOpacityUnchecked, setCheckVisibilityCSS, getCheckVisibilityCSS, getCheckVisibilityCSSUnsafe, getCheckVisibilityCSSUnchecked, setContentVisibilityAuto, getContentVisibilityAuto, getContentVisibilityAutoUnsafe, getContentVisibilityAutoUnchecked, setOpacityProperty, getOpacityProperty, getOpacityPropertyUnsafe, getOpacityPropertyUnchecked, setVisibilityProperty, getVisibilityProperty, getVisibilityPropertyUnsafe, getVisibilityPropertyUnchecked, CheckVisibilityOptions(..), gTypeCheckVisibilityOptions)
       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://drafts.csswg.org/cssom-view-1/#dictdef-checkvisibilityoptions CheckVisibilityOptions specification>
newCheckVisibilityOptions :: (MonadDOM m) => m CheckVisibilityOptions
newCheckVisibilityOptions = liftDOM ((((new (jsg "Object") () >>= \o -> P.return o)) >>= fromJSValUnchecked))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-checkopacity CheckVisibilityOptions.checkOpacity specification>
setCheckOpacity :: (MonadDOM m) => CheckVisibilityOptions -> Bool -> m ()
setCheckOpacity self val = liftDOM (void (self ^. jss "checkOpacity" (toJSVal val)))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-checkopacity CheckVisibilityOptions.checkOpacity specification>
getCheckOpacity :: (MonadDOM m) => CheckVisibilityOptions -> m (Maybe Bool)
getCheckOpacity self = liftDOM (((self ^. js "checkOpacity") >>= fromJSValUnchecked))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-checkopacity CheckVisibilityOptions.checkOpacity specification>
getCheckOpacityUnsafe :: (MonadDOM m, HasCallStack) => CheckVisibilityOptions -> m Bool
getCheckOpacityUnsafe self = liftDOM ((((self ^. js "checkOpacity") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-checkopacity CheckVisibilityOptions.checkOpacity specification>
getCheckOpacityUnchecked :: (MonadDOM m) => CheckVisibilityOptions -> m Bool
getCheckOpacityUnchecked self = liftDOM (((self ^. js "checkOpacity") >>= valToBool))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-checkvisibilitycss CheckVisibilityOptions.checkVisibilityCSS specification>
setCheckVisibilityCSS :: (MonadDOM m) => CheckVisibilityOptions -> Bool -> m ()
setCheckVisibilityCSS self val = liftDOM (void (self ^. jss "checkVisibilityCSS" (toJSVal val)))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-checkvisibilitycss CheckVisibilityOptions.checkVisibilityCSS specification>
getCheckVisibilityCSS :: (MonadDOM m) => CheckVisibilityOptions -> m (Maybe Bool)
getCheckVisibilityCSS self = liftDOM (((self ^. js "checkVisibilityCSS") >>= fromJSValUnchecked))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-checkvisibilitycss CheckVisibilityOptions.checkVisibilityCSS specification>
getCheckVisibilityCSSUnsafe :: (MonadDOM m, HasCallStack) => CheckVisibilityOptions -> m Bool
getCheckVisibilityCSSUnsafe self = liftDOM ((((self ^. js "checkVisibilityCSS") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-checkvisibilitycss CheckVisibilityOptions.checkVisibilityCSS specification>
getCheckVisibilityCSSUnchecked :: (MonadDOM m) => CheckVisibilityOptions -> m Bool
getCheckVisibilityCSSUnchecked self = liftDOM (((self ^. js "checkVisibilityCSS") >>= valToBool))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-contentvisibilityauto CheckVisibilityOptions.contentVisibilityAuto specification>
setContentVisibilityAuto :: (MonadDOM m) => CheckVisibilityOptions -> Bool -> m ()
setContentVisibilityAuto self val = liftDOM (void (self ^. jss "contentVisibilityAuto" (toJSVal val)))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-contentvisibilityauto CheckVisibilityOptions.contentVisibilityAuto specification>
getContentVisibilityAuto :: (MonadDOM m) => CheckVisibilityOptions -> m (Maybe Bool)
getContentVisibilityAuto self = liftDOM (((self ^. js "contentVisibilityAuto") >>= fromJSValUnchecked))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-contentvisibilityauto CheckVisibilityOptions.contentVisibilityAuto specification>
getContentVisibilityAutoUnsafe :: (MonadDOM m, HasCallStack) => CheckVisibilityOptions -> m Bool
getContentVisibilityAutoUnsafe self = liftDOM ((((self ^. js "contentVisibilityAuto") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-contentvisibilityauto CheckVisibilityOptions.contentVisibilityAuto specification>
getContentVisibilityAutoUnchecked :: (MonadDOM m) => CheckVisibilityOptions -> m Bool
getContentVisibilityAutoUnchecked self = liftDOM (((self ^. js "contentVisibilityAuto") >>= valToBool))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-opacityproperty CheckVisibilityOptions.opacityProperty specification>
setOpacityProperty :: (MonadDOM m) => CheckVisibilityOptions -> Bool -> m ()
setOpacityProperty self val = liftDOM (void (self ^. jss "opacityProperty" (toJSVal val)))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-opacityproperty CheckVisibilityOptions.opacityProperty specification>
getOpacityProperty :: (MonadDOM m) => CheckVisibilityOptions -> m (Maybe Bool)
getOpacityProperty self = liftDOM (((self ^. js "opacityProperty") >>= fromJSValUnchecked))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-opacityproperty CheckVisibilityOptions.opacityProperty specification>
getOpacityPropertyUnsafe :: (MonadDOM m, HasCallStack) => CheckVisibilityOptions -> m Bool
getOpacityPropertyUnsafe self = liftDOM ((((self ^. js "opacityProperty") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-opacityproperty CheckVisibilityOptions.opacityProperty specification>
getOpacityPropertyUnchecked :: (MonadDOM m) => CheckVisibilityOptions -> m Bool
getOpacityPropertyUnchecked self = liftDOM (((self ^. js "opacityProperty") >>= valToBool))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-visibilityproperty CheckVisibilityOptions.visibilityProperty specification>
setVisibilityProperty :: (MonadDOM m) => CheckVisibilityOptions -> Bool -> m ()
setVisibilityProperty self val = liftDOM (void (self ^. jss "visibilityProperty" (toJSVal val)))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-visibilityproperty CheckVisibilityOptions.visibilityProperty specification>
getVisibilityProperty :: (MonadDOM m) => CheckVisibilityOptions -> m (Maybe Bool)
getVisibilityProperty self = liftDOM (((self ^. js "visibilityProperty") >>= fromJSValUnchecked))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-visibilityproperty CheckVisibilityOptions.visibilityProperty specification>
getVisibilityPropertyUnsafe :: (MonadDOM m, HasCallStack) => CheckVisibilityOptions -> m Bool
getVisibilityPropertyUnsafe self = liftDOM ((((self ^. js "visibilityProperty") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/cssom-view-1/#dom-checkvisibilityoptions-visibilityproperty CheckVisibilityOptions.visibilityProperty specification>
getVisibilityPropertyUnchecked :: (MonadDOM m) => CheckVisibilityOptions -> m Bool
getVisibilityPropertyUnchecked self = liftDOM (((self ^. js "visibilityProperty") >>= valToBool))