packages feed

jsaddle-dom-0.10.0.0: src/JSDOM/Generated/GPUDebugCommandsMixin.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.GPUDebugCommandsMixin
       (insertDebugMarker, popDebugGroup, pushDebugGroup, GPUDebugCommandsMixin(..), gTypeGPUDebugCommandsMixin, IsGPUDebugCommandsMixin, toGPUDebugCommandsMixin)
       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/GPUCommandEncoder/insertDebugMarker MDN GPUDebugCommandsMixin.insertDebugMarker documentation>
insertDebugMarker :: (MonadDOM m, IsGPUDebugCommandsMixin self, ToJSString markerLabel) => self -> markerLabel -> m ()
insertDebugMarker self markerLabel = liftDOM (void ((Types.toGPUDebugCommandsMixin self) ^. jsf "insertDebugMarker" [toJSVal markerLabel]))

-- | <https://developer.mozilla.org/docs/Web/API/GPUCommandEncoder/popDebugGroup MDN GPUDebugCommandsMixin.popDebugGroup documentation>
popDebugGroup :: (MonadDOM m, IsGPUDebugCommandsMixin self) => self -> m ()
popDebugGroup self = liftDOM (void ((Types.toGPUDebugCommandsMixin self) ^. jsf "popDebugGroup" ()))

-- | <https://developer.mozilla.org/docs/Web/API/GPUCommandEncoder/pushDebugGroup MDN GPUDebugCommandsMixin.pushDebugGroup documentation>
pushDebugGroup :: (MonadDOM m, IsGPUDebugCommandsMixin self, ToJSString groupLabel) => self -> groupLabel -> m ()
pushDebugGroup self groupLabel = liftDOM (void ((Types.toGPUDebugCommandsMixin self) ^. jsf "pushDebugGroup" [toJSVal groupLabel]))