GPUCanvasContext.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from webgpu (webref). Do not edit.
module JSDOM.Generated.GPUCanvasContext
       (configure, getConfiguration, getConfiguration_, getConfigurationUnsafe, getConfigurationUnchecked, getCurrentTexture, getCurrentTexture_, unconfigure, getCanvas, GPUCanvasContext(..), gTypeGPUCanvasContext)
       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://developer.mozilla.org/docs/Web/API/GPUCanvasContext/configure MDN GPUCanvasContext.configure documentation>
configure :: (MonadDOM m) => GPUCanvasContext -> GPUCanvasConfiguration -> m ()
configure self configuration = liftDOM (void (self ^. jsf "configure" [toJSVal configuration]))

-- | <https://developer.mozilla.org/docs/Web/API/GPUCanvasContext/getConfiguration MDN GPUCanvasContext.getConfiguration documentation>
getConfiguration :: (MonadDOM m) => GPUCanvasContext -> m (Maybe GPUCanvasConfiguration)
getConfiguration self = liftDOM (((self ^. jsf "getConfiguration" ()) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/GPUCanvasContext/getConfiguration MDN GPUCanvasContext.getConfiguration documentation>
getConfiguration_ :: (MonadDOM m) => GPUCanvasContext -> m ()
getConfiguration_ self = liftDOM (void (self ^. jsf "getConfiguration" ()))

-- | <https://developer.mozilla.org/docs/Web/API/GPUCanvasContext/getConfiguration MDN GPUCanvasContext.getConfiguration documentation>
getConfigurationUnsafe :: (MonadDOM m, HasCallStack) => GPUCanvasContext -> m GPUCanvasConfiguration
getConfigurationUnsafe self = liftDOM ((((self ^. jsf "getConfiguration" ()) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/GPUCanvasContext/getConfiguration MDN GPUCanvasContext.getConfiguration documentation>
getConfigurationUnchecked :: (MonadDOM m) => GPUCanvasContext -> m GPUCanvasConfiguration
getConfigurationUnchecked self = liftDOM (((self ^. jsf "getConfiguration" ()) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/GPUCanvasContext/getCurrentTexture MDN GPUCanvasContext.getCurrentTexture documentation>
getCurrentTexture :: (MonadDOM m) => GPUCanvasContext -> m GPUTexture
getCurrentTexture self = liftDOM (((self ^. jsf "getCurrentTexture" ()) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/GPUCanvasContext/getCurrentTexture MDN GPUCanvasContext.getCurrentTexture documentation>
getCurrentTexture_ :: (MonadDOM m) => GPUCanvasContext -> m ()
getCurrentTexture_ self = liftDOM (void (self ^. jsf "getCurrentTexture" ()))

-- | <https://developer.mozilla.org/docs/Web/API/GPUCanvasContext/unconfigure MDN GPUCanvasContext.unconfigure documentation>
unconfigure :: (MonadDOM m) => GPUCanvasContext -> m ()
unconfigure self = liftDOM (void (self ^. jsf "unconfigure" ()))

-- | <https://developer.mozilla.org/docs/Web/API/GPUCanvasContext/canvas MDN GPUCanvasContext.canvas documentation>
getCanvas :: (MonadDOM m) => GPUCanvasContext -> m HTMLCanvasElementOrOffscreenCanvas
getCanvas self = liftDOM (((self ^. js "canvas") >>= fromJSValUnchecked))