{-# LANGUAGE CPP #-}
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
module GHCJS.DOM.Geolocation
       (ghcjs_dom_geolocation_clear_watch, geolocationClearWatch,
        Geolocation, IsGeolocation, castToGeolocation, gTypeGeolocation,
        toGeolocation)
       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[\"clearWatch\"]($2)"
        ghcjs_dom_geolocation_clear_watch ::
        JSRef Geolocation -> Int -> IO ()
 
geolocationClearWatch ::
                      (IsGeolocation self) => self -> Int -> IO ()
geolocationClearWatch self watchID
  = ghcjs_dom_geolocation_clear_watch
      (unGeolocation (toGeolocation self))
      watchID
#else
module GHCJS.DOM.Geolocation (
  module Graphics.UI.Gtk.WebKit.DOM.Geolocation
  ) where
import Graphics.UI.Gtk.WebKit.DOM.Geolocation
#endif