{- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 Maintainer : Iñaki García Etxebarria (garetxe@gmail.com) -} module GI.WebKit2WebExtension.Objects.DOMUIEvent ( -- * Exported types DOMUIEvent(..) , DOMUIEventK , toDOMUIEvent , noDOMUIEvent , -- * Methods -- ** dOMUIEventGetCharCode DOMUIEventGetCharCodeMethodInfo , dOMUIEventGetCharCode , -- ** dOMUIEventGetDetail DOMUIEventGetDetailMethodInfo , dOMUIEventGetDetail , -- ** dOMUIEventGetKeyCode DOMUIEventGetKeyCodeMethodInfo , dOMUIEventGetKeyCode , -- ** dOMUIEventGetLayerX DOMUIEventGetLayerXMethodInfo , dOMUIEventGetLayerX , -- ** dOMUIEventGetLayerY DOMUIEventGetLayerYMethodInfo , dOMUIEventGetLayerY , -- ** dOMUIEventGetPageX DOMUIEventGetPageXMethodInfo , dOMUIEventGetPageX , -- ** dOMUIEventGetPageY DOMUIEventGetPageYMethodInfo , dOMUIEventGetPageY , -- ** dOMUIEventGetView DOMUIEventGetViewMethodInfo , dOMUIEventGetView , -- ** dOMUIEventInitUiEvent DOMUIEventInitUiEventMethodInfo , dOMUIEventInitUiEvent , -- * Properties -- ** CharCode DOMUIEventCharCodePropertyInfo , getDOMUIEventCharCode , -- ** Detail DOMUIEventDetailPropertyInfo , getDOMUIEventDetail , -- ** KeyCode DOMUIEventKeyCodePropertyInfo , getDOMUIEventKeyCode , -- ** LayerX DOMUIEventLayerXPropertyInfo , getDOMUIEventLayerX , -- ** LayerY DOMUIEventLayerYPropertyInfo , getDOMUIEventLayerY , -- ** PageX DOMUIEventPageXPropertyInfo , getDOMUIEventPageX , -- ** PageY DOMUIEventPageYPropertyInfo , getDOMUIEventPageY , -- ** View DOMUIEventViewPropertyInfo , getDOMUIEventView , -- ** Which DOMUIEventWhichPropertyInfo , getDOMUIEventWhich , ) where import Prelude () import Data.GI.Base.ShortPrelude import qualified Data.Text as T import qualified Data.ByteString.Char8 as B import qualified Data.Map as Map import GI.WebKit2WebExtension.Types import GI.WebKit2WebExtension.Callbacks import qualified GI.GObject as GObject newtype DOMUIEvent = DOMUIEvent (ForeignPtr DOMUIEvent) foreign import ccall "webkit_dom_ui_event_get_type" c_webkit_dom_ui_event_get_type :: IO GType type instance ParentTypes DOMUIEvent = DOMUIEventParentTypes type DOMUIEventParentTypes = '[DOMEvent, DOMObject, GObject.Object] instance GObject DOMUIEvent where gobjectIsInitiallyUnowned _ = False gobjectType _ = c_webkit_dom_ui_event_get_type class GObject o => DOMUIEventK o instance (GObject o, IsDescendantOf DOMUIEvent o) => DOMUIEventK o toDOMUIEvent :: DOMUIEventK o => o -> IO DOMUIEvent toDOMUIEvent = unsafeCastTo DOMUIEvent noDOMUIEvent :: Maybe DOMUIEvent noDOMUIEvent = Nothing type family ResolveDOMUIEventMethod (t :: Symbol) (o :: *) :: * where ResolveDOMUIEventMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo ResolveDOMUIEventMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo ResolveDOMUIEventMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo ResolveDOMUIEventMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo ResolveDOMUIEventMethod "initEvent" o = DOMEventInitEventMethodInfo ResolveDOMUIEventMethod "initUiEvent" o = DOMUIEventInitUiEventMethodInfo ResolveDOMUIEventMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo ResolveDOMUIEventMethod "notify" o = GObject.ObjectNotifyMethodInfo ResolveDOMUIEventMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo ResolveDOMUIEventMethod "preventDefault" o = DOMEventPreventDefaultMethodInfo ResolveDOMUIEventMethod "ref" o = GObject.ObjectRefMethodInfo ResolveDOMUIEventMethod "refSink" o = GObject.ObjectRefSinkMethodInfo ResolveDOMUIEventMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo ResolveDOMUIEventMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo ResolveDOMUIEventMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo ResolveDOMUIEventMethod "stealData" o = GObject.ObjectStealDataMethodInfo ResolveDOMUIEventMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo ResolveDOMUIEventMethod "stopPropagation" o = DOMEventStopPropagationMethodInfo ResolveDOMUIEventMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo ResolveDOMUIEventMethod "unref" o = GObject.ObjectUnrefMethodInfo ResolveDOMUIEventMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo ResolveDOMUIEventMethod "getBubbles" o = DOMEventGetBubblesMethodInfo ResolveDOMUIEventMethod "getCancelBubble" o = DOMEventGetCancelBubbleMethodInfo ResolveDOMUIEventMethod "getCancelable" o = DOMEventGetCancelableMethodInfo ResolveDOMUIEventMethod "getCharCode" o = DOMUIEventGetCharCodeMethodInfo ResolveDOMUIEventMethod "getCurrentTarget" o = DOMEventGetCurrentTargetMethodInfo ResolveDOMUIEventMethod "getData" o = GObject.ObjectGetDataMethodInfo ResolveDOMUIEventMethod "getDetail" o = DOMUIEventGetDetailMethodInfo ResolveDOMUIEventMethod "getEventPhase" o = DOMEventGetEventPhaseMethodInfo ResolveDOMUIEventMethod "getEventType" o = 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.ObjectGetPropertyMethodInfo ResolveDOMUIEventMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo ResolveDOMUIEventMethod "getReturnValue" o = DOMEventGetReturnValueMethodInfo ResolveDOMUIEventMethod "getSrcElement" o = DOMEventGetSrcElementMethodInfo ResolveDOMUIEventMethod "getTarget" o = DOMEventGetTargetMethodInfo ResolveDOMUIEventMethod "getTimeStamp" o = DOMEventGetTimeStampMethodInfo ResolveDOMUIEventMethod "getView" o = DOMUIEventGetViewMethodInfo ResolveDOMUIEventMethod "setCancelBubble" o = DOMEventSetCancelBubbleMethodInfo ResolveDOMUIEventMethod "setData" o = GObject.ObjectSetDataMethodInfo ResolveDOMUIEventMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo ResolveDOMUIEventMethod "setReturnValue" o = DOMEventSetReturnValueMethodInfo ResolveDOMUIEventMethod l o = MethodResolutionFailed l o instance (info ~ ResolveDOMUIEventMethod t DOMUIEvent, MethodInfo info DOMUIEvent p) => IsLabelProxy t (DOMUIEvent -> p) where fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) #if MIN_VERSION_base(4,9,0) instance (info ~ ResolveDOMUIEventMethod t DOMUIEvent, MethodInfo info DOMUIEvent p) => IsLabel t (DOMUIEvent -> p) where fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) #endif -- VVV Prop "char-code" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable] getDOMUIEventCharCode :: (MonadIO m, DOMUIEventK o) => o -> m Int64 getDOMUIEventCharCode obj = liftIO $ getObjectPropertyInt64 obj "char-code" data DOMUIEventCharCodePropertyInfo instance AttrInfo DOMUIEventCharCodePropertyInfo where type AttrAllowedOps DOMUIEventCharCodePropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMUIEventCharCodePropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventCharCodePropertyInfo = DOMUIEventK type AttrGetType DOMUIEventCharCodePropertyInfo = Int64 type AttrLabel DOMUIEventCharCodePropertyInfo = "char-code" attrGet _ = getDOMUIEventCharCode attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "detail" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable] getDOMUIEventDetail :: (MonadIO m, DOMUIEventK o) => o -> m Int64 getDOMUIEventDetail obj = liftIO $ getObjectPropertyInt64 obj "detail" data DOMUIEventDetailPropertyInfo instance AttrInfo DOMUIEventDetailPropertyInfo where type AttrAllowedOps DOMUIEventDetailPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMUIEventDetailPropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventDetailPropertyInfo = DOMUIEventK type AttrGetType DOMUIEventDetailPropertyInfo = Int64 type AttrLabel DOMUIEventDetailPropertyInfo = "detail" attrGet _ = getDOMUIEventDetail attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "key-code" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable] getDOMUIEventKeyCode :: (MonadIO m, DOMUIEventK o) => o -> m Int64 getDOMUIEventKeyCode obj = liftIO $ getObjectPropertyInt64 obj "key-code" data DOMUIEventKeyCodePropertyInfo instance AttrInfo DOMUIEventKeyCodePropertyInfo where type AttrAllowedOps DOMUIEventKeyCodePropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMUIEventKeyCodePropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventKeyCodePropertyInfo = DOMUIEventK type AttrGetType DOMUIEventKeyCodePropertyInfo = Int64 type AttrLabel DOMUIEventKeyCodePropertyInfo = "key-code" attrGet _ = getDOMUIEventKeyCode attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "layer-x" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable] getDOMUIEventLayerX :: (MonadIO m, DOMUIEventK o) => o -> m Int64 getDOMUIEventLayerX obj = liftIO $ getObjectPropertyInt64 obj "layer-x" data DOMUIEventLayerXPropertyInfo instance AttrInfo DOMUIEventLayerXPropertyInfo where type AttrAllowedOps DOMUIEventLayerXPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMUIEventLayerXPropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventLayerXPropertyInfo = DOMUIEventK type AttrGetType DOMUIEventLayerXPropertyInfo = Int64 type AttrLabel DOMUIEventLayerXPropertyInfo = "layer-x" attrGet _ = getDOMUIEventLayerX attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "layer-y" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable] getDOMUIEventLayerY :: (MonadIO m, DOMUIEventK o) => o -> m Int64 getDOMUIEventLayerY obj = liftIO $ getObjectPropertyInt64 obj "layer-y" data DOMUIEventLayerYPropertyInfo instance AttrInfo DOMUIEventLayerYPropertyInfo where type AttrAllowedOps DOMUIEventLayerYPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMUIEventLayerYPropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventLayerYPropertyInfo = DOMUIEventK type AttrGetType DOMUIEventLayerYPropertyInfo = Int64 type AttrLabel DOMUIEventLayerYPropertyInfo = "layer-y" attrGet _ = getDOMUIEventLayerY attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "page-x" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable] getDOMUIEventPageX :: (MonadIO m, DOMUIEventK o) => o -> m Int64 getDOMUIEventPageX obj = liftIO $ getObjectPropertyInt64 obj "page-x" data DOMUIEventPageXPropertyInfo instance AttrInfo DOMUIEventPageXPropertyInfo where type AttrAllowedOps DOMUIEventPageXPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMUIEventPageXPropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventPageXPropertyInfo = DOMUIEventK type AttrGetType DOMUIEventPageXPropertyInfo = Int64 type AttrLabel DOMUIEventPageXPropertyInfo = "page-x" attrGet _ = getDOMUIEventPageX attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "page-y" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable] getDOMUIEventPageY :: (MonadIO m, DOMUIEventK o) => o -> m Int64 getDOMUIEventPageY obj = liftIO $ getObjectPropertyInt64 obj "page-y" data DOMUIEventPageYPropertyInfo instance AttrInfo DOMUIEventPageYPropertyInfo where type AttrAllowedOps DOMUIEventPageYPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMUIEventPageYPropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventPageYPropertyInfo = DOMUIEventK type AttrGetType DOMUIEventPageYPropertyInfo = Int64 type AttrLabel DOMUIEventPageYPropertyInfo = "page-y" attrGet _ = getDOMUIEventPageY attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "view" -- Type: TInterface "WebKit2WebExtension" "DOMDOMWindow" -- Flags: [PropertyReadable] getDOMUIEventView :: (MonadIO m, DOMUIEventK o) => o -> m DOMDOMWindow getDOMUIEventView obj = liftIO $ getObjectPropertyObject obj "view" DOMDOMWindow data DOMUIEventViewPropertyInfo instance AttrInfo DOMUIEventViewPropertyInfo where type AttrAllowedOps DOMUIEventViewPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMUIEventViewPropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventViewPropertyInfo = DOMUIEventK type AttrGetType DOMUIEventViewPropertyInfo = DOMDOMWindow type AttrLabel DOMUIEventViewPropertyInfo = "view" attrGet _ = getDOMUIEventView attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "which" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable] getDOMUIEventWhich :: (MonadIO m, DOMUIEventK o) => o -> m Int64 getDOMUIEventWhich obj = liftIO $ getObjectPropertyInt64 obj "which" data DOMUIEventWhichPropertyInfo instance AttrInfo DOMUIEventWhichPropertyInfo where type AttrAllowedOps DOMUIEventWhichPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMUIEventWhichPropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventWhichPropertyInfo = DOMUIEventK type AttrGetType DOMUIEventWhichPropertyInfo = Int64 type AttrLabel DOMUIEventWhichPropertyInfo = "which" attrGet _ = getDOMUIEventWhich attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMUIEvent = DOMUIEventAttributeList type DOMUIEventAttributeList = ('[ '("bubbles", DOMEventBubblesPropertyInfo), '("cancelBubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("charCode", DOMUIEventCharCodePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("currentTarget", DOMEventCurrentTargetPropertyInfo), '("defaultPrevented", DOMEventDefaultPreventedPropertyInfo), '("detail", DOMUIEventDetailPropertyInfo), '("eventPhase", DOMEventEventPhasePropertyInfo), '("keyCode", DOMUIEventKeyCodePropertyInfo), '("layerX", DOMUIEventLayerXPropertyInfo), '("layerY", DOMUIEventLayerYPropertyInfo), '("pageX", DOMUIEventPageXPropertyInfo), '("pageY", DOMUIEventPageYPropertyInfo), '("returnValue", DOMEventReturnValuePropertyInfo), '("srcElement", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("timeStamp", DOMEventTimeStampPropertyInfo), '("type", DOMEventTypePropertyInfo), '("view", DOMUIEventViewPropertyInfo), '("which", DOMUIEventWhichPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMUIEvent = DOMUIEventSignalList type DOMUIEventSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMUIEvent::get_char_code -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_ui_event_get_char_code" webkit_dom_ui_event_get_char_code :: Ptr DOMUIEvent -> -- _obj : TInterface "WebKit2WebExtension" "DOMUIEvent" IO Int64 dOMUIEventGetCharCode :: (MonadIO m, DOMUIEventK a) => a -- _obj -> m Int64 -- result dOMUIEventGetCharCode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_char_code _obj' touchManagedPtr _obj return result data DOMUIEventGetCharCodeMethodInfo instance (signature ~ (m Int64), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetCharCodeMethodInfo a signature where overloadedMethod _ = dOMUIEventGetCharCode -- method DOMUIEvent::get_detail -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_ui_event_get_detail" webkit_dom_ui_event_get_detail :: Ptr DOMUIEvent -> -- _obj : TInterface "WebKit2WebExtension" "DOMUIEvent" IO Int64 dOMUIEventGetDetail :: (MonadIO m, DOMUIEventK a) => a -- _obj -> m Int64 -- result dOMUIEventGetDetail _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_detail _obj' touchManagedPtr _obj return result data DOMUIEventGetDetailMethodInfo instance (signature ~ (m Int64), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetDetailMethodInfo a signature where overloadedMethod _ = dOMUIEventGetDetail -- method DOMUIEvent::get_key_code -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_ui_event_get_key_code" webkit_dom_ui_event_get_key_code :: Ptr DOMUIEvent -> -- _obj : TInterface "WebKit2WebExtension" "DOMUIEvent" IO Int64 dOMUIEventGetKeyCode :: (MonadIO m, DOMUIEventK a) => a -- _obj -> m Int64 -- result dOMUIEventGetKeyCode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_key_code _obj' touchManagedPtr _obj return result data DOMUIEventGetKeyCodeMethodInfo instance (signature ~ (m Int64), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetKeyCodeMethodInfo a signature where overloadedMethod _ = dOMUIEventGetKeyCode -- method DOMUIEvent::get_layer_x -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_ui_event_get_layer_x" webkit_dom_ui_event_get_layer_x :: Ptr DOMUIEvent -> -- _obj : TInterface "WebKit2WebExtension" "DOMUIEvent" IO Int64 dOMUIEventGetLayerX :: (MonadIO m, DOMUIEventK a) => a -- _obj -> m Int64 -- result dOMUIEventGetLayerX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_layer_x _obj' touchManagedPtr _obj return result data DOMUIEventGetLayerXMethodInfo instance (signature ~ (m Int64), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetLayerXMethodInfo a signature where overloadedMethod _ = dOMUIEventGetLayerX -- method DOMUIEvent::get_layer_y -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_ui_event_get_layer_y" webkit_dom_ui_event_get_layer_y :: Ptr DOMUIEvent -> -- _obj : TInterface "WebKit2WebExtension" "DOMUIEvent" IO Int64 dOMUIEventGetLayerY :: (MonadIO m, DOMUIEventK a) => a -- _obj -> m Int64 -- result dOMUIEventGetLayerY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_layer_y _obj' touchManagedPtr _obj return result data DOMUIEventGetLayerYMethodInfo instance (signature ~ (m Int64), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetLayerYMethodInfo a signature where overloadedMethod _ = dOMUIEventGetLayerY -- method DOMUIEvent::get_page_x -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_ui_event_get_page_x" webkit_dom_ui_event_get_page_x :: Ptr DOMUIEvent -> -- _obj : TInterface "WebKit2WebExtension" "DOMUIEvent" IO Int64 dOMUIEventGetPageX :: (MonadIO m, DOMUIEventK a) => a -- _obj -> m Int64 -- result dOMUIEventGetPageX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_page_x _obj' touchManagedPtr _obj return result data DOMUIEventGetPageXMethodInfo instance (signature ~ (m Int64), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetPageXMethodInfo a signature where overloadedMethod _ = dOMUIEventGetPageX -- method DOMUIEvent::get_page_y -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_ui_event_get_page_y" webkit_dom_ui_event_get_page_y :: Ptr DOMUIEvent -> -- _obj : TInterface "WebKit2WebExtension" "DOMUIEvent" IO Int64 dOMUIEventGetPageY :: (MonadIO m, DOMUIEventK a) => a -- _obj -> m Int64 -- result dOMUIEventGetPageY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_page_y _obj' touchManagedPtr _obj return result data DOMUIEventGetPageYMethodInfo instance (signature ~ (m Int64), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetPageYMethodInfo a signature where overloadedMethod _ = dOMUIEventGetPageY -- method DOMUIEvent::get_view -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMDOMWindow" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_ui_event_get_view" webkit_dom_ui_event_get_view :: Ptr DOMUIEvent -> -- _obj : TInterface "WebKit2WebExtension" "DOMUIEvent" IO (Ptr DOMDOMWindow) dOMUIEventGetView :: (MonadIO m, DOMUIEventK a) => a -- _obj -> m DOMDOMWindow -- result dOMUIEventGetView _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_view _obj' checkUnexpectedReturnNULL "webkit_dom_ui_event_get_view" result result' <- (wrapObject DOMDOMWindow) result touchManagedPtr _obj return result' data DOMUIEventGetViewMethodInfo instance (signature ~ (m DOMDOMWindow), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetViewMethodInfo a signature where overloadedMethod _ = dOMUIEventGetView -- method DOMUIEvent::init_ui_event -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "canBubble", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cancelable", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "view", argType = TInterface "WebKit2WebExtension" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "detail", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False foreign import ccall "webkit_dom_ui_event_init_ui_event" webkit_dom_ui_event_init_ui_event :: Ptr DOMUIEvent -> -- _obj : TInterface "WebKit2WebExtension" "DOMUIEvent" CString -> -- type : TBasicType TUTF8 CInt -> -- canBubble : TBasicType TBoolean CInt -> -- cancelable : TBasicType TBoolean Ptr DOMDOMWindow -> -- view : TInterface "WebKit2WebExtension" "DOMDOMWindow" Int64 -> -- detail : TBasicType TInt64 IO () dOMUIEventInitUiEvent :: (MonadIO m, DOMUIEventK a, DOMDOMWindowK b) => a -- _obj -> T.Text -- type_ -> Bool -- canBubble -> Bool -- cancelable -> b -- view -> Int64 -- detail -> m () -- result dOMUIEventInitUiEvent _obj type_ canBubble cancelable view detail = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj type_' <- textToCString type_ let canBubble' = (fromIntegral . fromEnum) canBubble let cancelable' = (fromIntegral . fromEnum) cancelable let view' = unsafeManagedPtrCastPtr view webkit_dom_ui_event_init_ui_event _obj' type_' canBubble' cancelable' view' detail touchManagedPtr _obj touchManagedPtr view freeMem type_' return () data DOMUIEventInitUiEventMethodInfo instance (signature ~ (T.Text -> Bool -> Bool -> b -> Int64 -> m ()), MonadIO m, DOMUIEventK a, DOMDOMWindowK b) => MethodInfo DOMUIEventInitUiEventMethodInfo a signature where overloadedMethod _ = dOMUIEventInitUiEvent