#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
module GHCJS.DOM.MediaQueryList
(ghcjs_dom_media_query_list_get_media, mediaQueryListGetMedia,
ghcjs_dom_media_query_list_get_matches, mediaQueryListGetMatches,
MediaQueryList, IsMediaQueryList, castToMediaQueryList,
gTypeMediaQueryList, toMediaQueryList)
where
import GHCJS.Types
import GHCJS.Foreign
import GHCJS.Marshal
import Data.Int
import Data.Word
import GHCJS.DOM.Types
import Control.Applicative ((<$>))
import GHCJS.DOM.EventM
foreign import javascript unsafe "$1[\"media\"]"
ghcjs_dom_media_query_list_get_media ::
JSRef MediaQueryList -> IO JSString
mediaQueryListGetMedia ::
(IsMediaQueryList self, FromJSString result) => self -> IO result
mediaQueryListGetMedia self
= fromJSString <$>
(ghcjs_dom_media_query_list_get_media
(unMediaQueryList (toMediaQueryList self)))
foreign import javascript unsafe "($1[\"matches\"] ? 1 : 0)"
ghcjs_dom_media_query_list_get_matches ::
JSRef MediaQueryList -> IO Bool
mediaQueryListGetMatches ::
(IsMediaQueryList self) => self -> IO Bool
mediaQueryListGetMatches self
= ghcjs_dom_media_query_list_get_matches
(unMediaQueryList (toMediaQueryList self))
#else
module GHCJS.DOM.MediaQueryList (
module Graphics.UI.Gtk.WebKit.DOM.MediaQueryList
) where
import Graphics.UI.Gtk.WebKit.DOM.MediaQueryList
#endif