{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-} module GHCJS.DOM.JSFFI.MediaStreamTrack ( module Generated , js_getSources , getSources ) where import Control.Monad.IO.Class (MonadIO(..)) import GHCJS.Types (JSRef) import GHCJS.Marshal (fromJSRefUnchecked) import GHCJS.DOM.Types import GHCJS.DOM.JSFFI.Generated.MediaStreamTrack as Generated hiding (js_getSources, getSources) foreign import javascript interruptible "$1[\"getSources\"]($c);" js_getSources :: MediaStreamTrack -> IO JSRef -- | getSources :: (MonadIO m, IsMediaStreamTrack self) => self -> m [Maybe SourceInfo] getSources self = liftIO $ js_getSources (toMediaStreamTrack self) >>= fromJSRefUnchecked