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

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from webgpu (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.GPUBlendComponent
       (js_newGPUBlendComponent, js_setOperation, js_getOperation, js_setSrcFactor, js_getSrcFactor, js_setDstFactor, js_getDstFactor, newGPUBlendComponent, setOperation, getOperation, getOperationUnsafe, getOperationUnchecked, setSrcFactor, getSrcFactor, getSrcFactorUnsafe, getSrcFactorUnchecked, setDstFactor, getDstFactor, getDstFactorUnsafe, getDstFactorUnchecked, GPUBlendComponent(..), gTypeGPUBlendComponent)
       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_newGPUBlendComponent :: IO GPUBlendComponent
-- | <https://gpuweb.github.io/gpuweb/#dictdef-gpublendcomponent GPUBlendComponent specification>
newGPUBlendComponent :: (MonadDOM m) => m GPUBlendComponent
newGPUBlendComponent = liftDOM ((js_newGPUBlendComponent))

foreign import javascript safe "(($1, $2) => { $1[\"operation\"] = $2; })"
        js_setOperation :: GPUBlendComponent -> JSVal -> IO ()
-- | <https://gpuweb.github.io/gpuweb/#dom-gpublendcomponent-operation GPUBlendComponent.operation specification>
setOperation :: (MonadDOM m) => GPUBlendComponent -> GPUBlendOperation -> m ()
setOperation self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setOperation (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"operation\"]; })"
        js_getOperation :: GPUBlendComponent -> IO JSVal
-- | <https://gpuweb.github.io/gpuweb/#dom-gpublendcomponent-operation GPUBlendComponent.operation specification>
getOperation :: (MonadDOM m) => GPUBlendComponent -> m (Maybe GPUBlendOperation)
getOperation self = liftDOM (((js_getOperation (self)) >>= fromJSValUnchecked))

-- | <https://gpuweb.github.io/gpuweb/#dom-gpublendcomponent-operation GPUBlendComponent.operation specification>
getOperationUnsafe :: (MonadDOM m, HasCallStack) => GPUBlendComponent -> m GPUBlendOperation
getOperationUnsafe self = liftDOM ((((js_getOperation (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://gpuweb.github.io/gpuweb/#dom-gpublendcomponent-operation GPUBlendComponent.operation specification>
getOperationUnchecked :: (MonadDOM m) => GPUBlendComponent -> m GPUBlendOperation
getOperationUnchecked self = liftDOM ((pFromJSVal <$> (js_getOperation (self))))

foreign import javascript safe "(($1, $2) => { $1[\"srcFactor\"] = $2; })"
        js_setSrcFactor :: GPUBlendComponent -> JSVal -> IO ()
-- | <https://gpuweb.github.io/gpuweb/#dom-gpublendcomponent-srcfactor GPUBlendComponent.srcFactor specification>
setSrcFactor :: (MonadDOM m) => GPUBlendComponent -> GPUBlendFactor -> m ()
setSrcFactor self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setSrcFactor (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"srcFactor\"]; })"
        js_getSrcFactor :: GPUBlendComponent -> IO JSVal
-- | <https://gpuweb.github.io/gpuweb/#dom-gpublendcomponent-srcfactor GPUBlendComponent.srcFactor specification>
getSrcFactor :: (MonadDOM m) => GPUBlendComponent -> m (Maybe GPUBlendFactor)
getSrcFactor self = liftDOM (((js_getSrcFactor (self)) >>= fromJSValUnchecked))

-- | <https://gpuweb.github.io/gpuweb/#dom-gpublendcomponent-srcfactor GPUBlendComponent.srcFactor specification>
getSrcFactorUnsafe :: (MonadDOM m, HasCallStack) => GPUBlendComponent -> m GPUBlendFactor
getSrcFactorUnsafe self = liftDOM ((((js_getSrcFactor (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://gpuweb.github.io/gpuweb/#dom-gpublendcomponent-srcfactor GPUBlendComponent.srcFactor specification>
getSrcFactorUnchecked :: (MonadDOM m) => GPUBlendComponent -> m GPUBlendFactor
getSrcFactorUnchecked self = liftDOM ((pFromJSVal <$> (js_getSrcFactor (self))))

foreign import javascript safe "(($1, $2) => { $1[\"dstFactor\"] = $2; })"
        js_setDstFactor :: GPUBlendComponent -> JSVal -> IO ()
-- | <https://gpuweb.github.io/gpuweb/#dom-gpublendcomponent-dstfactor GPUBlendComponent.dstFactor specification>
setDstFactor :: (MonadDOM m) => GPUBlendComponent -> GPUBlendFactor -> m ()
setDstFactor self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setDstFactor (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"dstFactor\"]; })"
        js_getDstFactor :: GPUBlendComponent -> IO JSVal
-- | <https://gpuweb.github.io/gpuweb/#dom-gpublendcomponent-dstfactor GPUBlendComponent.dstFactor specification>
getDstFactor :: (MonadDOM m) => GPUBlendComponent -> m (Maybe GPUBlendFactor)
getDstFactor self = liftDOM (((js_getDstFactor (self)) >>= fromJSValUnchecked))

-- | <https://gpuweb.github.io/gpuweb/#dom-gpublendcomponent-dstfactor GPUBlendComponent.dstFactor specification>
getDstFactorUnsafe :: (MonadDOM m, HasCallStack) => GPUBlendComponent -> m GPUBlendFactor
getDstFactorUnsafe self = liftDOM ((((js_getDstFactor (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://gpuweb.github.io/gpuweb/#dom-gpublendcomponent-dstfactor GPUBlendComponent.dstFactor specification>
getDstFactorUnchecked :: (MonadDOM m) => GPUBlendComponent -> m GPUBlendFactor
getDstFactorUnchecked self = liftDOM ((pFromJSVal <$> (js_getDstFactor (self))))