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

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from uievents (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.EventModifierInit
       (js_newEventModifierInit, js_setCtrlKey, js_getCtrlKey, js_setShiftKey, js_getShiftKey, js_setAltKey, js_getAltKey, js_setMetaKey, js_getMetaKey, js_setModifierAltGraph, js_getModifierAltGraph, js_setModifierCapsLock, js_getModifierCapsLock, js_setModifierFn, js_getModifierFn, js_setModifierFnLock, js_getModifierFnLock, js_setModifierHyper, js_getModifierHyper, js_setModifierNumLock, js_getModifierNumLock, js_setModifierScrollLock, js_getModifierScrollLock, js_setModifierSuper, js_getModifierSuper, js_setModifierSymbol, js_getModifierSymbol, js_setModifierSymbolLock, js_getModifierSymbolLock, newEventModifierInit, setCtrlKey, getCtrlKey, getCtrlKeyUnsafe, getCtrlKeyUnchecked, setShiftKey, getShiftKey, getShiftKeyUnsafe, getShiftKeyUnchecked, setAltKey, getAltKey, getAltKeyUnsafe, getAltKeyUnchecked, setMetaKey, getMetaKey, getMetaKeyUnsafe, getMetaKeyUnchecked, setModifierAltGraph, getModifierAltGraph, getModifierAltGraphUnsafe, getModifierAltGraphUnchecked, setModifierCapsLock, getModifierCapsLock, getModifierCapsLockUnsafe, getModifierCapsLockUnchecked, setModifierFn, getModifierFn, getModifierFnUnsafe, getModifierFnUnchecked, setModifierFnLock, getModifierFnLock, getModifierFnLockUnsafe, getModifierFnLockUnchecked, setModifierHyper, getModifierHyper, getModifierHyperUnsafe, getModifierHyperUnchecked, setModifierNumLock, getModifierNumLock, getModifierNumLockUnsafe, getModifierNumLockUnchecked, setModifierScrollLock, getModifierScrollLock, getModifierScrollLockUnsafe, getModifierScrollLockUnchecked, setModifierSuper, getModifierSuper, getModifierSuperUnsafe, getModifierSuperUnchecked, setModifierSymbol, getModifierSymbol, getModifierSymbolUnsafe, getModifierSymbolUnchecked, setModifierSymbolLock, getModifierSymbolLock, getModifierSymbolLockUnsafe, getModifierSymbolLockUnchecked, EventModifierInit(..), gTypeEventModifierInit, IsEventModifierInit, toEventModifierInit)
       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_newEventModifierInit :: IO EventModifierInit
-- | <https://w3c.github.io/uievents/#dictdef-eventmodifierinit EventModifierInit specification>
newEventModifierInit :: (MonadDOM m) => m EventModifierInit
newEventModifierInit = liftDOM ((js_newEventModifierInit))

foreign import javascript safe "(($1, $2) => { $1[\"ctrlKey\"] = $2; })"
        js_setCtrlKey :: EventModifierInit -> Bool -> IO ()
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-ctrlkey EventModifierInit.ctrlKey specification>
setCtrlKey :: (MonadDOM m, IsEventModifierInit self) => self -> Bool -> m ()
setCtrlKey self val = liftDOM (void ((js_setCtrlKey ((Types.toEventModifierInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"ctrlKey\"]; })"
        js_getCtrlKey :: EventModifierInit -> IO JSVal
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-ctrlkey EventModifierInit.ctrlKey specification>
getCtrlKey :: (MonadDOM m, IsEventModifierInit self) => self -> m (Maybe Bool)
getCtrlKey self = liftDOM (((js_getCtrlKey ((Types.toEventModifierInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-ctrlkey EventModifierInit.ctrlKey specification>
getCtrlKeyUnsafe :: (MonadDOM m, IsEventModifierInit self, HasCallStack) => self -> m Bool
getCtrlKeyUnsafe self = liftDOM ((((js_getCtrlKey ((Types.toEventModifierInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-ctrlkey EventModifierInit.ctrlKey specification>
getCtrlKeyUnchecked :: (MonadDOM m, IsEventModifierInit self) => self -> m Bool
getCtrlKeyUnchecked self = liftDOM ((pFromJSVal <$> (js_getCtrlKey ((Types.toEventModifierInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"shiftKey\"] = $2; })"
        js_setShiftKey :: EventModifierInit -> Bool -> IO ()
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-shiftkey EventModifierInit.shiftKey specification>
setShiftKey :: (MonadDOM m, IsEventModifierInit self) => self -> Bool -> m ()
setShiftKey self val = liftDOM (void ((js_setShiftKey ((Types.toEventModifierInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"shiftKey\"]; })"
        js_getShiftKey :: EventModifierInit -> IO JSVal
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-shiftkey EventModifierInit.shiftKey specification>
getShiftKey :: (MonadDOM m, IsEventModifierInit self) => self -> m (Maybe Bool)
getShiftKey self = liftDOM (((js_getShiftKey ((Types.toEventModifierInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-shiftkey EventModifierInit.shiftKey specification>
getShiftKeyUnsafe :: (MonadDOM m, IsEventModifierInit self, HasCallStack) => self -> m Bool
getShiftKeyUnsafe self = liftDOM ((((js_getShiftKey ((Types.toEventModifierInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-shiftkey EventModifierInit.shiftKey specification>
getShiftKeyUnchecked :: (MonadDOM m, IsEventModifierInit self) => self -> m Bool
getShiftKeyUnchecked self = liftDOM ((pFromJSVal <$> (js_getShiftKey ((Types.toEventModifierInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"altKey\"] = $2; })"
        js_setAltKey :: EventModifierInit -> Bool -> IO ()
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-altkey EventModifierInit.altKey specification>
setAltKey :: (MonadDOM m, IsEventModifierInit self) => self -> Bool -> m ()
setAltKey self val = liftDOM (void ((js_setAltKey ((Types.toEventModifierInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"altKey\"]; })"
        js_getAltKey :: EventModifierInit -> IO JSVal
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-altkey EventModifierInit.altKey specification>
getAltKey :: (MonadDOM m, IsEventModifierInit self) => self -> m (Maybe Bool)
getAltKey self = liftDOM (((js_getAltKey ((Types.toEventModifierInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-altkey EventModifierInit.altKey specification>
getAltKeyUnsafe :: (MonadDOM m, IsEventModifierInit self, HasCallStack) => self -> m Bool
getAltKeyUnsafe self = liftDOM ((((js_getAltKey ((Types.toEventModifierInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-altkey EventModifierInit.altKey specification>
getAltKeyUnchecked :: (MonadDOM m, IsEventModifierInit self) => self -> m Bool
getAltKeyUnchecked self = liftDOM ((pFromJSVal <$> (js_getAltKey ((Types.toEventModifierInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"metaKey\"] = $2; })"
        js_setMetaKey :: EventModifierInit -> Bool -> IO ()
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-metakey EventModifierInit.metaKey specification>
setMetaKey :: (MonadDOM m, IsEventModifierInit self) => self -> Bool -> m ()
setMetaKey self val = liftDOM (void ((js_setMetaKey ((Types.toEventModifierInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"metaKey\"]; })"
        js_getMetaKey :: EventModifierInit -> IO JSVal
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-metakey EventModifierInit.metaKey specification>
getMetaKey :: (MonadDOM m, IsEventModifierInit self) => self -> m (Maybe Bool)
getMetaKey self = liftDOM (((js_getMetaKey ((Types.toEventModifierInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-metakey EventModifierInit.metaKey specification>
getMetaKeyUnsafe :: (MonadDOM m, IsEventModifierInit self, HasCallStack) => self -> m Bool
getMetaKeyUnsafe self = liftDOM ((((js_getMetaKey ((Types.toEventModifierInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-metakey EventModifierInit.metaKey specification>
getMetaKeyUnchecked :: (MonadDOM m, IsEventModifierInit self) => self -> m Bool
getMetaKeyUnchecked self = liftDOM ((pFromJSVal <$> (js_getMetaKey ((Types.toEventModifierInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"modifierAltGraph\"] = $2; })"
        js_setModifierAltGraph :: EventModifierInit -> Bool -> IO ()
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifieraltgraph EventModifierInit.modifierAltGraph specification>
setModifierAltGraph :: (MonadDOM m, IsEventModifierInit self) => self -> Bool -> m ()
setModifierAltGraph self val = liftDOM (void ((js_setModifierAltGraph ((Types.toEventModifierInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"modifierAltGraph\"]; })"
        js_getModifierAltGraph :: EventModifierInit -> IO JSVal
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifieraltgraph EventModifierInit.modifierAltGraph specification>
getModifierAltGraph :: (MonadDOM m, IsEventModifierInit self) => self -> m (Maybe Bool)
getModifierAltGraph self = liftDOM (((js_getModifierAltGraph ((Types.toEventModifierInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifieraltgraph EventModifierInit.modifierAltGraph specification>
getModifierAltGraphUnsafe :: (MonadDOM m, IsEventModifierInit self, HasCallStack) => self -> m Bool
getModifierAltGraphUnsafe self = liftDOM ((((js_getModifierAltGraph ((Types.toEventModifierInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifieraltgraph EventModifierInit.modifierAltGraph specification>
getModifierAltGraphUnchecked :: (MonadDOM m, IsEventModifierInit self) => self -> m Bool
getModifierAltGraphUnchecked self = liftDOM ((pFromJSVal <$> (js_getModifierAltGraph ((Types.toEventModifierInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"modifierCapsLock\"] = $2; })"
        js_setModifierCapsLock :: EventModifierInit -> Bool -> IO ()
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiercapslock EventModifierInit.modifierCapsLock specification>
setModifierCapsLock :: (MonadDOM m, IsEventModifierInit self) => self -> Bool -> m ()
setModifierCapsLock self val = liftDOM (void ((js_setModifierCapsLock ((Types.toEventModifierInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"modifierCapsLock\"]; })"
        js_getModifierCapsLock :: EventModifierInit -> IO JSVal
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiercapslock EventModifierInit.modifierCapsLock specification>
getModifierCapsLock :: (MonadDOM m, IsEventModifierInit self) => self -> m (Maybe Bool)
getModifierCapsLock self = liftDOM (((js_getModifierCapsLock ((Types.toEventModifierInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiercapslock EventModifierInit.modifierCapsLock specification>
getModifierCapsLockUnsafe :: (MonadDOM m, IsEventModifierInit self, HasCallStack) => self -> m Bool
getModifierCapsLockUnsafe self = liftDOM ((((js_getModifierCapsLock ((Types.toEventModifierInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiercapslock EventModifierInit.modifierCapsLock specification>
getModifierCapsLockUnchecked :: (MonadDOM m, IsEventModifierInit self) => self -> m Bool
getModifierCapsLockUnchecked self = liftDOM ((pFromJSVal <$> (js_getModifierCapsLock ((Types.toEventModifierInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"modifierFn\"] = $2; })"
        js_setModifierFn :: EventModifierInit -> Bool -> IO ()
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifierfn EventModifierInit.modifierFn specification>
setModifierFn :: (MonadDOM m, IsEventModifierInit self) => self -> Bool -> m ()
setModifierFn self val = liftDOM (void ((js_setModifierFn ((Types.toEventModifierInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"modifierFn\"]; })"
        js_getModifierFn :: EventModifierInit -> IO JSVal
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifierfn EventModifierInit.modifierFn specification>
getModifierFn :: (MonadDOM m, IsEventModifierInit self) => self -> m (Maybe Bool)
getModifierFn self = liftDOM (((js_getModifierFn ((Types.toEventModifierInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifierfn EventModifierInit.modifierFn specification>
getModifierFnUnsafe :: (MonadDOM m, IsEventModifierInit self, HasCallStack) => self -> m Bool
getModifierFnUnsafe self = liftDOM ((((js_getModifierFn ((Types.toEventModifierInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifierfn EventModifierInit.modifierFn specification>
getModifierFnUnchecked :: (MonadDOM m, IsEventModifierInit self) => self -> m Bool
getModifierFnUnchecked self = liftDOM ((pFromJSVal <$> (js_getModifierFn ((Types.toEventModifierInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"modifierFnLock\"] = $2; })"
        js_setModifierFnLock :: EventModifierInit -> Bool -> IO ()
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifierfnlock EventModifierInit.modifierFnLock specification>
setModifierFnLock :: (MonadDOM m, IsEventModifierInit self) => self -> Bool -> m ()
setModifierFnLock self val = liftDOM (void ((js_setModifierFnLock ((Types.toEventModifierInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"modifierFnLock\"]; })"
        js_getModifierFnLock :: EventModifierInit -> IO JSVal
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifierfnlock EventModifierInit.modifierFnLock specification>
getModifierFnLock :: (MonadDOM m, IsEventModifierInit self) => self -> m (Maybe Bool)
getModifierFnLock self = liftDOM (((js_getModifierFnLock ((Types.toEventModifierInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifierfnlock EventModifierInit.modifierFnLock specification>
getModifierFnLockUnsafe :: (MonadDOM m, IsEventModifierInit self, HasCallStack) => self -> m Bool
getModifierFnLockUnsafe self = liftDOM ((((js_getModifierFnLock ((Types.toEventModifierInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifierfnlock EventModifierInit.modifierFnLock specification>
getModifierFnLockUnchecked :: (MonadDOM m, IsEventModifierInit self) => self -> m Bool
getModifierFnLockUnchecked self = liftDOM ((pFromJSVal <$> (js_getModifierFnLock ((Types.toEventModifierInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"modifierHyper\"] = $2; })"
        js_setModifierHyper :: EventModifierInit -> Bool -> IO ()
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifierhyper EventModifierInit.modifierHyper specification>
setModifierHyper :: (MonadDOM m, IsEventModifierInit self) => self -> Bool -> m ()
setModifierHyper self val = liftDOM (void ((js_setModifierHyper ((Types.toEventModifierInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"modifierHyper\"]; })"
        js_getModifierHyper :: EventModifierInit -> IO JSVal
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifierhyper EventModifierInit.modifierHyper specification>
getModifierHyper :: (MonadDOM m, IsEventModifierInit self) => self -> m (Maybe Bool)
getModifierHyper self = liftDOM (((js_getModifierHyper ((Types.toEventModifierInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifierhyper EventModifierInit.modifierHyper specification>
getModifierHyperUnsafe :: (MonadDOM m, IsEventModifierInit self, HasCallStack) => self -> m Bool
getModifierHyperUnsafe self = liftDOM ((((js_getModifierHyper ((Types.toEventModifierInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifierhyper EventModifierInit.modifierHyper specification>
getModifierHyperUnchecked :: (MonadDOM m, IsEventModifierInit self) => self -> m Bool
getModifierHyperUnchecked self = liftDOM ((pFromJSVal <$> (js_getModifierHyper ((Types.toEventModifierInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"modifierNumLock\"] = $2; })"
        js_setModifierNumLock :: EventModifierInit -> Bool -> IO ()
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiernumlock EventModifierInit.modifierNumLock specification>
setModifierNumLock :: (MonadDOM m, IsEventModifierInit self) => self -> Bool -> m ()
setModifierNumLock self val = liftDOM (void ((js_setModifierNumLock ((Types.toEventModifierInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"modifierNumLock\"]; })"
        js_getModifierNumLock :: EventModifierInit -> IO JSVal
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiernumlock EventModifierInit.modifierNumLock specification>
getModifierNumLock :: (MonadDOM m, IsEventModifierInit self) => self -> m (Maybe Bool)
getModifierNumLock self = liftDOM (((js_getModifierNumLock ((Types.toEventModifierInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiernumlock EventModifierInit.modifierNumLock specification>
getModifierNumLockUnsafe :: (MonadDOM m, IsEventModifierInit self, HasCallStack) => self -> m Bool
getModifierNumLockUnsafe self = liftDOM ((((js_getModifierNumLock ((Types.toEventModifierInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiernumlock EventModifierInit.modifierNumLock specification>
getModifierNumLockUnchecked :: (MonadDOM m, IsEventModifierInit self) => self -> m Bool
getModifierNumLockUnchecked self = liftDOM ((pFromJSVal <$> (js_getModifierNumLock ((Types.toEventModifierInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"modifierScrollLock\"] = $2; })"
        js_setModifierScrollLock :: EventModifierInit -> Bool -> IO ()
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifierscrolllock EventModifierInit.modifierScrollLock specification>
setModifierScrollLock :: (MonadDOM m, IsEventModifierInit self) => self -> Bool -> m ()
setModifierScrollLock self val = liftDOM (void ((js_setModifierScrollLock ((Types.toEventModifierInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"modifierScrollLock\"]; })"
        js_getModifierScrollLock :: EventModifierInit -> IO JSVal
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifierscrolllock EventModifierInit.modifierScrollLock specification>
getModifierScrollLock :: (MonadDOM m, IsEventModifierInit self) => self -> m (Maybe Bool)
getModifierScrollLock self = liftDOM (((js_getModifierScrollLock ((Types.toEventModifierInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifierscrolllock EventModifierInit.modifierScrollLock specification>
getModifierScrollLockUnsafe :: (MonadDOM m, IsEventModifierInit self, HasCallStack) => self -> m Bool
getModifierScrollLockUnsafe self = liftDOM ((((js_getModifierScrollLock ((Types.toEventModifierInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifierscrolllock EventModifierInit.modifierScrollLock specification>
getModifierScrollLockUnchecked :: (MonadDOM m, IsEventModifierInit self) => self -> m Bool
getModifierScrollLockUnchecked self = liftDOM ((pFromJSVal <$> (js_getModifierScrollLock ((Types.toEventModifierInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"modifierSuper\"] = $2; })"
        js_setModifierSuper :: EventModifierInit -> Bool -> IO ()
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiersuper EventModifierInit.modifierSuper specification>
setModifierSuper :: (MonadDOM m, IsEventModifierInit self) => self -> Bool -> m ()
setModifierSuper self val = liftDOM (void ((js_setModifierSuper ((Types.toEventModifierInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"modifierSuper\"]; })"
        js_getModifierSuper :: EventModifierInit -> IO JSVal
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiersuper EventModifierInit.modifierSuper specification>
getModifierSuper :: (MonadDOM m, IsEventModifierInit self) => self -> m (Maybe Bool)
getModifierSuper self = liftDOM (((js_getModifierSuper ((Types.toEventModifierInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiersuper EventModifierInit.modifierSuper specification>
getModifierSuperUnsafe :: (MonadDOM m, IsEventModifierInit self, HasCallStack) => self -> m Bool
getModifierSuperUnsafe self = liftDOM ((((js_getModifierSuper ((Types.toEventModifierInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiersuper EventModifierInit.modifierSuper specification>
getModifierSuperUnchecked :: (MonadDOM m, IsEventModifierInit self) => self -> m Bool
getModifierSuperUnchecked self = liftDOM ((pFromJSVal <$> (js_getModifierSuper ((Types.toEventModifierInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"modifierSymbol\"] = $2; })"
        js_setModifierSymbol :: EventModifierInit -> Bool -> IO ()
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiersymbol EventModifierInit.modifierSymbol specification>
setModifierSymbol :: (MonadDOM m, IsEventModifierInit self) => self -> Bool -> m ()
setModifierSymbol self val = liftDOM (void ((js_setModifierSymbol ((Types.toEventModifierInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"modifierSymbol\"]; })"
        js_getModifierSymbol :: EventModifierInit -> IO JSVal
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiersymbol EventModifierInit.modifierSymbol specification>
getModifierSymbol :: (MonadDOM m, IsEventModifierInit self) => self -> m (Maybe Bool)
getModifierSymbol self = liftDOM (((js_getModifierSymbol ((Types.toEventModifierInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiersymbol EventModifierInit.modifierSymbol specification>
getModifierSymbolUnsafe :: (MonadDOM m, IsEventModifierInit self, HasCallStack) => self -> m Bool
getModifierSymbolUnsafe self = liftDOM ((((js_getModifierSymbol ((Types.toEventModifierInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiersymbol EventModifierInit.modifierSymbol specification>
getModifierSymbolUnchecked :: (MonadDOM m, IsEventModifierInit self) => self -> m Bool
getModifierSymbolUnchecked self = liftDOM ((pFromJSVal <$> (js_getModifierSymbol ((Types.toEventModifierInit self)))))

foreign import javascript safe "(($1, $2) => { $1[\"modifierSymbolLock\"] = $2; })"
        js_setModifierSymbolLock :: EventModifierInit -> Bool -> IO ()
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiersymbollock EventModifierInit.modifierSymbolLock specification>
setModifierSymbolLock :: (MonadDOM m, IsEventModifierInit self) => self -> Bool -> m ()
setModifierSymbolLock self val = liftDOM (void ((js_setModifierSymbolLock ((Types.toEventModifierInit self)) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"modifierSymbolLock\"]; })"
        js_getModifierSymbolLock :: EventModifierInit -> IO JSVal
-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiersymbollock EventModifierInit.modifierSymbolLock specification>
getModifierSymbolLock :: (MonadDOM m, IsEventModifierInit self) => self -> m (Maybe Bool)
getModifierSymbolLock self = liftDOM (((js_getModifierSymbolLock ((Types.toEventModifierInit self))) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiersymbollock EventModifierInit.modifierSymbolLock specification>
getModifierSymbolLockUnsafe :: (MonadDOM m, IsEventModifierInit self, HasCallStack) => self -> m Bool
getModifierSymbolLockUnsafe self = liftDOM ((((js_getModifierSymbolLock ((Types.toEventModifierInit self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/uievents/#dom-eventmodifierinit-modifiersymbollock EventModifierInit.modifierSymbolLock specification>
getModifierSymbolLockUnchecked :: (MonadDOM m, IsEventModifierInit self) => self -> m Bool
getModifierSymbolLockUnchecked self = liftDOM ((pFromJSVal <$> (js_getModifierSymbolLock ((Types.toEventModifierInit self)))))