{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.WebKit2WebExtension.Objects.DOMUIEvent
(
DOMUIEvent(..) ,
IsDOMUIEvent ,
toDOMUIEvent ,
noDOMUIEvent ,
#if defined(ENABLE_OVERLOADING)
ResolveDOMUIEventMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
DOMUIEventGetCharCodeMethodInfo ,
#endif
dOMUIEventGetCharCode ,
#if defined(ENABLE_OVERLOADING)
DOMUIEventGetDetailMethodInfo ,
#endif
dOMUIEventGetDetail ,
#if defined(ENABLE_OVERLOADING)
DOMUIEventGetKeyCodeMethodInfo ,
#endif
dOMUIEventGetKeyCode ,
#if defined(ENABLE_OVERLOADING)
DOMUIEventGetLayerXMethodInfo ,
#endif
dOMUIEventGetLayerX ,
#if defined(ENABLE_OVERLOADING)
DOMUIEventGetLayerYMethodInfo ,
#endif
dOMUIEventGetLayerY ,
#if defined(ENABLE_OVERLOADING)
DOMUIEventGetPageXMethodInfo ,
#endif
dOMUIEventGetPageX ,
#if defined(ENABLE_OVERLOADING)
DOMUIEventGetPageYMethodInfo ,
#endif
dOMUIEventGetPageY ,
#if defined(ENABLE_OVERLOADING)
DOMUIEventGetViewMethodInfo ,
#endif
dOMUIEventGetView ,
#if defined(ENABLE_OVERLOADING)
DOMUIEventInitUiEventMethodInfo ,
#endif
dOMUIEventInitUiEvent ,
#if defined(ENABLE_OVERLOADING)
DOMUIEventCharCodePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMUIEventCharCode ,
#endif
getDOMUIEventCharCode ,
#if defined(ENABLE_OVERLOADING)
DOMUIEventDetailPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMUIEventDetail ,
#endif
getDOMUIEventDetail ,
#if defined(ENABLE_OVERLOADING)
DOMUIEventKeyCodePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMUIEventKeyCode ,
#endif
getDOMUIEventKeyCode ,
#if defined(ENABLE_OVERLOADING)
DOMUIEventLayerXPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMUIEventLayerX ,
#endif
getDOMUIEventLayerX ,
#if defined(ENABLE_OVERLOADING)
DOMUIEventLayerYPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMUIEventLayerY ,
#endif
getDOMUIEventLayerY ,
#if defined(ENABLE_OVERLOADING)
DOMUIEventPageXPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMUIEventPageX ,
#endif
getDOMUIEventPageX ,
#if defined(ENABLE_OVERLOADING)
DOMUIEventPageYPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMUIEventPageY ,
#endif
getDOMUIEventPageY ,
#if defined(ENABLE_OVERLOADING)
DOMUIEventViewPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMUIEventView ,
#endif
getDOMUIEventView ,
) 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.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
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 GHC.OverloadedLabels as OL
import qualified GI.GObject.Objects.Object as GObject.Object
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMDOMWindow as WebKit2WebExtension.DOMDOMWindow
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMEvent as WebKit2WebExtension.DOMEvent
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMObject as WebKit2WebExtension.DOMObject
newtype DOMUIEvent = DOMUIEvent (ManagedPtr DOMUIEvent)
deriving (DOMUIEvent -> DOMUIEvent -> Bool
(DOMUIEvent -> DOMUIEvent -> Bool)
-> (DOMUIEvent -> DOMUIEvent -> Bool) -> Eq DOMUIEvent
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DOMUIEvent -> DOMUIEvent -> Bool
$c/= :: DOMUIEvent -> DOMUIEvent -> Bool
== :: DOMUIEvent -> DOMUIEvent -> Bool
$c== :: DOMUIEvent -> DOMUIEvent -> Bool
Eq)
foreign import ccall "webkit_dom_ui_event_get_type"
c_webkit_dom_ui_event_get_type :: IO GType
instance GObject DOMUIEvent where
gobjectType :: IO GType
gobjectType = IO GType
c_webkit_dom_ui_event_get_type
instance B.GValue.IsGValue DOMUIEvent where
toGValue :: DOMUIEvent -> IO GValue
toGValue o :: DOMUIEvent
o = do
GType
gtype <- IO GType
c_webkit_dom_ui_event_get_type
DOMUIEvent -> (Ptr DOMUIEvent -> IO GValue) -> IO GValue
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr DOMUIEvent
o (GType
-> (GValue -> Ptr DOMUIEvent -> IO ())
-> Ptr DOMUIEvent
-> IO GValue
forall a. GType -> (GValue -> a -> IO ()) -> a -> IO GValue
B.GValue.buildGValue GType
gtype GValue -> Ptr DOMUIEvent -> IO ()
forall a. GObject a => GValue -> Ptr a -> IO ()
B.GValue.set_object)
fromGValue :: GValue -> IO DOMUIEvent
fromGValue gv :: GValue
gv = do
Ptr DOMUIEvent
ptr <- GValue -> IO (Ptr DOMUIEvent)
forall b. GObject b => GValue -> IO (Ptr b)
B.GValue.get_object GValue
gv :: IO (Ptr DOMUIEvent)
(ManagedPtr DOMUIEvent -> DOMUIEvent)
-> Ptr DOMUIEvent -> IO DOMUIEvent
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr DOMUIEvent -> DOMUIEvent
DOMUIEvent Ptr DOMUIEvent
ptr
class (GObject o, O.IsDescendantOf DOMUIEvent o) => IsDOMUIEvent o
instance (GObject o, O.IsDescendantOf DOMUIEvent o) => IsDOMUIEvent o
instance O.HasParentTypes DOMUIEvent
type instance O.ParentTypes DOMUIEvent = '[WebKit2WebExtension.DOMEvent.DOMEvent, WebKit2WebExtension.DOMObject.DOMObject, GObject.Object.Object]
toDOMUIEvent :: (MonadIO m, IsDOMUIEvent o) => o -> m DOMUIEvent
toDOMUIEvent :: o -> m DOMUIEvent
toDOMUIEvent = IO DOMUIEvent -> m DOMUIEvent
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMUIEvent -> m DOMUIEvent)
-> (o -> IO DOMUIEvent) -> o -> m DOMUIEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr DOMUIEvent -> DOMUIEvent) -> o -> IO DOMUIEvent
forall o o'.
(HasCallStack, GObject o, GObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
unsafeCastTo ManagedPtr DOMUIEvent -> DOMUIEvent
DOMUIEvent
noDOMUIEvent :: Maybe DOMUIEvent
noDOMUIEvent :: Maybe DOMUIEvent
noDOMUIEvent = Maybe DOMUIEvent
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveDOMUIEventMethod (t :: Symbol) (o :: *) :: * where
ResolveDOMUIEventMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveDOMUIEventMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveDOMUIEventMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveDOMUIEventMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveDOMUIEventMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveDOMUIEventMethod "initEvent" o = WebKit2WebExtension.DOMEvent.DOMEventInitEventMethodInfo
ResolveDOMUIEventMethod "initUiEvent" o = DOMUIEventInitUiEventMethodInfo
ResolveDOMUIEventMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveDOMUIEventMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveDOMUIEventMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveDOMUIEventMethod "preventDefault" o = WebKit2WebExtension.DOMEvent.DOMEventPreventDefaultMethodInfo
ResolveDOMUIEventMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveDOMUIEventMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveDOMUIEventMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveDOMUIEventMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveDOMUIEventMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveDOMUIEventMethod "stopPropagation" o = WebKit2WebExtension.DOMEvent.DOMEventStopPropagationMethodInfo
ResolveDOMUIEventMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveDOMUIEventMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveDOMUIEventMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveDOMUIEventMethod "getBubbles" o = WebKit2WebExtension.DOMEvent.DOMEventGetBubblesMethodInfo
ResolveDOMUIEventMethod "getCancelBubble" o = WebKit2WebExtension.DOMEvent.DOMEventGetCancelBubbleMethodInfo
ResolveDOMUIEventMethod "getCancelable" o = WebKit2WebExtension.DOMEvent.DOMEventGetCancelableMethodInfo
ResolveDOMUIEventMethod "getCharCode" o = DOMUIEventGetCharCodeMethodInfo
ResolveDOMUIEventMethod "getCurrentTarget" o = WebKit2WebExtension.DOMEvent.DOMEventGetCurrentTargetMethodInfo
ResolveDOMUIEventMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveDOMUIEventMethod "getDetail" o = DOMUIEventGetDetailMethodInfo
ResolveDOMUIEventMethod "getEventPhase" o = WebKit2WebExtension.DOMEvent.DOMEventGetEventPhaseMethodInfo
ResolveDOMUIEventMethod "getEventType" o = WebKit2WebExtension.DOMEvent.DOMEventGetEventTypeMethodInfo
ResolveDOMUIEventMethod "getKeyCode" o = DOMUIEventGetKeyCodeMethodInfo
ResolveDOMUIEventMethod "getLayerX" o = DOMUIEventGetLayerXMethodInfo
ResolveDOMUIEventMethod "getLayerY" o = DOMUIEventGetLayerYMethodInfo
ResolveDOMUIEventMethod "getPageX" o = DOMUIEventGetPageXMethodInfo
ResolveDOMUIEventMethod "getPageY" o = DOMUIEventGetPageYMethodInfo
ResolveDOMUIEventMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveDOMUIEventMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveDOMUIEventMethod "getReturnValue" o = WebKit2WebExtension.DOMEvent.DOMEventGetReturnValueMethodInfo
ResolveDOMUIEventMethod "getSrcElement" o = WebKit2WebExtension.DOMEvent.DOMEventGetSrcElementMethodInfo
ResolveDOMUIEventMethod "getTarget" o = WebKit2WebExtension.DOMEvent.DOMEventGetTargetMethodInfo
ResolveDOMUIEventMethod "getTimeStamp" o = WebKit2WebExtension.DOMEvent.DOMEventGetTimeStampMethodInfo
ResolveDOMUIEventMethod "getView" o = DOMUIEventGetViewMethodInfo
ResolveDOMUIEventMethod "setCancelBubble" o = WebKit2WebExtension.DOMEvent.DOMEventSetCancelBubbleMethodInfo
ResolveDOMUIEventMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveDOMUIEventMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveDOMUIEventMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveDOMUIEventMethod "setReturnValue" o = WebKit2WebExtension.DOMEvent.DOMEventSetReturnValueMethodInfo
ResolveDOMUIEventMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveDOMUIEventMethod t DOMUIEvent, O.MethodInfo info DOMUIEvent p) => OL.IsLabel t (DOMUIEvent -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#endif
getDOMUIEventCharCode :: (MonadIO m, IsDOMUIEvent o) => o -> m CLong
getDOMUIEventCharCode :: o -> m CLong
getDOMUIEventCharCode obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "char-code"
#if defined(ENABLE_OVERLOADING)
data DOMUIEventCharCodePropertyInfo
instance AttrInfo DOMUIEventCharCodePropertyInfo where
type AttrAllowedOps DOMUIEventCharCodePropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMUIEventCharCodePropertyInfo = IsDOMUIEvent
type AttrSetTypeConstraint DOMUIEventCharCodePropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMUIEventCharCodePropertyInfo = (~) ()
type AttrTransferType DOMUIEventCharCodePropertyInfo = ()
type AttrGetType DOMUIEventCharCodePropertyInfo = CLong
type AttrLabel DOMUIEventCharCodePropertyInfo = "char-code"
type AttrOrigin DOMUIEventCharCodePropertyInfo = DOMUIEvent
attrGet = getDOMUIEventCharCode
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMUIEventDetail :: (MonadIO m, IsDOMUIEvent o) => o -> m CLong
getDOMUIEventDetail :: o -> m CLong
getDOMUIEventDetail obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "detail"
#if defined(ENABLE_OVERLOADING)
data DOMUIEventDetailPropertyInfo
instance AttrInfo DOMUIEventDetailPropertyInfo where
type AttrAllowedOps DOMUIEventDetailPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMUIEventDetailPropertyInfo = IsDOMUIEvent
type AttrSetTypeConstraint DOMUIEventDetailPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMUIEventDetailPropertyInfo = (~) ()
type AttrTransferType DOMUIEventDetailPropertyInfo = ()
type AttrGetType DOMUIEventDetailPropertyInfo = CLong
type AttrLabel DOMUIEventDetailPropertyInfo = "detail"
type AttrOrigin DOMUIEventDetailPropertyInfo = DOMUIEvent
attrGet = getDOMUIEventDetail
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMUIEventKeyCode :: (MonadIO m, IsDOMUIEvent o) => o -> m CLong
getDOMUIEventKeyCode :: o -> m CLong
getDOMUIEventKeyCode obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "key-code"
#if defined(ENABLE_OVERLOADING)
data DOMUIEventKeyCodePropertyInfo
instance AttrInfo DOMUIEventKeyCodePropertyInfo where
type AttrAllowedOps DOMUIEventKeyCodePropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMUIEventKeyCodePropertyInfo = IsDOMUIEvent
type AttrSetTypeConstraint DOMUIEventKeyCodePropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMUIEventKeyCodePropertyInfo = (~) ()
type AttrTransferType DOMUIEventKeyCodePropertyInfo = ()
type AttrGetType DOMUIEventKeyCodePropertyInfo = CLong
type AttrLabel DOMUIEventKeyCodePropertyInfo = "key-code"
type AttrOrigin DOMUIEventKeyCodePropertyInfo = DOMUIEvent
attrGet = getDOMUIEventKeyCode
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMUIEventLayerX :: (MonadIO m, IsDOMUIEvent o) => o -> m CLong
getDOMUIEventLayerX :: o -> m CLong
getDOMUIEventLayerX obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "layer-x"
#if defined(ENABLE_OVERLOADING)
data DOMUIEventLayerXPropertyInfo
instance AttrInfo DOMUIEventLayerXPropertyInfo where
type AttrAllowedOps DOMUIEventLayerXPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMUIEventLayerXPropertyInfo = IsDOMUIEvent
type AttrSetTypeConstraint DOMUIEventLayerXPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMUIEventLayerXPropertyInfo = (~) ()
type AttrTransferType DOMUIEventLayerXPropertyInfo = ()
type AttrGetType DOMUIEventLayerXPropertyInfo = CLong
type AttrLabel DOMUIEventLayerXPropertyInfo = "layer-x"
type AttrOrigin DOMUIEventLayerXPropertyInfo = DOMUIEvent
attrGet = getDOMUIEventLayerX
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMUIEventLayerY :: (MonadIO m, IsDOMUIEvent o) => o -> m CLong
getDOMUIEventLayerY :: o -> m CLong
getDOMUIEventLayerY obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "layer-y"
#if defined(ENABLE_OVERLOADING)
data DOMUIEventLayerYPropertyInfo
instance AttrInfo DOMUIEventLayerYPropertyInfo where
type AttrAllowedOps DOMUIEventLayerYPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMUIEventLayerYPropertyInfo = IsDOMUIEvent
type AttrSetTypeConstraint DOMUIEventLayerYPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMUIEventLayerYPropertyInfo = (~) ()
type AttrTransferType DOMUIEventLayerYPropertyInfo = ()
type AttrGetType DOMUIEventLayerYPropertyInfo = CLong
type AttrLabel DOMUIEventLayerYPropertyInfo = "layer-y"
type AttrOrigin DOMUIEventLayerYPropertyInfo = DOMUIEvent
attrGet = getDOMUIEventLayerY
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMUIEventPageX :: (MonadIO m, IsDOMUIEvent o) => o -> m CLong
getDOMUIEventPageX :: o -> m CLong
getDOMUIEventPageX obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "page-x"
#if defined(ENABLE_OVERLOADING)
data DOMUIEventPageXPropertyInfo
instance AttrInfo DOMUIEventPageXPropertyInfo where
type AttrAllowedOps DOMUIEventPageXPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMUIEventPageXPropertyInfo = IsDOMUIEvent
type AttrSetTypeConstraint DOMUIEventPageXPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMUIEventPageXPropertyInfo = (~) ()
type AttrTransferType DOMUIEventPageXPropertyInfo = ()
type AttrGetType DOMUIEventPageXPropertyInfo = CLong
type AttrLabel DOMUIEventPageXPropertyInfo = "page-x"
type AttrOrigin DOMUIEventPageXPropertyInfo = DOMUIEvent
attrGet = getDOMUIEventPageX
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMUIEventPageY :: (MonadIO m, IsDOMUIEvent o) => o -> m CLong
getDOMUIEventPageY :: o -> m CLong
getDOMUIEventPageY obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "page-y"
#if defined(ENABLE_OVERLOADING)
data DOMUIEventPageYPropertyInfo
instance AttrInfo DOMUIEventPageYPropertyInfo where
type AttrAllowedOps DOMUIEventPageYPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMUIEventPageYPropertyInfo = IsDOMUIEvent
type AttrSetTypeConstraint DOMUIEventPageYPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMUIEventPageYPropertyInfo = (~) ()
type AttrTransferType DOMUIEventPageYPropertyInfo = ()
type AttrGetType DOMUIEventPageYPropertyInfo = CLong
type AttrLabel DOMUIEventPageYPropertyInfo = "page-y"
type AttrOrigin DOMUIEventPageYPropertyInfo = DOMUIEvent
attrGet = getDOMUIEventPageY
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMUIEventView :: (MonadIO m, IsDOMUIEvent o) => o -> m (Maybe WebKit2WebExtension.DOMDOMWindow.DOMDOMWindow)
getDOMUIEventView :: o -> m (Maybe DOMDOMWindow)
getDOMUIEventView obj :: o
obj = IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow))
-> IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr DOMDOMWindow -> DOMDOMWindow)
-> IO (Maybe DOMDOMWindow)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj "view" ManagedPtr DOMDOMWindow -> DOMDOMWindow
WebKit2WebExtension.DOMDOMWindow.DOMDOMWindow
#if defined(ENABLE_OVERLOADING)
data DOMUIEventViewPropertyInfo
instance AttrInfo DOMUIEventViewPropertyInfo where
type AttrAllowedOps DOMUIEventViewPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint DOMUIEventViewPropertyInfo = IsDOMUIEvent
type AttrSetTypeConstraint DOMUIEventViewPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMUIEventViewPropertyInfo = (~) ()
type AttrTransferType DOMUIEventViewPropertyInfo = ()
type AttrGetType DOMUIEventViewPropertyInfo = (Maybe WebKit2WebExtension.DOMDOMWindow.DOMDOMWindow)
type AttrLabel DOMUIEventViewPropertyInfo = "view"
type AttrOrigin DOMUIEventViewPropertyInfo = DOMUIEvent
attrGet = getDOMUIEventView
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList DOMUIEvent
type instance O.AttributeList DOMUIEvent = DOMUIEventAttributeList
type DOMUIEventAttributeList = ('[ '("bubbles", WebKit2WebExtension.DOMEvent.DOMEventBubblesPropertyInfo), '("cancelBubble", WebKit2WebExtension.DOMEvent.DOMEventCancelBubblePropertyInfo), '("cancelable", WebKit2WebExtension.DOMEvent.DOMEventCancelablePropertyInfo), '("charCode", DOMUIEventCharCodePropertyInfo), '("coreObject", WebKit2WebExtension.DOMObject.DOMObjectCoreObjectPropertyInfo), '("currentTarget", WebKit2WebExtension.DOMEvent.DOMEventCurrentTargetPropertyInfo), '("detail", DOMUIEventDetailPropertyInfo), '("eventPhase", WebKit2WebExtension.DOMEvent.DOMEventEventPhasePropertyInfo), '("keyCode", DOMUIEventKeyCodePropertyInfo), '("layerX", DOMUIEventLayerXPropertyInfo), '("layerY", DOMUIEventLayerYPropertyInfo), '("pageX", DOMUIEventPageXPropertyInfo), '("pageY", DOMUIEventPageYPropertyInfo), '("returnValue", WebKit2WebExtension.DOMEvent.DOMEventReturnValuePropertyInfo), '("srcElement", WebKit2WebExtension.DOMEvent.DOMEventSrcElementPropertyInfo), '("target", WebKit2WebExtension.DOMEvent.DOMEventTargetPropertyInfo), '("timeStamp", WebKit2WebExtension.DOMEvent.DOMEventTimeStampPropertyInfo), '("type", WebKit2WebExtension.DOMEvent.DOMEventTypePropertyInfo), '("view", DOMUIEventViewPropertyInfo)] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
dOMUIEventCharCode :: AttrLabelProxy "charCode"
dOMUIEventCharCode = AttrLabelProxy
dOMUIEventDetail :: AttrLabelProxy "detail"
dOMUIEventDetail = AttrLabelProxy
dOMUIEventKeyCode :: AttrLabelProxy "keyCode"
dOMUIEventKeyCode = AttrLabelProxy
dOMUIEventLayerX :: AttrLabelProxy "layerX"
dOMUIEventLayerX = AttrLabelProxy
dOMUIEventLayerY :: AttrLabelProxy "layerY"
dOMUIEventLayerY = AttrLabelProxy
dOMUIEventPageX :: AttrLabelProxy "pageX"
dOMUIEventPageX = AttrLabelProxy
dOMUIEventPageY :: AttrLabelProxy "pageY"
dOMUIEventPageY = AttrLabelProxy
dOMUIEventView :: AttrLabelProxy "view"
dOMUIEventView = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList DOMUIEvent = DOMUIEventSignalList
type DOMUIEventSignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "webkit_dom_ui_event_get_char_code" webkit_dom_ui_event_get_char_code ::
Ptr DOMUIEvent ->
IO CLong
{-# DEPRECATED dOMUIEventGetCharCode ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMUIEventGetCharCode ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMUIEvent a) =>
a
-> m CLong
dOMUIEventGetCharCode :: a -> m CLong
dOMUIEventGetCharCode self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMUIEvent
self' <- a -> IO (Ptr DOMUIEvent)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMUIEvent -> IO CLong
webkit_dom_ui_event_get_char_code Ptr DOMUIEvent
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMUIEventGetCharCodeMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMUIEvent a) => O.MethodInfo DOMUIEventGetCharCodeMethodInfo a signature where
overloadedMethod = dOMUIEventGetCharCode
#endif
foreign import ccall "webkit_dom_ui_event_get_detail" webkit_dom_ui_event_get_detail ::
Ptr DOMUIEvent ->
IO CLong
{-# DEPRECATED dOMUIEventGetDetail ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMUIEventGetDetail ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMUIEvent a) =>
a
-> m CLong
dOMUIEventGetDetail :: a -> m CLong
dOMUIEventGetDetail self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMUIEvent
self' <- a -> IO (Ptr DOMUIEvent)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMUIEvent -> IO CLong
webkit_dom_ui_event_get_detail Ptr DOMUIEvent
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMUIEventGetDetailMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMUIEvent a) => O.MethodInfo DOMUIEventGetDetailMethodInfo a signature where
overloadedMethod = dOMUIEventGetDetail
#endif
foreign import ccall "webkit_dom_ui_event_get_key_code" webkit_dom_ui_event_get_key_code ::
Ptr DOMUIEvent ->
IO CLong
{-# DEPRECATED dOMUIEventGetKeyCode ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMUIEventGetKeyCode ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMUIEvent a) =>
a
-> m CLong
dOMUIEventGetKeyCode :: a -> m CLong
dOMUIEventGetKeyCode self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMUIEvent
self' <- a -> IO (Ptr DOMUIEvent)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMUIEvent -> IO CLong
webkit_dom_ui_event_get_key_code Ptr DOMUIEvent
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMUIEventGetKeyCodeMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMUIEvent a) => O.MethodInfo DOMUIEventGetKeyCodeMethodInfo a signature where
overloadedMethod = dOMUIEventGetKeyCode
#endif
foreign import ccall "webkit_dom_ui_event_get_layer_x" webkit_dom_ui_event_get_layer_x ::
Ptr DOMUIEvent ->
IO CLong
{-# DEPRECATED dOMUIEventGetLayerX ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMUIEventGetLayerX ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMUIEvent a) =>
a
-> m CLong
dOMUIEventGetLayerX :: a -> m CLong
dOMUIEventGetLayerX self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMUIEvent
self' <- a -> IO (Ptr DOMUIEvent)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMUIEvent -> IO CLong
webkit_dom_ui_event_get_layer_x Ptr DOMUIEvent
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMUIEventGetLayerXMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMUIEvent a) => O.MethodInfo DOMUIEventGetLayerXMethodInfo a signature where
overloadedMethod = dOMUIEventGetLayerX
#endif
foreign import ccall "webkit_dom_ui_event_get_layer_y" webkit_dom_ui_event_get_layer_y ::
Ptr DOMUIEvent ->
IO CLong
{-# DEPRECATED dOMUIEventGetLayerY ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMUIEventGetLayerY ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMUIEvent a) =>
a
-> m CLong
dOMUIEventGetLayerY :: a -> m CLong
dOMUIEventGetLayerY self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMUIEvent
self' <- a -> IO (Ptr DOMUIEvent)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMUIEvent -> IO CLong
webkit_dom_ui_event_get_layer_y Ptr DOMUIEvent
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMUIEventGetLayerYMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMUIEvent a) => O.MethodInfo DOMUIEventGetLayerYMethodInfo a signature where
overloadedMethod = dOMUIEventGetLayerY
#endif
foreign import ccall "webkit_dom_ui_event_get_page_x" webkit_dom_ui_event_get_page_x ::
Ptr DOMUIEvent ->
IO CLong
{-# DEPRECATED dOMUIEventGetPageX ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMUIEventGetPageX ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMUIEvent a) =>
a
-> m CLong
dOMUIEventGetPageX :: a -> m CLong
dOMUIEventGetPageX self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMUIEvent
self' <- a -> IO (Ptr DOMUIEvent)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMUIEvent -> IO CLong
webkit_dom_ui_event_get_page_x Ptr DOMUIEvent
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMUIEventGetPageXMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMUIEvent a) => O.MethodInfo DOMUIEventGetPageXMethodInfo a signature where
overloadedMethod = dOMUIEventGetPageX
#endif
foreign import ccall "webkit_dom_ui_event_get_page_y" webkit_dom_ui_event_get_page_y ::
Ptr DOMUIEvent ->
IO CLong
{-# DEPRECATED dOMUIEventGetPageY ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMUIEventGetPageY ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMUIEvent a) =>
a
-> m CLong
dOMUIEventGetPageY :: a -> m CLong
dOMUIEventGetPageY self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMUIEvent
self' <- a -> IO (Ptr DOMUIEvent)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMUIEvent -> IO CLong
webkit_dom_ui_event_get_page_y Ptr DOMUIEvent
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMUIEventGetPageYMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMUIEvent a) => O.MethodInfo DOMUIEventGetPageYMethodInfo a signature where
overloadedMethod = dOMUIEventGetPageY
#endif
foreign import ccall "webkit_dom_ui_event_get_view" webkit_dom_ui_event_get_view ::
Ptr DOMUIEvent ->
IO (Ptr WebKit2WebExtension.DOMDOMWindow.DOMDOMWindow)
{-# DEPRECATED dOMUIEventGetView ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMUIEventGetView ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMUIEvent a) =>
a
-> m WebKit2WebExtension.DOMDOMWindow.DOMDOMWindow
dOMUIEventGetView :: a -> m DOMDOMWindow
dOMUIEventGetView self :: a
self = IO DOMDOMWindow -> m DOMDOMWindow
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMDOMWindow -> m DOMDOMWindow)
-> IO DOMDOMWindow -> m DOMDOMWindow
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMUIEvent
self' <- a -> IO (Ptr DOMUIEvent)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMDOMWindow
result <- Ptr DOMUIEvent -> IO (Ptr DOMDOMWindow)
webkit_dom_ui_event_get_view Ptr DOMUIEvent
self'
Text -> Ptr DOMDOMWindow -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "dOMUIEventGetView" Ptr DOMDOMWindow
result
DOMDOMWindow
result' <- ((ManagedPtr DOMDOMWindow -> DOMDOMWindow)
-> Ptr DOMDOMWindow -> IO DOMDOMWindow
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
wrapObject ManagedPtr DOMDOMWindow -> DOMDOMWindow
WebKit2WebExtension.DOMDOMWindow.DOMDOMWindow) Ptr DOMDOMWindow
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
DOMDOMWindow -> IO DOMDOMWindow
forall (m :: * -> *) a. Monad m => a -> m a
return DOMDOMWindow
result'
#if defined(ENABLE_OVERLOADING)
data DOMUIEventGetViewMethodInfo
instance (signature ~ (m WebKit2WebExtension.DOMDOMWindow.DOMDOMWindow), MonadIO m, IsDOMUIEvent a) => O.MethodInfo DOMUIEventGetViewMethodInfo a signature where
overloadedMethod = dOMUIEventGetView
#endif
foreign import ccall "webkit_dom_ui_event_init_ui_event" webkit_dom_ui_event_init_ui_event ::
Ptr DOMUIEvent ->
CString ->
CInt ->
CInt ->
Ptr WebKit2WebExtension.DOMDOMWindow.DOMDOMWindow ->
CLong ->
IO ()
{-# DEPRECATED dOMUIEventInitUiEvent ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMUIEventInitUiEvent ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMUIEvent a, WebKit2WebExtension.DOMDOMWindow.IsDOMDOMWindow b) =>
a
-> T.Text
-> Bool
-> Bool
-> b
-> CLong
-> m ()
dOMUIEventInitUiEvent :: a -> Text -> Bool -> Bool -> b -> CLong -> m ()
dOMUIEventInitUiEvent self :: a
self type_ :: Text
type_ canBubble :: Bool
canBubble cancelable :: Bool
cancelable view :: b
view detail :: CLong
detail = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMUIEvent
self' <- a -> IO (Ptr DOMUIEvent)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
type_' <- Text -> IO CString
textToCString Text
type_
let canBubble' :: CInt
canBubble' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
canBubble
let cancelable' :: CInt
cancelable' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
cancelable
Ptr DOMDOMWindow
view' <- b -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
view
Ptr DOMUIEvent
-> CString -> CInt -> CInt -> Ptr DOMDOMWindow -> CLong -> IO ()
webkit_dom_ui_event_init_ui_event Ptr DOMUIEvent
self' CString
type_' CInt
canBubble' CInt
cancelable' Ptr DOMDOMWindow
view' CLong
detail
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
view
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
type_'
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMUIEventInitUiEventMethodInfo
instance (signature ~ (T.Text -> Bool -> Bool -> b -> CLong -> m ()), MonadIO m, IsDOMUIEvent a, WebKit2WebExtension.DOMDOMWindow.IsDOMDOMWindow b) => O.MethodInfo DOMUIEventInitUiEventMethodInfo a signature where
overloadedMethod = dOMUIEventInitUiEvent
#endif