ConstrainBooleanParameters.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from mediacapture-streams (webref). Do not edit.
module JSDOM.Generated.ConstrainBooleanParameters
       (newConstrainBooleanParameters, setExact, getExact, getExactUnsafe, getExactUnchecked, setIdeal, getIdeal, getIdealUnsafe, getIdealUnchecked, ConstrainBooleanParameters(..), gTypeConstrainBooleanParameters)
       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://w3c.github.io/mediacapture-main/#dom-constrainbooleanparameters ConstrainBooleanParameters specification>
newConstrainBooleanParameters :: (MonadDOM m) => m ConstrainBooleanParameters
newConstrainBooleanParameters = liftDOM ((((new (jsg "Object") () >>= \o -> P.return o)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/mediacapture-main/#dom-constrainbooleanparameters-exact ConstrainBooleanParameters.exact specification>
setExact :: (MonadDOM m) => ConstrainBooleanParameters -> Bool -> m ()
setExact self val = liftDOM (void (self ^. jss "exact" (toJSVal val)))

-- | <https://w3c.github.io/mediacapture-main/#dom-constrainbooleanparameters-exact ConstrainBooleanParameters.exact specification>
getExact :: (MonadDOM m) => ConstrainBooleanParameters -> m (Maybe Bool)
getExact self = liftDOM (((self ^. js "exact") >>= fromJSValUnchecked))

-- | <https://w3c.github.io/mediacapture-main/#dom-constrainbooleanparameters-exact ConstrainBooleanParameters.exact specification>
getExactUnsafe :: (MonadDOM m, HasCallStack) => ConstrainBooleanParameters -> m Bool
getExactUnsafe self = liftDOM ((((self ^. js "exact") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/mediacapture-main/#dom-constrainbooleanparameters-exact ConstrainBooleanParameters.exact specification>
getExactUnchecked :: (MonadDOM m) => ConstrainBooleanParameters -> m Bool
getExactUnchecked self = liftDOM (((self ^. js "exact") >>= valToBool))

-- | <https://w3c.github.io/mediacapture-main/#dom-constrainbooleanparameters-ideal ConstrainBooleanParameters.ideal specification>
setIdeal :: (MonadDOM m) => ConstrainBooleanParameters -> Bool -> m ()
setIdeal self val = liftDOM (void (self ^. jss "ideal" (toJSVal val)))

-- | <https://w3c.github.io/mediacapture-main/#dom-constrainbooleanparameters-ideal ConstrainBooleanParameters.ideal specification>
getIdeal :: (MonadDOM m) => ConstrainBooleanParameters -> m (Maybe Bool)
getIdeal self = liftDOM (((self ^. js "ideal") >>= fromJSValUnchecked))

-- | <https://w3c.github.io/mediacapture-main/#dom-constrainbooleanparameters-ideal ConstrainBooleanParameters.ideal specification>
getIdealUnsafe :: (MonadDOM m, HasCallStack) => ConstrainBooleanParameters -> m Bool
getIdealUnsafe self = liftDOM ((((self ^. js "ideal") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/mediacapture-main/#dom-constrainbooleanparameters-ideal ConstrainBooleanParameters.ideal specification>
getIdealUnchecked :: (MonadDOM m) => ConstrainBooleanParameters -> m Bool
getIdealUnchecked self = liftDOM (((self ^. js "ideal") >>= valToBool))