packages feed

ghcjs-dom-javascript-0.10.0.0: src/GHCJS/DOM/JSFFI/Generated/MouseEventInit.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from pointerevents4 (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.MouseEventInit
       (js_newMouseEventInit, js_setScreenX, js_getScreenX, js_setScreenY, js_getScreenY, js_setClientX, js_getClientX, js_setClientY, js_getClientY, js_setButton, js_getButton, js_setButtons, js_getButtons, js_setRelatedTarget, js_getRelatedTarget, js_setMovementX, js_getMovementX, js_setMovementY, js_getMovementY, newMouseEventInit, setScreenX, getScreenX, getScreenXUnsafe, getScreenXUnchecked, setScreenY, getScreenY, getScreenYUnsafe, getScreenYUnchecked, setClientX, getClientX, getClientXUnsafe, getClientXUnchecked, setClientY, getClientY, getClientYUnsafe, getClientYUnchecked, setButton, getButton, getButtonUnsafe, getButtonUnchecked, setButtons, getButtons, getButtonsUnsafe, getButtonsUnchecked, setRelatedTarget, getRelatedTarget, getRelatedTargetUnsafe, getRelatedTargetUnchecked, setMovementX, getMovementX, getMovementXUnsafe, getMovementXUnchecked, setMovementY, getMovementY, getMovementYUnsafe, getMovementYUnchecked, MouseEventInit(..), gTypeMouseEventInit, IsMouseEventInit, toMouseEventInit)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import GHCJS.Types (JSVal, JSString)
import GHCJS.Foreign (jsUndefined, jsNull)
import GHCJS.DOM.Types
import qualified GHCJS.DOM.Types as Types
import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import GHCJS.DOM.JSFFI.Generated.Enums

foreign import javascript safe "(() => { return ({}); })"
        js_newMouseEventInit :: IO MouseEventInit
-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit MouseEventInit specification>
newMouseEventInit :: (MonadDOM m) => m MouseEventInit
newMouseEventInit = liftDOM ((js_newMouseEventInit))

foreign import javascript safe "(($1, $2) => { $1[\"screenX\"] = $2; })"
        js_setScreenX :: MouseEventInit -> Int -> IO ()
-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-screenx MouseEventInit.screenX specification>
setScreenX :: (MonadDOM m, IsMouseEventInit self) => self -> Int -> m ()
setScreenX self val = liftDOM (void ((js_setScreenX ((Types.toMouseEventInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"screenX\"]; })"
        js_getScreenX :: MouseEventInit -> IO JSVal
-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-screenx MouseEventInit.screenX specification>
getScreenX :: (MonadDOM m, IsMouseEventInit self) => self -> m (Maybe Int)
getScreenX self = liftDOM (((js_getScreenX ((Types.toMouseEventInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-screenx MouseEventInit.screenX specification>
getScreenXUnsafe :: (MonadDOM m, IsMouseEventInit self, HasCallStack) => self -> m Int
getScreenXUnsafe self = liftDOM ((((js_getScreenX ((Types.toMouseEventInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-screenx MouseEventInit.screenX specification>
getScreenXUnchecked :: (MonadDOM m, IsMouseEventInit self) => self -> m Int
getScreenXUnchecked self = liftDOM ((pFromJSVal <$> (js_getScreenX ((Types.toMouseEventInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"screenY\"] = $2; })"
        js_setScreenY :: MouseEventInit -> Int -> IO ()
-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-screeny MouseEventInit.screenY specification>
setScreenY :: (MonadDOM m, IsMouseEventInit self) => self -> Int -> m ()
setScreenY self val = liftDOM (void ((js_setScreenY ((Types.toMouseEventInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"screenY\"]; })"
        js_getScreenY :: MouseEventInit -> IO JSVal
-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-screeny MouseEventInit.screenY specification>
getScreenY :: (MonadDOM m, IsMouseEventInit self) => self -> m (Maybe Int)
getScreenY self = liftDOM (((js_getScreenY ((Types.toMouseEventInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-screeny MouseEventInit.screenY specification>
getScreenYUnsafe :: (MonadDOM m, IsMouseEventInit self, HasCallStack) => self -> m Int
getScreenYUnsafe self = liftDOM ((((js_getScreenY ((Types.toMouseEventInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-screeny MouseEventInit.screenY specification>
getScreenYUnchecked :: (MonadDOM m, IsMouseEventInit self) => self -> m Int
getScreenYUnchecked self = liftDOM ((pFromJSVal <$> (js_getScreenY ((Types.toMouseEventInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"clientX\"] = $2; })"
        js_setClientX :: MouseEventInit -> Int -> IO ()
-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-clientx MouseEventInit.clientX specification>
setClientX :: (MonadDOM m, IsMouseEventInit self) => self -> Int -> m ()
setClientX self val = liftDOM (void ((js_setClientX ((Types.toMouseEventInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"clientX\"]; })"
        js_getClientX :: MouseEventInit -> IO JSVal
-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-clientx MouseEventInit.clientX specification>
getClientX :: (MonadDOM m, IsMouseEventInit self) => self -> m (Maybe Int)
getClientX self = liftDOM (((js_getClientX ((Types.toMouseEventInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-clientx MouseEventInit.clientX specification>
getClientXUnsafe :: (MonadDOM m, IsMouseEventInit self, HasCallStack) => self -> m Int
getClientXUnsafe self = liftDOM ((((js_getClientX ((Types.toMouseEventInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-clientx MouseEventInit.clientX specification>
getClientXUnchecked :: (MonadDOM m, IsMouseEventInit self) => self -> m Int
getClientXUnchecked self = liftDOM ((pFromJSVal <$> (js_getClientX ((Types.toMouseEventInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"clientY\"] = $2; })"
        js_setClientY :: MouseEventInit -> Int -> IO ()
-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-clienty MouseEventInit.clientY specification>
setClientY :: (MonadDOM m, IsMouseEventInit self) => self -> Int -> m ()
setClientY self val = liftDOM (void ((js_setClientY ((Types.toMouseEventInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"clientY\"]; })"
        js_getClientY :: MouseEventInit -> IO JSVal
-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-clienty MouseEventInit.clientY specification>
getClientY :: (MonadDOM m, IsMouseEventInit self) => self -> m (Maybe Int)
getClientY self = liftDOM (((js_getClientY ((Types.toMouseEventInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-clienty MouseEventInit.clientY specification>
getClientYUnsafe :: (MonadDOM m, IsMouseEventInit self, HasCallStack) => self -> m Int
getClientYUnsafe self = liftDOM ((((js_getClientY ((Types.toMouseEventInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-clienty MouseEventInit.clientY specification>
getClientYUnchecked :: (MonadDOM m, IsMouseEventInit self) => self -> m Int
getClientYUnchecked self = liftDOM ((pFromJSVal <$> (js_getClientY ((Types.toMouseEventInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"button\"] = $2; })"
        js_setButton :: MouseEventInit -> Int -> IO ()
-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-button MouseEventInit.button specification>
setButton :: (MonadDOM m, IsMouseEventInit self) => self -> Int -> m ()
setButton self val = liftDOM (void ((js_setButton ((Types.toMouseEventInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"button\"]; })"
        js_getButton :: MouseEventInit -> IO JSVal
-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-button MouseEventInit.button specification>
getButton :: (MonadDOM m, IsMouseEventInit self) => self -> m (Maybe Int)
getButton self = liftDOM (((js_getButton ((Types.toMouseEventInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-button MouseEventInit.button specification>
getButtonUnsafe :: (MonadDOM m, IsMouseEventInit self, HasCallStack) => self -> m Int
getButtonUnsafe self = liftDOM ((((js_getButton ((Types.toMouseEventInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-button MouseEventInit.button specification>
getButtonUnchecked :: (MonadDOM m, IsMouseEventInit self) => self -> m Int
getButtonUnchecked self = liftDOM ((pFromJSVal <$> (js_getButton ((Types.toMouseEventInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"buttons\"] = $2; })"
        js_setButtons :: MouseEventInit -> Word -> IO ()
-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-buttons MouseEventInit.buttons specification>
setButtons :: (MonadDOM m, IsMouseEventInit self) => self -> Word -> m ()
setButtons self val = liftDOM (void ((js_setButtons ((Types.toMouseEventInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"buttons\"]; })"
        js_getButtons :: MouseEventInit -> IO JSVal
-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-buttons MouseEventInit.buttons specification>
getButtons :: (MonadDOM m, IsMouseEventInit self) => self -> m (Maybe Word)
getButtons self = liftDOM (((js_getButtons ((Types.toMouseEventInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-buttons MouseEventInit.buttons specification>
getButtonsUnsafe :: (MonadDOM m, IsMouseEventInit self, HasCallStack) => self -> m Word
getButtonsUnsafe self = liftDOM ((((js_getButtons ((Types.toMouseEventInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-buttons MouseEventInit.buttons specification>
getButtonsUnchecked :: (MonadDOM m, IsMouseEventInit self) => self -> m Word
getButtonsUnchecked self = liftDOM ((pFromJSVal <$> (js_getButtons ((Types.toMouseEventInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"relatedTarget\"] = $2; })"
        js_setRelatedTarget :: MouseEventInit -> JSVal -> IO ()
-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-relatedtarget MouseEventInit.relatedTarget specification>
setRelatedTarget :: (MonadDOM m, IsMouseEventInit self, IsEventTarget val) => self -> Maybe val -> m ()
setRelatedTarget self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setRelatedTarget ((Types.toMouseEventInit self)) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"relatedTarget\"]; })"
        js_getRelatedTarget :: MouseEventInit -> IO JSVal
-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-relatedtarget MouseEventInit.relatedTarget specification>
getRelatedTarget :: (MonadDOM m, IsMouseEventInit self) => self -> m (Maybe EventTarget)
getRelatedTarget self = liftDOM (((js_getRelatedTarget ((Types.toMouseEventInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-relatedtarget MouseEventInit.relatedTarget specification>
getRelatedTargetUnsafe :: (MonadDOM m, IsMouseEventInit self, HasCallStack) => self -> m EventTarget
getRelatedTargetUnsafe self = liftDOM ((((js_getRelatedTarget ((Types.toMouseEventInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/pointerevents/#dom-mouseeventinit-relatedtarget MouseEventInit.relatedTarget specification>
getRelatedTargetUnchecked :: (MonadDOM m, IsMouseEventInit self) => self -> m EventTarget
getRelatedTargetUnchecked self = liftDOM ((pFromJSVal <$> (js_getRelatedTarget ((Types.toMouseEventInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"movementX\"] = $2; })"
        js_setMovementX :: MouseEventInit -> Double -> IO ()
-- | <https://w3c.github.io/pointerlock/#dom-mouseeventinit-movementx MouseEventInit.movementX specification>
setMovementX :: (MonadDOM m, IsMouseEventInit self) => self -> Double -> m ()
setMovementX self val = liftDOM (void ((js_setMovementX ((Types.toMouseEventInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"movementX\"]; })"
        js_getMovementX :: MouseEventInit -> IO JSVal
-- | <https://w3c.github.io/pointerlock/#dom-mouseeventinit-movementx MouseEventInit.movementX specification>
getMovementX :: (MonadDOM m, IsMouseEventInit self) => self -> m (Maybe Double)
getMovementX self = liftDOM (((js_getMovementX ((Types.toMouseEventInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/pointerlock/#dom-mouseeventinit-movementx MouseEventInit.movementX specification>
getMovementXUnsafe :: (MonadDOM m, IsMouseEventInit self, HasCallStack) => self -> m Double
getMovementXUnsafe self = liftDOM ((((js_getMovementX ((Types.toMouseEventInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/pointerlock/#dom-mouseeventinit-movementx MouseEventInit.movementX specification>
getMovementXUnchecked :: (MonadDOM m, IsMouseEventInit self) => self -> m Double
getMovementXUnchecked self = liftDOM ((pFromJSVal <$> (js_getMovementX ((Types.toMouseEventInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"movementY\"] = $2; })"
        js_setMovementY :: MouseEventInit -> Double -> IO ()
-- | <https://w3c.github.io/pointerlock/#dom-mouseeventinit-movementy MouseEventInit.movementY specification>
setMovementY :: (MonadDOM m, IsMouseEventInit self) => self -> Double -> m ()
setMovementY self val = liftDOM (void ((js_setMovementY ((Types.toMouseEventInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"movementY\"]; })"
        js_getMovementY :: MouseEventInit -> IO JSVal
-- | <https://w3c.github.io/pointerlock/#dom-mouseeventinit-movementy MouseEventInit.movementY specification>
getMovementY :: (MonadDOM m, IsMouseEventInit self) => self -> m (Maybe Double)
getMovementY self = liftDOM (((js_getMovementY ((Types.toMouseEventInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/pointerlock/#dom-mouseeventinit-movementy MouseEventInit.movementY specification>
getMovementYUnsafe :: (MonadDOM m, IsMouseEventInit self, HasCallStack) => self -> m Double
getMovementYUnsafe self = liftDOM ((((js_getMovementY ((Types.toMouseEventInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/pointerlock/#dom-mouseeventinit-movementy MouseEventInit.movementY specification>
getMovementYUnchecked :: (MonadDOM m, IsMouseEventInit self) => self -> m Double
getMovementYUnchecked self = liftDOM ((pFromJSVal <$> (js_getMovementY ((Types.toMouseEventInit self)))))