MediaCapabilitiesEncodingInfo.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from media-capabilities (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.MediaCapabilitiesEncodingInfo
       (js_newMediaCapabilitiesEncodingInfo, js_setConfiguration, js_getConfiguration, newMediaCapabilitiesEncodingInfo, setConfiguration, getConfiguration, MediaCapabilitiesEncodingInfo(..), gTypeMediaCapabilitiesEncodingInfo)
       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 "(($1, $2, $3, $4) => { return ({\"supported\": $1, \"smooth\": $2, \"powerEfficient\": $3, \"configuration\": $4}); })"
        js_newMediaCapabilitiesEncodingInfo :: Bool -> Bool -> Bool -> MediaEncodingConfiguration -> IO MediaCapabilitiesEncodingInfo
-- | <https://w3c.github.io/media-capabilities/#dictdef-mediacapabilitiesencodinginfo MediaCapabilitiesEncodingInfo specification>
newMediaCapabilitiesEncodingInfo :: (MonadDOM m) => Bool -> Bool -> Bool -> MediaEncodingConfiguration -> m MediaCapabilitiesEncodingInfo
newMediaCapabilitiesEncodingInfo supported smooth powerEfficient configuration = liftDOM ((js_newMediaCapabilitiesEncodingInfo (supported) (smooth) (powerEfficient) (configuration)))

foreign import javascript safe "(($1, $2) => { $1[\"configuration\"] = $2; })"
        js_setConfiguration :: MediaCapabilitiesEncodingInfo -> MediaEncodingConfiguration -> IO ()
-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitiesencodinginfo-configuration MediaCapabilitiesEncodingInfo.configuration specification>
setConfiguration :: (MonadDOM m) => MediaCapabilitiesEncodingInfo -> MediaEncodingConfiguration -> m ()
setConfiguration self val = liftDOM (void ((js_setConfiguration (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"configuration\"]; })"
        js_getConfiguration :: MediaCapabilitiesEncodingInfo -> IO MediaEncodingConfiguration
-- | <https://w3c.github.io/media-capabilities/#dom-mediacapabilitiesencodinginfo-configuration MediaCapabilitiesEncodingInfo.configuration specification>
getConfiguration :: (MonadDOM m) => MediaCapabilitiesEncodingInfo -> m MediaEncodingConfiguration
getConfiguration self = liftDOM ((js_getConfiguration (self)))