module GI.WebKit.Objects.DOMWheelEvent
(
DOMWheelEvent(..) ,
IsDOMWheelEvent ,
toDOMWheelEvent ,
noDOMWheelEvent ,
DOMWheelEventGetDeltaModeMethodInfo ,
dOMWheelEventGetDeltaMode ,
DOMWheelEventGetDeltaXMethodInfo ,
dOMWheelEventGetDeltaX ,
DOMWheelEventGetDeltaYMethodInfo ,
dOMWheelEventGetDeltaY ,
DOMWheelEventGetDeltaZMethodInfo ,
dOMWheelEventGetDeltaZ ,
DOMWheelEventGetWebkitDirectionInvertedFromDeviceMethodInfo,
dOMWheelEventGetWebkitDirectionInvertedFromDevice,
DOMWheelEventGetWheelDeltaMethodInfo ,
dOMWheelEventGetWheelDelta ,
DOMWheelEventGetWheelDeltaXMethodInfo ,
dOMWheelEventGetWheelDeltaX ,
DOMWheelEventGetWheelDeltaYMethodInfo ,
dOMWheelEventGetWheelDeltaY ,
DOMWheelEventInitWheelEventMethodInfo ,
dOMWheelEventInitWheelEvent ,
DOMWheelEventDeltaModePropertyInfo ,
dOMWheelEventDeltaMode ,
getDOMWheelEventDeltaMode ,
DOMWheelEventDeltaXPropertyInfo ,
dOMWheelEventDeltaX ,
getDOMWheelEventDeltaX ,
DOMWheelEventDeltaYPropertyInfo ,
dOMWheelEventDeltaY ,
getDOMWheelEventDeltaY ,
DOMWheelEventDeltaZPropertyInfo ,
dOMWheelEventDeltaZ ,
getDOMWheelEventDeltaZ ,
DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo,
dOMWheelEventWebkitDirectionInvertedFromDevice,
getDOMWheelEventWebkitDirectionInvertedFromDevice,
DOMWheelEventWheelDeltaPropertyInfo ,
dOMWheelEventWheelDelta ,
getDOMWheelEventWheelDelta ,
DOMWheelEventWheelDeltaXPropertyInfo ,
dOMWheelEventWheelDeltaX ,
getDOMWheelEventWheelDeltaX ,
DOMWheelEventWheelDeltaYPropertyInfo ,
dOMWheelEventWheelDeltaY ,
getDOMWheelEventWheelDeltaY ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.WebKit.Objects.DOMDOMWindow as WebKit.DOMDOMWindow
import qualified GI.WebKit.Objects.DOMEvent as WebKit.DOMEvent
import qualified GI.WebKit.Objects.DOMMouseEvent as WebKit.DOMMouseEvent
import qualified GI.WebKit.Objects.DOMObject as WebKit.DOMObject
import qualified GI.WebKit.Objects.DOMUIEvent as WebKit.DOMUIEvent
newtype DOMWheelEvent = DOMWheelEvent (ManagedPtr DOMWheelEvent)
foreign import ccall "webkit_dom_wheel_event_get_type"
c_webkit_dom_wheel_event_get_type :: IO GType
instance GObject DOMWheelEvent where
gobjectType _ = c_webkit_dom_wheel_event_get_type
class GObject o => IsDOMWheelEvent o
#if MIN_VERSION_base(4,9,0)
instance (GObject a, O.UnknownAncestorError DOMWheelEvent a) =>
IsDOMWheelEvent a
#endif
instance IsDOMWheelEvent DOMWheelEvent
instance WebKit.DOMMouseEvent.IsDOMMouseEvent DOMWheelEvent
instance WebKit.DOMUIEvent.IsDOMUIEvent DOMWheelEvent
instance WebKit.DOMEvent.IsDOMEvent DOMWheelEvent
instance WebKit.DOMObject.IsDOMObject DOMWheelEvent
instance GObject.Object.IsObject DOMWheelEvent
toDOMWheelEvent :: IsDOMWheelEvent o => o -> IO DOMWheelEvent
toDOMWheelEvent = unsafeCastTo DOMWheelEvent
noDOMWheelEvent :: Maybe DOMWheelEvent
noDOMWheelEvent = Nothing
type family ResolveDOMWheelEventMethod (t :: Symbol) (o :: *) :: * where
ResolveDOMWheelEventMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveDOMWheelEventMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveDOMWheelEventMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveDOMWheelEventMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveDOMWheelEventMethod "initEvent" o = WebKit.DOMEvent.DOMEventInitEventMethodInfo
ResolveDOMWheelEventMethod "initMouseEvent" o = WebKit.DOMMouseEvent.DOMMouseEventInitMouseEventMethodInfo
ResolveDOMWheelEventMethod "initUiEvent" o = WebKit.DOMUIEvent.DOMUIEventInitUiEventMethodInfo
ResolveDOMWheelEventMethod "initWheelEvent" o = DOMWheelEventInitWheelEventMethodInfo
ResolveDOMWheelEventMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveDOMWheelEventMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveDOMWheelEventMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveDOMWheelEventMethod "preventDefault" o = WebKit.DOMEvent.DOMEventPreventDefaultMethodInfo
ResolveDOMWheelEventMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveDOMWheelEventMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveDOMWheelEventMethod "replaceData" o = GObject.Object.ObjectReplaceDataMethodInfo
ResolveDOMWheelEventMethod "replaceQdata" o = GObject.Object.ObjectReplaceQdataMethodInfo
ResolveDOMWheelEventMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveDOMWheelEventMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveDOMWheelEventMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveDOMWheelEventMethod "stopImmediatePropagation" o = WebKit.DOMEvent.DOMEventStopImmediatePropagationMethodInfo
ResolveDOMWheelEventMethod "stopPropagation" o = WebKit.DOMEvent.DOMEventStopPropagationMethodInfo
ResolveDOMWheelEventMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveDOMWheelEventMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveDOMWheelEventMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveDOMWheelEventMethod "getAltKey" o = WebKit.DOMMouseEvent.DOMMouseEventGetAltKeyMethodInfo
ResolveDOMWheelEventMethod "getBubbles" o = WebKit.DOMEvent.DOMEventGetBubblesMethodInfo
ResolveDOMWheelEventMethod "getButton" o = WebKit.DOMMouseEvent.DOMMouseEventGetButtonMethodInfo
ResolveDOMWheelEventMethod "getCancelBubble" o = WebKit.DOMEvent.DOMEventGetCancelBubbleMethodInfo
ResolveDOMWheelEventMethod "getCancelable" o = WebKit.DOMEvent.DOMEventGetCancelableMethodInfo
ResolveDOMWheelEventMethod "getCharCode" o = WebKit.DOMUIEvent.DOMUIEventGetCharCodeMethodInfo
ResolveDOMWheelEventMethod "getClientX" o = WebKit.DOMMouseEvent.DOMMouseEventGetClientXMethodInfo
ResolveDOMWheelEventMethod "getClientY" o = WebKit.DOMMouseEvent.DOMMouseEventGetClientYMethodInfo
ResolveDOMWheelEventMethod "getCtrlKey" o = WebKit.DOMMouseEvent.DOMMouseEventGetCtrlKeyMethodInfo
ResolveDOMWheelEventMethod "getCurrentTarget" o = WebKit.DOMEvent.DOMEventGetCurrentTargetMethodInfo
ResolveDOMWheelEventMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveDOMWheelEventMethod "getDefaultPrevented" o = WebKit.DOMEvent.DOMEventGetDefaultPreventedMethodInfo
ResolveDOMWheelEventMethod "getDeltaMode" o = DOMWheelEventGetDeltaModeMethodInfo
ResolveDOMWheelEventMethod "getDeltaX" o = DOMWheelEventGetDeltaXMethodInfo
ResolveDOMWheelEventMethod "getDeltaY" o = DOMWheelEventGetDeltaYMethodInfo
ResolveDOMWheelEventMethod "getDeltaZ" o = DOMWheelEventGetDeltaZMethodInfo
ResolveDOMWheelEventMethod "getDetail" o = WebKit.DOMUIEvent.DOMUIEventGetDetailMethodInfo
ResolveDOMWheelEventMethod "getEventPhase" o = WebKit.DOMEvent.DOMEventGetEventPhaseMethodInfo
ResolveDOMWheelEventMethod "getFromElement" o = WebKit.DOMMouseEvent.DOMMouseEventGetFromElementMethodInfo
ResolveDOMWheelEventMethod "getKeyCode" o = WebKit.DOMUIEvent.DOMUIEventGetKeyCodeMethodInfo
ResolveDOMWheelEventMethod "getLayerX" o = WebKit.DOMUIEvent.DOMUIEventGetLayerXMethodInfo
ResolveDOMWheelEventMethod "getLayerY" o = WebKit.DOMUIEvent.DOMUIEventGetLayerYMethodInfo
ResolveDOMWheelEventMethod "getMetaKey" o = WebKit.DOMMouseEvent.DOMMouseEventGetMetaKeyMethodInfo
ResolveDOMWheelEventMethod "getOffsetX" o = WebKit.DOMMouseEvent.DOMMouseEventGetOffsetXMethodInfo
ResolveDOMWheelEventMethod "getOffsetY" o = WebKit.DOMMouseEvent.DOMMouseEventGetOffsetYMethodInfo
ResolveDOMWheelEventMethod "getPageX" o = WebKit.DOMUIEvent.DOMUIEventGetPageXMethodInfo
ResolveDOMWheelEventMethod "getPageY" o = WebKit.DOMUIEvent.DOMUIEventGetPageYMethodInfo
ResolveDOMWheelEventMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveDOMWheelEventMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveDOMWheelEventMethod "getRelatedTarget" o = WebKit.DOMMouseEvent.DOMMouseEventGetRelatedTargetMethodInfo
ResolveDOMWheelEventMethod "getReturnValue" o = WebKit.DOMEvent.DOMEventGetReturnValueMethodInfo
ResolveDOMWheelEventMethod "getScreenX" o = WebKit.DOMMouseEvent.DOMMouseEventGetScreenXMethodInfo
ResolveDOMWheelEventMethod "getScreenY" o = WebKit.DOMMouseEvent.DOMMouseEventGetScreenYMethodInfo
ResolveDOMWheelEventMethod "getShiftKey" o = WebKit.DOMMouseEvent.DOMMouseEventGetShiftKeyMethodInfo
ResolveDOMWheelEventMethod "getSrcElement" o = WebKit.DOMEvent.DOMEventGetSrcElementMethodInfo
ResolveDOMWheelEventMethod "getTarget" o = WebKit.DOMEvent.DOMEventGetTargetMethodInfo
ResolveDOMWheelEventMethod "getTimeStamp" o = WebKit.DOMEvent.DOMEventGetTimeStampMethodInfo
ResolveDOMWheelEventMethod "getToElement" o = WebKit.DOMMouseEvent.DOMMouseEventGetToElementMethodInfo
ResolveDOMWheelEventMethod "getView" o = WebKit.DOMUIEvent.DOMUIEventGetViewMethodInfo
ResolveDOMWheelEventMethod "getWebkitDirectionInvertedFromDevice" o = DOMWheelEventGetWebkitDirectionInvertedFromDeviceMethodInfo
ResolveDOMWheelEventMethod "getWebkitMovementX" o = WebKit.DOMMouseEvent.DOMMouseEventGetWebkitMovementXMethodInfo
ResolveDOMWheelEventMethod "getWebkitMovementY" o = WebKit.DOMMouseEvent.DOMMouseEventGetWebkitMovementYMethodInfo
ResolveDOMWheelEventMethod "getWheelDelta" o = DOMWheelEventGetWheelDeltaMethodInfo
ResolveDOMWheelEventMethod "getWheelDeltaX" o = DOMWheelEventGetWheelDeltaXMethodInfo
ResolveDOMWheelEventMethod "getWheelDeltaY" o = DOMWheelEventGetWheelDeltaYMethodInfo
ResolveDOMWheelEventMethod "getWhich" o = WebKit.DOMUIEvent.DOMUIEventGetWhichMethodInfo
ResolveDOMWheelEventMethod "getX" o = WebKit.DOMMouseEvent.DOMMouseEventGetXMethodInfo
ResolveDOMWheelEventMethod "getY" o = WebKit.DOMMouseEvent.DOMMouseEventGetYMethodInfo
ResolveDOMWheelEventMethod "setCancelBubble" o = WebKit.DOMEvent.DOMEventSetCancelBubbleMethodInfo
ResolveDOMWheelEventMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveDOMWheelEventMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveDOMWheelEventMethod "setReturnValue" o = WebKit.DOMEvent.DOMEventSetReturnValueMethodInfo
ResolveDOMWheelEventMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveDOMWheelEventMethod t DOMWheelEvent, O.MethodInfo info DOMWheelEvent p) => O.IsLabelProxy t (DOMWheelEvent -> p) where
fromLabelProxy _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#if MIN_VERSION_base(4,9,0)
instance (info ~ ResolveDOMWheelEventMethod t DOMWheelEvent, O.MethodInfo info DOMWheelEvent p) => O.IsLabel t (DOMWheelEvent -> p) where
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
getDOMWheelEventDeltaMode :: (MonadIO m, IsDOMWheelEvent o) => o -> m CULong
getDOMWheelEventDeltaMode obj = liftIO $ getObjectPropertyULong obj "delta-mode"
data DOMWheelEventDeltaModePropertyInfo
instance AttrInfo DOMWheelEventDeltaModePropertyInfo where
type AttrAllowedOps DOMWheelEventDeltaModePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMWheelEventDeltaModePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMWheelEventDeltaModePropertyInfo = IsDOMWheelEvent
type AttrGetType DOMWheelEventDeltaModePropertyInfo = CULong
type AttrLabel DOMWheelEventDeltaModePropertyInfo = "delta-mode"
type AttrOrigin DOMWheelEventDeltaModePropertyInfo = DOMWheelEvent
attrGet _ = getDOMWheelEventDeltaMode
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMWheelEventDeltaX :: (MonadIO m, IsDOMWheelEvent o) => o -> m Double
getDOMWheelEventDeltaX obj = liftIO $ getObjectPropertyDouble obj "delta-x"
data DOMWheelEventDeltaXPropertyInfo
instance AttrInfo DOMWheelEventDeltaXPropertyInfo where
type AttrAllowedOps DOMWheelEventDeltaXPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMWheelEventDeltaXPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMWheelEventDeltaXPropertyInfo = IsDOMWheelEvent
type AttrGetType DOMWheelEventDeltaXPropertyInfo = Double
type AttrLabel DOMWheelEventDeltaXPropertyInfo = "delta-x"
type AttrOrigin DOMWheelEventDeltaXPropertyInfo = DOMWheelEvent
attrGet _ = getDOMWheelEventDeltaX
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMWheelEventDeltaY :: (MonadIO m, IsDOMWheelEvent o) => o -> m Double
getDOMWheelEventDeltaY obj = liftIO $ getObjectPropertyDouble obj "delta-y"
data DOMWheelEventDeltaYPropertyInfo
instance AttrInfo DOMWheelEventDeltaYPropertyInfo where
type AttrAllowedOps DOMWheelEventDeltaYPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMWheelEventDeltaYPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMWheelEventDeltaYPropertyInfo = IsDOMWheelEvent
type AttrGetType DOMWheelEventDeltaYPropertyInfo = Double
type AttrLabel DOMWheelEventDeltaYPropertyInfo = "delta-y"
type AttrOrigin DOMWheelEventDeltaYPropertyInfo = DOMWheelEvent
attrGet _ = getDOMWheelEventDeltaY
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMWheelEventDeltaZ :: (MonadIO m, IsDOMWheelEvent o) => o -> m Double
getDOMWheelEventDeltaZ obj = liftIO $ getObjectPropertyDouble obj "delta-z"
data DOMWheelEventDeltaZPropertyInfo
instance AttrInfo DOMWheelEventDeltaZPropertyInfo where
type AttrAllowedOps DOMWheelEventDeltaZPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMWheelEventDeltaZPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMWheelEventDeltaZPropertyInfo = IsDOMWheelEvent
type AttrGetType DOMWheelEventDeltaZPropertyInfo = Double
type AttrLabel DOMWheelEventDeltaZPropertyInfo = "delta-z"
type AttrOrigin DOMWheelEventDeltaZPropertyInfo = DOMWheelEvent
attrGet _ = getDOMWheelEventDeltaZ
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMWheelEventWebkitDirectionInvertedFromDevice :: (MonadIO m, IsDOMWheelEvent o) => o -> m Bool
getDOMWheelEventWebkitDirectionInvertedFromDevice obj = liftIO $ getObjectPropertyBool obj "webkit-direction-inverted-from-device"
data DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo
instance AttrInfo DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo where
type AttrAllowedOps DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo = IsDOMWheelEvent
type AttrGetType DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo = Bool
type AttrLabel DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo = "webkit-direction-inverted-from-device"
type AttrOrigin DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo = DOMWheelEvent
attrGet _ = getDOMWheelEventWebkitDirectionInvertedFromDevice
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMWheelEventWheelDelta :: (MonadIO m, IsDOMWheelEvent o) => o -> m CLong
getDOMWheelEventWheelDelta obj = liftIO $ getObjectPropertyLong obj "wheel-delta"
data DOMWheelEventWheelDeltaPropertyInfo
instance AttrInfo DOMWheelEventWheelDeltaPropertyInfo where
type AttrAllowedOps DOMWheelEventWheelDeltaPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMWheelEventWheelDeltaPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMWheelEventWheelDeltaPropertyInfo = IsDOMWheelEvent
type AttrGetType DOMWheelEventWheelDeltaPropertyInfo = CLong
type AttrLabel DOMWheelEventWheelDeltaPropertyInfo = "wheel-delta"
type AttrOrigin DOMWheelEventWheelDeltaPropertyInfo = DOMWheelEvent
attrGet _ = getDOMWheelEventWheelDelta
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMWheelEventWheelDeltaX :: (MonadIO m, IsDOMWheelEvent o) => o -> m CLong
getDOMWheelEventWheelDeltaX obj = liftIO $ getObjectPropertyLong obj "wheel-delta-x"
data DOMWheelEventWheelDeltaXPropertyInfo
instance AttrInfo DOMWheelEventWheelDeltaXPropertyInfo where
type AttrAllowedOps DOMWheelEventWheelDeltaXPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMWheelEventWheelDeltaXPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMWheelEventWheelDeltaXPropertyInfo = IsDOMWheelEvent
type AttrGetType DOMWheelEventWheelDeltaXPropertyInfo = CLong
type AttrLabel DOMWheelEventWheelDeltaXPropertyInfo = "wheel-delta-x"
type AttrOrigin DOMWheelEventWheelDeltaXPropertyInfo = DOMWheelEvent
attrGet _ = getDOMWheelEventWheelDeltaX
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMWheelEventWheelDeltaY :: (MonadIO m, IsDOMWheelEvent o) => o -> m CLong
getDOMWheelEventWheelDeltaY obj = liftIO $ getObjectPropertyLong obj "wheel-delta-y"
data DOMWheelEventWheelDeltaYPropertyInfo
instance AttrInfo DOMWheelEventWheelDeltaYPropertyInfo where
type AttrAllowedOps DOMWheelEventWheelDeltaYPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMWheelEventWheelDeltaYPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMWheelEventWheelDeltaYPropertyInfo = IsDOMWheelEvent
type AttrGetType DOMWheelEventWheelDeltaYPropertyInfo = CLong
type AttrLabel DOMWheelEventWheelDeltaYPropertyInfo = "wheel-delta-y"
type AttrOrigin DOMWheelEventWheelDeltaYPropertyInfo = DOMWheelEvent
attrGet _ = getDOMWheelEventWheelDeltaY
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
instance O.HasAttributeList DOMWheelEvent
type instance O.AttributeList DOMWheelEvent = DOMWheelEventAttributeList
type DOMWheelEventAttributeList = ('[ '("altKey", WebKit.DOMMouseEvent.DOMMouseEventAltKeyPropertyInfo), '("bubbles", WebKit.DOMEvent.DOMEventBubblesPropertyInfo), '("button", WebKit.DOMMouseEvent.DOMMouseEventButtonPropertyInfo), '("cancelBubble", WebKit.DOMEvent.DOMEventCancelBubblePropertyInfo), '("cancelable", WebKit.DOMEvent.DOMEventCancelablePropertyInfo), '("charCode", WebKit.DOMUIEvent.DOMUIEventCharCodePropertyInfo), '("clientX", WebKit.DOMMouseEvent.DOMMouseEventClientXPropertyInfo), '("clientY", WebKit.DOMMouseEvent.DOMMouseEventClientYPropertyInfo), '("coreObject", WebKit.DOMObject.DOMObjectCoreObjectPropertyInfo), '("ctrlKey", WebKit.DOMMouseEvent.DOMMouseEventCtrlKeyPropertyInfo), '("currentTarget", WebKit.DOMEvent.DOMEventCurrentTargetPropertyInfo), '("defaultPrevented", WebKit.DOMEvent.DOMEventDefaultPreventedPropertyInfo), '("deltaMode", DOMWheelEventDeltaModePropertyInfo), '("deltaX", DOMWheelEventDeltaXPropertyInfo), '("deltaY", DOMWheelEventDeltaYPropertyInfo), '("deltaZ", DOMWheelEventDeltaZPropertyInfo), '("detail", WebKit.DOMUIEvent.DOMUIEventDetailPropertyInfo), '("eventPhase", WebKit.DOMEvent.DOMEventEventPhasePropertyInfo), '("fromElement", WebKit.DOMMouseEvent.DOMMouseEventFromElementPropertyInfo), '("keyCode", WebKit.DOMUIEvent.DOMUIEventKeyCodePropertyInfo), '("layerX", WebKit.DOMUIEvent.DOMUIEventLayerXPropertyInfo), '("layerY", WebKit.DOMUIEvent.DOMUIEventLayerYPropertyInfo), '("metaKey", WebKit.DOMMouseEvent.DOMMouseEventMetaKeyPropertyInfo), '("offsetX", WebKit.DOMMouseEvent.DOMMouseEventOffsetXPropertyInfo), '("offsetY", WebKit.DOMMouseEvent.DOMMouseEventOffsetYPropertyInfo), '("pageX", WebKit.DOMUIEvent.DOMUIEventPageXPropertyInfo), '("pageY", WebKit.DOMUIEvent.DOMUIEventPageYPropertyInfo), '("relatedTarget", WebKit.DOMMouseEvent.DOMMouseEventRelatedTargetPropertyInfo), '("returnValue", WebKit.DOMEvent.DOMEventReturnValuePropertyInfo), '("screenX", WebKit.DOMMouseEvent.DOMMouseEventScreenXPropertyInfo), '("screenY", WebKit.DOMMouseEvent.DOMMouseEventScreenYPropertyInfo), '("shiftKey", WebKit.DOMMouseEvent.DOMMouseEventShiftKeyPropertyInfo), '("srcElement", WebKit.DOMEvent.DOMEventSrcElementPropertyInfo), '("target", WebKit.DOMEvent.DOMEventTargetPropertyInfo), '("timeStamp", WebKit.DOMEvent.DOMEventTimeStampPropertyInfo), '("toElement", WebKit.DOMMouseEvent.DOMMouseEventToElementPropertyInfo), '("type", WebKit.DOMEvent.DOMEventTypePropertyInfo), '("view", WebKit.DOMUIEvent.DOMUIEventViewPropertyInfo), '("webkitDirectionInvertedFromDevice", DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo), '("webkitMovementX", WebKit.DOMMouseEvent.DOMMouseEventWebkitMovementXPropertyInfo), '("webkitMovementY", WebKit.DOMMouseEvent.DOMMouseEventWebkitMovementYPropertyInfo), '("wheelDelta", DOMWheelEventWheelDeltaPropertyInfo), '("wheelDeltaX", DOMWheelEventWheelDeltaXPropertyInfo), '("wheelDeltaY", DOMWheelEventWheelDeltaYPropertyInfo), '("which", WebKit.DOMUIEvent.DOMUIEventWhichPropertyInfo), '("x", WebKit.DOMMouseEvent.DOMMouseEventXPropertyInfo), '("y", WebKit.DOMMouseEvent.DOMMouseEventYPropertyInfo)] :: [(Symbol, *)])
dOMWheelEventDeltaMode :: AttrLabelProxy "deltaMode"
dOMWheelEventDeltaMode = AttrLabelProxy
dOMWheelEventDeltaX :: AttrLabelProxy "deltaX"
dOMWheelEventDeltaX = AttrLabelProxy
dOMWheelEventDeltaY :: AttrLabelProxy "deltaY"
dOMWheelEventDeltaY = AttrLabelProxy
dOMWheelEventDeltaZ :: AttrLabelProxy "deltaZ"
dOMWheelEventDeltaZ = AttrLabelProxy
dOMWheelEventWebkitDirectionInvertedFromDevice :: AttrLabelProxy "webkitDirectionInvertedFromDevice"
dOMWheelEventWebkitDirectionInvertedFromDevice = AttrLabelProxy
dOMWheelEventWheelDelta :: AttrLabelProxy "wheelDelta"
dOMWheelEventWheelDelta = AttrLabelProxy
dOMWheelEventWheelDeltaX :: AttrLabelProxy "wheelDeltaX"
dOMWheelEventWheelDeltaX = AttrLabelProxy
dOMWheelEventWheelDeltaY :: AttrLabelProxy "wheelDeltaY"
dOMWheelEventWheelDeltaY = AttrLabelProxy
type instance O.SignalList DOMWheelEvent = DOMWheelEventSignalList
type DOMWheelEventSignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
foreign import ccall "webkit_dom_wheel_event_get_delta_mode" webkit_dom_wheel_event_get_delta_mode ::
Ptr DOMWheelEvent ->
IO CULong
dOMWheelEventGetDeltaMode ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWheelEvent a) =>
a
-> m CULong
dOMWheelEventGetDeltaMode self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_wheel_event_get_delta_mode self'
touchManagedPtr self
return result
data DOMWheelEventGetDeltaModeMethodInfo
instance (signature ~ (m CULong), MonadIO m, IsDOMWheelEvent a) => O.MethodInfo DOMWheelEventGetDeltaModeMethodInfo a signature where
overloadedMethod _ = dOMWheelEventGetDeltaMode
foreign import ccall "webkit_dom_wheel_event_get_delta_x" webkit_dom_wheel_event_get_delta_x ::
Ptr DOMWheelEvent ->
IO CDouble
dOMWheelEventGetDeltaX ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWheelEvent a) =>
a
-> m Double
dOMWheelEventGetDeltaX self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_wheel_event_get_delta_x self'
let result' = realToFrac result
touchManagedPtr self
return result'
data DOMWheelEventGetDeltaXMethodInfo
instance (signature ~ (m Double), MonadIO m, IsDOMWheelEvent a) => O.MethodInfo DOMWheelEventGetDeltaXMethodInfo a signature where
overloadedMethod _ = dOMWheelEventGetDeltaX
foreign import ccall "webkit_dom_wheel_event_get_delta_y" webkit_dom_wheel_event_get_delta_y ::
Ptr DOMWheelEvent ->
IO CDouble
dOMWheelEventGetDeltaY ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWheelEvent a) =>
a
-> m Double
dOMWheelEventGetDeltaY self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_wheel_event_get_delta_y self'
let result' = realToFrac result
touchManagedPtr self
return result'
data DOMWheelEventGetDeltaYMethodInfo
instance (signature ~ (m Double), MonadIO m, IsDOMWheelEvent a) => O.MethodInfo DOMWheelEventGetDeltaYMethodInfo a signature where
overloadedMethod _ = dOMWheelEventGetDeltaY
foreign import ccall "webkit_dom_wheel_event_get_delta_z" webkit_dom_wheel_event_get_delta_z ::
Ptr DOMWheelEvent ->
IO CDouble
dOMWheelEventGetDeltaZ ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWheelEvent a) =>
a
-> m Double
dOMWheelEventGetDeltaZ self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_wheel_event_get_delta_z self'
let result' = realToFrac result
touchManagedPtr self
return result'
data DOMWheelEventGetDeltaZMethodInfo
instance (signature ~ (m Double), MonadIO m, IsDOMWheelEvent a) => O.MethodInfo DOMWheelEventGetDeltaZMethodInfo a signature where
overloadedMethod _ = dOMWheelEventGetDeltaZ
foreign import ccall "webkit_dom_wheel_event_get_webkit_direction_inverted_from_device" webkit_dom_wheel_event_get_webkit_direction_inverted_from_device ::
Ptr DOMWheelEvent ->
IO CInt
dOMWheelEventGetWebkitDirectionInvertedFromDevice ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWheelEvent a) =>
a
-> m Bool
dOMWheelEventGetWebkitDirectionInvertedFromDevice self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_wheel_event_get_webkit_direction_inverted_from_device self'
let result' = (/= 0) result
touchManagedPtr self
return result'
data DOMWheelEventGetWebkitDirectionInvertedFromDeviceMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMWheelEvent a) => O.MethodInfo DOMWheelEventGetWebkitDirectionInvertedFromDeviceMethodInfo a signature where
overloadedMethod _ = dOMWheelEventGetWebkitDirectionInvertedFromDevice
foreign import ccall "webkit_dom_wheel_event_get_wheel_delta" webkit_dom_wheel_event_get_wheel_delta ::
Ptr DOMWheelEvent ->
IO CLong
dOMWheelEventGetWheelDelta ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWheelEvent a) =>
a
-> m CLong
dOMWheelEventGetWheelDelta self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_wheel_event_get_wheel_delta self'
touchManagedPtr self
return result
data DOMWheelEventGetWheelDeltaMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMWheelEvent a) => O.MethodInfo DOMWheelEventGetWheelDeltaMethodInfo a signature where
overloadedMethod _ = dOMWheelEventGetWheelDelta
foreign import ccall "webkit_dom_wheel_event_get_wheel_delta_x" webkit_dom_wheel_event_get_wheel_delta_x ::
Ptr DOMWheelEvent ->
IO CLong
dOMWheelEventGetWheelDeltaX ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWheelEvent a) =>
a
-> m CLong
dOMWheelEventGetWheelDeltaX self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_wheel_event_get_wheel_delta_x self'
touchManagedPtr self
return result
data DOMWheelEventGetWheelDeltaXMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMWheelEvent a) => O.MethodInfo DOMWheelEventGetWheelDeltaXMethodInfo a signature where
overloadedMethod _ = dOMWheelEventGetWheelDeltaX
foreign import ccall "webkit_dom_wheel_event_get_wheel_delta_y" webkit_dom_wheel_event_get_wheel_delta_y ::
Ptr DOMWheelEvent ->
IO CLong
dOMWheelEventGetWheelDeltaY ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWheelEvent a) =>
a
-> m CLong
dOMWheelEventGetWheelDeltaY self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_wheel_event_get_wheel_delta_y self'
touchManagedPtr self
return result
data DOMWheelEventGetWheelDeltaYMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMWheelEvent a) => O.MethodInfo DOMWheelEventGetWheelDeltaYMethodInfo a signature where
overloadedMethod _ = dOMWheelEventGetWheelDeltaY
foreign import ccall "webkit_dom_wheel_event_init_wheel_event" webkit_dom_wheel_event_init_wheel_event ::
Ptr DOMWheelEvent ->
CLong ->
CLong ->
Ptr WebKit.DOMDOMWindow.DOMDOMWindow ->
CLong ->
CLong ->
CLong ->
CLong ->
CInt ->
CInt ->
CInt ->
CInt ->
IO ()
dOMWheelEventInitWheelEvent ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWheelEvent a, WebKit.DOMDOMWindow.IsDOMDOMWindow b) =>
a
-> CLong
-> CLong
-> b
-> CLong
-> CLong
-> CLong
-> CLong
-> Bool
-> Bool
-> Bool
-> Bool
-> m ()
dOMWheelEventInitWheelEvent self wheelDeltaX wheelDeltaY view screenX screenY clientX clientY ctrlKey altKey shiftKey metaKey = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
view' <- unsafeManagedPtrCastPtr view
let ctrlKey' = (fromIntegral . fromEnum) ctrlKey
let altKey' = (fromIntegral . fromEnum) altKey
let shiftKey' = (fromIntegral . fromEnum) shiftKey
let metaKey' = (fromIntegral . fromEnum) metaKey
webkit_dom_wheel_event_init_wheel_event self' wheelDeltaX wheelDeltaY view' screenX screenY clientX clientY ctrlKey' altKey' shiftKey' metaKey'
touchManagedPtr self
touchManagedPtr view
return ()
data DOMWheelEventInitWheelEventMethodInfo
instance (signature ~ (CLong -> CLong -> b -> CLong -> CLong -> CLong -> CLong -> Bool -> Bool -> Bool -> Bool -> m ()), MonadIO m, IsDOMWheelEvent a, WebKit.DOMDOMWindow.IsDOMDOMWindow b) => O.MethodInfo DOMWheelEventInitWheelEventMethodInfo a signature where
overloadedMethod _ = dOMWheelEventInitWheelEvent