ghcjs-dom-javascript-0.10.0.0: src/GHCJS/DOM/JSFFI/Generated/WheelEventInit.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.WheelEventInit
       (js_newWheelEventInit, js_setDeltaX, js_getDeltaX, js_setDeltaY, js_getDeltaY, js_setDeltaZ, js_getDeltaZ, js_setDeltaMode, js_getDeltaMode, js_setMomentum, js_getMomentum, newWheelEventInit, setDeltaX, getDeltaX, getDeltaXUnsafe, getDeltaXUnchecked, setDeltaY, getDeltaY, getDeltaYUnsafe, getDeltaYUnchecked, setDeltaZ, getDeltaZ, getDeltaZUnsafe, getDeltaZUnchecked, setDeltaMode, getDeltaMode, getDeltaModeUnsafe, getDeltaModeUnchecked, setMomentum, getMomentum, getMomentumUnsafe, getMomentumUnchecked, WheelEventInit(..), gTypeWheelEventInit)
       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_newWheelEventInit :: IO WheelEventInit
-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit WheelEventInit specification>
newWheelEventInit :: (MonadDOM m) => m WheelEventInit
newWheelEventInit = liftDOM ((js_newWheelEventInit))

foreign import javascript safe "(($1, $2) => { $1[\"deltaX\"] = $2; })"
        js_setDeltaX :: WheelEventInit -> Double -> IO ()
-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-deltax WheelEventInit.deltaX specification>
setDeltaX :: (MonadDOM m) => WheelEventInit -> Double -> m ()
setDeltaX self val = liftDOM (void ((js_setDeltaX (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"deltaX\"]; })"
        js_getDeltaX :: WheelEventInit -> IO JSVal
-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-deltax WheelEventInit.deltaX specification>
getDeltaX :: (MonadDOM m) => WheelEventInit -> m (Maybe Double)
getDeltaX self = liftDOM (((js_getDeltaX (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-deltax WheelEventInit.deltaX specification>
getDeltaXUnsafe :: (MonadDOM m, HasCallStack) => WheelEventInit -> m Double
getDeltaXUnsafe self = liftDOM ((((js_getDeltaX (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-deltax WheelEventInit.deltaX specification>
getDeltaXUnchecked :: (MonadDOM m) => WheelEventInit -> m Double
getDeltaXUnchecked self = liftDOM ((pFromJSVal <$> (js_getDeltaX (self))))

foreign import javascript safe "(($1, $2) => { $1[\"deltaY\"] = $2; })"
        js_setDeltaY :: WheelEventInit -> Double -> IO ()
-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-deltay WheelEventInit.deltaY specification>
setDeltaY :: (MonadDOM m) => WheelEventInit -> Double -> m ()
setDeltaY self val = liftDOM (void ((js_setDeltaY (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"deltaY\"]; })"
        js_getDeltaY :: WheelEventInit -> IO JSVal
-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-deltay WheelEventInit.deltaY specification>
getDeltaY :: (MonadDOM m) => WheelEventInit -> m (Maybe Double)
getDeltaY self = liftDOM (((js_getDeltaY (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-deltay WheelEventInit.deltaY specification>
getDeltaYUnsafe :: (MonadDOM m, HasCallStack) => WheelEventInit -> m Double
getDeltaYUnsafe self = liftDOM ((((js_getDeltaY (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-deltay WheelEventInit.deltaY specification>
getDeltaYUnchecked :: (MonadDOM m) => WheelEventInit -> m Double
getDeltaYUnchecked self = liftDOM ((pFromJSVal <$> (js_getDeltaY (self))))

foreign import javascript safe "(($1, $2) => { $1[\"deltaZ\"] = $2; })"
        js_setDeltaZ :: WheelEventInit -> Double -> IO ()
-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-deltaz WheelEventInit.deltaZ specification>
setDeltaZ :: (MonadDOM m) => WheelEventInit -> Double -> m ()
setDeltaZ self val = liftDOM (void ((js_setDeltaZ (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"deltaZ\"]; })"
        js_getDeltaZ :: WheelEventInit -> IO JSVal
-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-deltaz WheelEventInit.deltaZ specification>
getDeltaZ :: (MonadDOM m) => WheelEventInit -> m (Maybe Double)
getDeltaZ self = liftDOM (((js_getDeltaZ (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-deltaz WheelEventInit.deltaZ specification>
getDeltaZUnsafe :: (MonadDOM m, HasCallStack) => WheelEventInit -> m Double
getDeltaZUnsafe self = liftDOM ((((js_getDeltaZ (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-deltaz WheelEventInit.deltaZ specification>
getDeltaZUnchecked :: (MonadDOM m) => WheelEventInit -> m Double
getDeltaZUnchecked self = liftDOM ((pFromJSVal <$> (js_getDeltaZ (self))))

foreign import javascript safe "(($1, $2) => { $1[\"deltaMode\"] = $2; })"
        js_setDeltaMode :: WheelEventInit -> Word -> IO ()
-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-deltamode WheelEventInit.deltaMode specification>
setDeltaMode :: (MonadDOM m) => WheelEventInit -> Word -> m ()
setDeltaMode self val = liftDOM (void ((js_setDeltaMode (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"deltaMode\"]; })"
        js_getDeltaMode :: WheelEventInit -> IO JSVal
-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-deltamode WheelEventInit.deltaMode specification>
getDeltaMode :: (MonadDOM m) => WheelEventInit -> m (Maybe Word)
getDeltaMode self = liftDOM (((js_getDeltaMode (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-deltamode WheelEventInit.deltaMode specification>
getDeltaModeUnsafe :: (MonadDOM m, HasCallStack) => WheelEventInit -> m Word
getDeltaModeUnsafe self = liftDOM ((((js_getDeltaMode (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-deltamode WheelEventInit.deltaMode specification>
getDeltaModeUnchecked :: (MonadDOM m) => WheelEventInit -> m Word
getDeltaModeUnchecked self = liftDOM ((pFromJSVal <$> (js_getDeltaMode (self))))

foreign import javascript safe "(($1, $2) => { $1[\"momentum\"] = $2; })"
        js_setMomentum :: WheelEventInit -> Bool -> IO ()
-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-momentum WheelEventInit.momentum specification>
setMomentum :: (MonadDOM m) => WheelEventInit -> Bool -> m ()
setMomentum self val = liftDOM (void ((js_setMomentum (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"momentum\"]; })"
        js_getMomentum :: WheelEventInit -> IO JSVal
-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-momentum WheelEventInit.momentum specification>
getMomentum :: (MonadDOM m) => WheelEventInit -> m (Maybe Bool)
getMomentum self = liftDOM (((js_getMomentum (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-momentum WheelEventInit.momentum specification>
getMomentumUnsafe :: (MonadDOM m, HasCallStack) => WheelEventInit -> m Bool
getMomentumUnsafe self = liftDOM ((((js_getMomentum (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/pointerevents/#dom-wheeleventinit-momentum WheelEventInit.momentum specification>
getMomentumUnchecked :: (MonadDOM m) => WheelEventInit -> m Bool
getMomentumUnchecked self = liftDOM ((pFromJSVal <$> (js_getMomentum (self))))