{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module JSDOM.Generated.RTCIceCandidate
(newRTCIceCandidate, getCandidate, getSdpMid, getSdpMidUnsafe,
getSdpMidUnchecked, getSdpMLineIndex, getSdpMLineIndexUnsafe,
getSdpMLineIndexUnchecked, RTCIceCandidate(..),
gTypeRTCIceCandidate)
where
import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, realToFrac, fmap, Show, Read, Eq, Ord, Maybe(..))
import qualified Prelude (error)
import Data.Typeable (Typeable)
import Data.Traversable (mapM)
import Language.Javascript.JSaddle (JSM(..), JSVal(..), JSString, strictEqual, toJSVal, valToStr, valToNumber, valToBool, js, jss, jsf, jsg, function, asyncFunction, new, array, jsUndefined, (!), (!!))
import Data.Int (Int64)
import Data.Word (Word, Word64)
import JSDOM.Types
import Control.Applicative ((<$>))
import Control.Monad (void)
import Control.Lens.Operators ((^.))
import JSDOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import JSDOM.Enums
newRTCIceCandidate ::
(MonadDOM m) => RTCIceCandidateInit -> m RTCIceCandidate
newRTCIceCandidate candidateInitDict
= liftDOM
(RTCIceCandidate <$>
new (jsg "RTCIceCandidate") [toJSVal candidateInitDict])
getCandidate ::
(MonadDOM m, FromJSString result) => RTCIceCandidate -> m result
getCandidate self
= liftDOM ((self ^. js "candidate") >>= fromJSValUnchecked)
getSdpMid ::
(MonadDOM m, FromJSString result) =>
RTCIceCandidate -> m (Maybe result)
getSdpMid self
= liftDOM ((self ^. js "sdpMid") >>= fromMaybeJSString)
getSdpMidUnsafe ::
(MonadDOM m, HasCallStack, FromJSString result) =>
RTCIceCandidate -> m result
getSdpMidUnsafe self
= liftDOM
(((self ^. js "sdpMid") >>= fromMaybeJSString) >>=
maybe (Prelude.error "Nothing to return") return)
getSdpMidUnchecked ::
(MonadDOM m, FromJSString result) => RTCIceCandidate -> m result
getSdpMidUnchecked self
= liftDOM ((self ^. js "sdpMid") >>= fromJSValUnchecked)
getSdpMLineIndex ::
(MonadDOM m) => RTCIceCandidate -> m (Maybe Word)
getSdpMLineIndex self
= liftDOM ((self ^. js "sdpMLineIndex") >>= fromJSVal)
getSdpMLineIndexUnsafe ::
(MonadDOM m, HasCallStack) => RTCIceCandidate -> m Word
getSdpMLineIndexUnsafe self
= liftDOM
(((self ^. js "sdpMLineIndex") >>= fromJSVal) >>=
maybe (Prelude.error "Nothing to return") return)
getSdpMLineIndexUnchecked ::
(MonadDOM m) => RTCIceCandidate -> m Word
getSdpMLineIndexUnchecked self
= liftDOM ((self ^. js "sdpMLineIndex") >>= fromJSValUnchecked)