RTCTrackEvent.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from webrtc (webref). Do not edit.
module JSDOM.Generated.RTCTrackEvent
       (newRTCTrackEvent, getReceiver, getTrack, getStreams, getTransceiver, RTCTrackEvent(..), gTypeRTCTrackEvent)
       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/RTCTrackEvent/RTCTrackEvent MDN RTCTrackEvent. documentation>
newRTCTrackEvent :: (MonadDOM m, ToJSString type') => type' -> RTCTrackEventInit -> m RTCTrackEvent
newRTCTrackEvent type' eventInitDict = liftDOM (((new (jsg "RTCTrackEvent") [toJSVal type', toJSVal eventInitDict]) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/RTCTrackEvent/receiver MDN RTCTrackEvent.receiver documentation>
getReceiver :: (MonadDOM m) => RTCTrackEvent -> m RTCRtpReceiver
getReceiver self = liftDOM (((self ^. js "receiver") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/RTCTrackEvent/track MDN RTCTrackEvent.track documentation>
getTrack :: (MonadDOM m) => RTCTrackEvent -> m MediaStreamTrack
getTrack self = liftDOM (((self ^. js "track") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/RTCTrackEvent/streams MDN RTCTrackEvent.streams documentation>
getStreams :: (MonadDOM m) => RTCTrackEvent -> m [MediaStream]
getStreams self = liftDOM (((self ^. js "streams") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/RTCTrackEvent/transceiver MDN RTCTrackEvent.transceiver documentation>
getTransceiver :: (MonadDOM m) => RTCTrackEvent -> m RTCRtpTransceiver
getTransceiver self = liftDOM (((self ^. js "transceiver") >>= fromJSValUnchecked))