{- | 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.DOMElement ( -- * Exported types DOMElement(..) , DOMElementK , toDOMElement , noDOMElement , -- * Methods -- ** dOMElementBlur DOMElementBlurMethodInfo , dOMElementBlur , -- ** dOMElementFocus DOMElementFocusMethodInfo , dOMElementFocus , -- ** dOMElementGetAttribute DOMElementGetAttributeMethodInfo , dOMElementGetAttribute , -- ** dOMElementGetAttributeNode DOMElementGetAttributeNodeMethodInfo , dOMElementGetAttributeNode , -- ** dOMElementGetAttributeNodeNs DOMElementGetAttributeNodeNsMethodInfo , dOMElementGetAttributeNodeNs , -- ** dOMElementGetAttributeNs DOMElementGetAttributeNsMethodInfo , dOMElementGetAttributeNs , -- ** dOMElementGetAttributes DOMElementGetAttributesMethodInfo , dOMElementGetAttributes , -- ** dOMElementGetChildElementCount DOMElementGetChildElementCountMethodInfo, dOMElementGetChildElementCount , -- ** dOMElementGetChildren DOMElementGetChildrenMethodInfo , dOMElementGetChildren , -- ** dOMElementGetClassName DOMElementGetClassNameMethodInfo , dOMElementGetClassName , -- ** dOMElementGetClientHeight DOMElementGetClientHeightMethodInfo , dOMElementGetClientHeight , -- ** dOMElementGetClientLeft DOMElementGetClientLeftMethodInfo , dOMElementGetClientLeft , -- ** dOMElementGetClientTop DOMElementGetClientTopMethodInfo , dOMElementGetClientTop , -- ** dOMElementGetClientWidth DOMElementGetClientWidthMethodInfo , dOMElementGetClientWidth , -- ** dOMElementGetElementsByClassName DOMElementGetElementsByClassNameMethodInfo, dOMElementGetElementsByClassName , -- ** dOMElementGetElementsByTagName DOMElementGetElementsByTagNameMethodInfo, dOMElementGetElementsByTagName , -- ** dOMElementGetElementsByTagNameNs DOMElementGetElementsByTagNameNsMethodInfo, dOMElementGetElementsByTagNameNs , -- ** dOMElementGetFirstElementChild DOMElementGetFirstElementChildMethodInfo, dOMElementGetFirstElementChild , -- ** dOMElementGetId DOMElementGetIdMethodInfo , dOMElementGetId , -- ** dOMElementGetInnerHtml DOMElementGetInnerHtmlMethodInfo , dOMElementGetInnerHtml , -- ** dOMElementGetLastElementChild DOMElementGetLastElementChildMethodInfo , dOMElementGetLastElementChild , -- ** dOMElementGetNextElementSibling DOMElementGetNextElementSiblingMethodInfo, dOMElementGetNextElementSibling , -- ** dOMElementGetOffsetHeight DOMElementGetOffsetHeightMethodInfo , dOMElementGetOffsetHeight , -- ** dOMElementGetOffsetLeft DOMElementGetOffsetLeftMethodInfo , dOMElementGetOffsetLeft , -- ** dOMElementGetOffsetParent DOMElementGetOffsetParentMethodInfo , dOMElementGetOffsetParent , -- ** dOMElementGetOffsetTop DOMElementGetOffsetTopMethodInfo , dOMElementGetOffsetTop , -- ** dOMElementGetOffsetWidth DOMElementGetOffsetWidthMethodInfo , dOMElementGetOffsetWidth , -- ** dOMElementGetOuterHtml DOMElementGetOuterHtmlMethodInfo , dOMElementGetOuterHtml , -- ** dOMElementGetPreviousElementSibling DOMElementGetPreviousElementSiblingMethodInfo, dOMElementGetPreviousElementSibling , -- ** dOMElementGetScrollHeight DOMElementGetScrollHeightMethodInfo , dOMElementGetScrollHeight , -- ** dOMElementGetScrollLeft DOMElementGetScrollLeftMethodInfo , dOMElementGetScrollLeft , -- ** dOMElementGetScrollTop DOMElementGetScrollTopMethodInfo , dOMElementGetScrollTop , -- ** dOMElementGetScrollWidth DOMElementGetScrollWidthMethodInfo , dOMElementGetScrollWidth , -- ** dOMElementGetStyle DOMElementGetStyleMethodInfo , dOMElementGetStyle , -- ** dOMElementGetTagName DOMElementGetTagNameMethodInfo , dOMElementGetTagName , -- ** dOMElementHasAttribute DOMElementHasAttributeMethodInfo , dOMElementHasAttribute , -- ** dOMElementHasAttributeNs DOMElementHasAttributeNsMethodInfo , dOMElementHasAttributeNs , -- ** dOMElementHasAttributes DOMElementHasAttributesMethodInfo , dOMElementHasAttributes , -- ** dOMElementQuerySelector DOMElementQuerySelectorMethodInfo , dOMElementQuerySelector , -- ** dOMElementQuerySelectorAll DOMElementQuerySelectorAllMethodInfo , dOMElementQuerySelectorAll , -- ** dOMElementRemoveAttribute DOMElementRemoveAttributeMethodInfo , dOMElementRemoveAttribute , -- ** dOMElementRemoveAttributeNode DOMElementRemoveAttributeNodeMethodInfo , dOMElementRemoveAttributeNode , -- ** dOMElementRemoveAttributeNs DOMElementRemoveAttributeNsMethodInfo , dOMElementRemoveAttributeNs , -- ** dOMElementScrollByLines DOMElementScrollByLinesMethodInfo , dOMElementScrollByLines , -- ** dOMElementScrollByPages DOMElementScrollByPagesMethodInfo , dOMElementScrollByPages , -- ** dOMElementScrollIntoView DOMElementScrollIntoViewMethodInfo , dOMElementScrollIntoView , -- ** dOMElementScrollIntoViewIfNeeded DOMElementScrollIntoViewIfNeededMethodInfo, dOMElementScrollIntoViewIfNeeded , -- ** dOMElementSetAttribute DOMElementSetAttributeMethodInfo , dOMElementSetAttribute , -- ** dOMElementSetAttributeNode DOMElementSetAttributeNodeMethodInfo , dOMElementSetAttributeNode , -- ** dOMElementSetAttributeNodeNs DOMElementSetAttributeNodeNsMethodInfo , dOMElementSetAttributeNodeNs , -- ** dOMElementSetAttributeNs DOMElementSetAttributeNsMethodInfo , dOMElementSetAttributeNs , -- ** dOMElementSetClassName DOMElementSetClassNameMethodInfo , dOMElementSetClassName , -- ** dOMElementSetId DOMElementSetIdMethodInfo , dOMElementSetId , -- ** dOMElementSetInnerHtml DOMElementSetInnerHtmlMethodInfo , dOMElementSetInnerHtml , -- ** dOMElementSetOuterHtml DOMElementSetOuterHtmlMethodInfo , dOMElementSetOuterHtml , -- ** dOMElementSetScrollLeft DOMElementSetScrollLeftMethodInfo , dOMElementSetScrollLeft , -- ** dOMElementSetScrollTop DOMElementSetScrollTopMethodInfo , dOMElementSetScrollTop , -- * Properties -- ** Attributes DOMElementAttributesPropertyInfo , getDOMElementAttributes , -- ** ChildElementCount DOMElementChildElementCountPropertyInfo , getDOMElementChildElementCount , -- ** Children DOMElementChildrenPropertyInfo , getDOMElementChildren , -- ** ClassName DOMElementClassNamePropertyInfo , constructDOMElementClassName , getDOMElementClassName , setDOMElementClassName , -- ** ClientHeight DOMElementClientHeightPropertyInfo , getDOMElementClientHeight , -- ** ClientLeft DOMElementClientLeftPropertyInfo , getDOMElementClientLeft , -- ** ClientTop DOMElementClientTopPropertyInfo , getDOMElementClientTop , -- ** ClientWidth DOMElementClientWidthPropertyInfo , getDOMElementClientWidth , -- ** FirstElementChild DOMElementFirstElementChildPropertyInfo , getDOMElementFirstElementChild , -- ** Id DOMElementIdPropertyInfo , constructDOMElementId , getDOMElementId , setDOMElementId , -- ** InnerHtml DOMElementInnerHtmlPropertyInfo , constructDOMElementInnerHtml , getDOMElementInnerHtml , setDOMElementInnerHtml , -- ** LastElementChild DOMElementLastElementChildPropertyInfo , getDOMElementLastElementChild , -- ** NextElementSibling DOMElementNextElementSiblingPropertyInfo, getDOMElementNextElementSibling , -- ** OffsetHeight DOMElementOffsetHeightPropertyInfo , getDOMElementOffsetHeight , -- ** OffsetLeft DOMElementOffsetLeftPropertyInfo , getDOMElementOffsetLeft , -- ** OffsetParent DOMElementOffsetParentPropertyInfo , getDOMElementOffsetParent , -- ** OffsetTop DOMElementOffsetTopPropertyInfo , getDOMElementOffsetTop , -- ** OffsetWidth DOMElementOffsetWidthPropertyInfo , getDOMElementOffsetWidth , -- ** OuterHtml DOMElementOuterHtmlPropertyInfo , constructDOMElementOuterHtml , getDOMElementOuterHtml , setDOMElementOuterHtml , -- ** PreviousElementSibling DOMElementPreviousElementSiblingPropertyInfo, getDOMElementPreviousElementSibling , -- ** ScrollHeight DOMElementScrollHeightPropertyInfo , getDOMElementScrollHeight , -- ** ScrollLeft DOMElementScrollLeftPropertyInfo , constructDOMElementScrollLeft , getDOMElementScrollLeft , setDOMElementScrollLeft , -- ** ScrollTop DOMElementScrollTopPropertyInfo , constructDOMElementScrollTop , getDOMElementScrollTop , setDOMElementScrollTop , -- ** ScrollWidth DOMElementScrollWidthPropertyInfo , getDOMElementScrollWidth , -- ** Style DOMElementStylePropertyInfo , getDOMElementStyle , -- ** TagName DOMElementTagNamePropertyInfo , getDOMElementTagName , -- ** WebkitRegionOverset DOMElementWebkitRegionOversetPropertyInfo, getDOMElementWebkitRegionOverset , ) 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 DOMElement = DOMElement (ForeignPtr DOMElement) foreign import ccall "webkit_dom_element_get_type" c_webkit_dom_element_get_type :: IO GType type instance ParentTypes DOMElement = DOMElementParentTypes type DOMElementParentTypes = '[DOMNode, DOMObject, GObject.Object, DOMEventTarget] instance GObject DOMElement where gobjectIsInitiallyUnowned _ = False gobjectType _ = c_webkit_dom_element_get_type class GObject o => DOMElementK o instance (GObject o, IsDescendantOf DOMElement o) => DOMElementK o toDOMElement :: DOMElementK o => o -> IO DOMElement toDOMElement = unsafeCastTo DOMElement noDOMElement :: Maybe DOMElement noDOMElement = Nothing type family ResolveDOMElementMethod (t :: Symbol) (o :: *) :: * where ResolveDOMElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo ResolveDOMElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo ResolveDOMElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo ResolveDOMElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo ResolveDOMElementMethod "blur" o = DOMElementBlurMethodInfo ResolveDOMElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo ResolveDOMElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo ResolveDOMElementMethod "contains" o = DOMNodeContainsMethodInfo ResolveDOMElementMethod "dispatchEvent" o = DOMEventTargetDispatchEventMethodInfo ResolveDOMElementMethod "focus" o = DOMElementFocusMethodInfo ResolveDOMElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo ResolveDOMElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo ResolveDOMElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo ResolveDOMElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo ResolveDOMElementMethod "hasAttributes" o = DOMElementHasAttributesMethodInfo ResolveDOMElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo ResolveDOMElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo ResolveDOMElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo ResolveDOMElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo ResolveDOMElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo ResolveDOMElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo ResolveDOMElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo ResolveDOMElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo ResolveDOMElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo ResolveDOMElementMethod "normalize" o = DOMNodeNormalizeMethodInfo ResolveDOMElementMethod "notify" o = GObject.ObjectNotifyMethodInfo ResolveDOMElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo ResolveDOMElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo ResolveDOMElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo ResolveDOMElementMethod "ref" o = GObject.ObjectRefMethodInfo ResolveDOMElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo ResolveDOMElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo ResolveDOMElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo ResolveDOMElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo ResolveDOMElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo ResolveDOMElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo ResolveDOMElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo ResolveDOMElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo ResolveDOMElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo ResolveDOMElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo ResolveDOMElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo ResolveDOMElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo ResolveDOMElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo ResolveDOMElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo ResolveDOMElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo ResolveDOMElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo ResolveDOMElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo ResolveDOMElementMethod "unref" o = GObject.ObjectUnrefMethodInfo ResolveDOMElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo ResolveDOMElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo ResolveDOMElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo ResolveDOMElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo ResolveDOMElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo ResolveDOMElementMethod "getAttributes" o = DOMElementGetAttributesMethodInfo ResolveDOMElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo ResolveDOMElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo ResolveDOMElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo ResolveDOMElementMethod "getChildren" o = DOMElementGetChildrenMethodInfo ResolveDOMElementMethod "getClassName" o = DOMElementGetClassNameMethodInfo ResolveDOMElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo ResolveDOMElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo ResolveDOMElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo ResolveDOMElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo ResolveDOMElementMethod "getData" o = GObject.ObjectGetDataMethodInfo ResolveDOMElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo ResolveDOMElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo ResolveDOMElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo ResolveDOMElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo ResolveDOMElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo ResolveDOMElementMethod "getId" o = DOMElementGetIdMethodInfo ResolveDOMElementMethod "getInnerHtml" o = DOMElementGetInnerHtmlMethodInfo ResolveDOMElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo ResolveDOMElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo ResolveDOMElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo ResolveDOMElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo ResolveDOMElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo ResolveDOMElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo ResolveDOMElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo ResolveDOMElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo ResolveDOMElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo ResolveDOMElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo ResolveDOMElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo ResolveDOMElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo ResolveDOMElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo ResolveDOMElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo ResolveDOMElementMethod "getOuterHtml" o = DOMElementGetOuterHtmlMethodInfo ResolveDOMElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo ResolveDOMElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo ResolveDOMElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo ResolveDOMElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo ResolveDOMElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo ResolveDOMElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo ResolveDOMElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo ResolveDOMElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo ResolveDOMElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo ResolveDOMElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo ResolveDOMElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo ResolveDOMElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo ResolveDOMElementMethod "getStyle" o = DOMElementGetStyleMethodInfo ResolveDOMElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo ResolveDOMElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo ResolveDOMElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo ResolveDOMElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo ResolveDOMElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo ResolveDOMElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo ResolveDOMElementMethod "setClassName" o = DOMElementSetClassNameMethodInfo ResolveDOMElementMethod "setData" o = GObject.ObjectSetDataMethodInfo ResolveDOMElementMethod "setId" o = DOMElementSetIdMethodInfo ResolveDOMElementMethod "setInnerHtml" o = DOMElementSetInnerHtmlMethodInfo ResolveDOMElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo ResolveDOMElementMethod "setOuterHtml" o = DOMElementSetOuterHtmlMethodInfo ResolveDOMElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo ResolveDOMElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo ResolveDOMElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo ResolveDOMElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo ResolveDOMElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo ResolveDOMElementMethod l o = MethodResolutionFailed l o instance (info ~ ResolveDOMElementMethod t DOMElement, MethodInfo info DOMElement p) => IsLabelProxy t (DOMElement -> p) where fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) #if MIN_VERSION_base(4,9,0) instance (info ~ ResolveDOMElementMethod t DOMElement, MethodInfo info DOMElement p) => IsLabel t (DOMElement -> p) where fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) #endif -- VVV Prop "attributes" -- Type: TInterface "WebKit2WebExtension" "DOMNamedNodeMap" -- Flags: [PropertyReadable] getDOMElementAttributes :: (MonadIO m, DOMElementK o) => o -> m DOMNamedNodeMap getDOMElementAttributes obj = liftIO $ getObjectPropertyObject obj "attributes" DOMNamedNodeMap data DOMElementAttributesPropertyInfo instance AttrInfo DOMElementAttributesPropertyInfo where type AttrAllowedOps DOMElementAttributesPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementAttributesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementAttributesPropertyInfo = DOMElementK type AttrGetType DOMElementAttributesPropertyInfo = DOMNamedNodeMap type AttrLabel DOMElementAttributesPropertyInfo = "attributes" attrGet _ = getDOMElementAttributes attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "child-element-count" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] getDOMElementChildElementCount :: (MonadIO m, DOMElementK o) => o -> m Word64 getDOMElementChildElementCount obj = liftIO $ getObjectPropertyUInt64 obj "child-element-count" data DOMElementChildElementCountPropertyInfo instance AttrInfo DOMElementChildElementCountPropertyInfo where type AttrAllowedOps DOMElementChildElementCountPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementChildElementCountPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementChildElementCountPropertyInfo = DOMElementK type AttrGetType DOMElementChildElementCountPropertyInfo = Word64 type AttrLabel DOMElementChildElementCountPropertyInfo = "child-element-count" attrGet _ = getDOMElementChildElementCount attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "children" -- Type: TInterface "WebKit2WebExtension" "DOMHTMLCollection" -- Flags: [PropertyReadable] getDOMElementChildren :: (MonadIO m, DOMElementK o) => o -> m DOMHTMLCollection getDOMElementChildren obj = liftIO $ getObjectPropertyObject obj "children" DOMHTMLCollection data DOMElementChildrenPropertyInfo instance AttrInfo DOMElementChildrenPropertyInfo where type AttrAllowedOps DOMElementChildrenPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementChildrenPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementChildrenPropertyInfo = DOMElementK type AttrGetType DOMElementChildrenPropertyInfo = DOMHTMLCollection type AttrLabel DOMElementChildrenPropertyInfo = "children" attrGet _ = getDOMElementChildren attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "class-name" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] getDOMElementClassName :: (MonadIO m, DOMElementK o) => o -> m T.Text getDOMElementClassName obj = liftIO $ getObjectPropertyString obj "class-name" setDOMElementClassName :: (MonadIO m, DOMElementK o) => o -> T.Text -> m () setDOMElementClassName obj val = liftIO $ setObjectPropertyString obj "class-name" val constructDOMElementClassName :: T.Text -> IO ([Char], GValue) constructDOMElementClassName val = constructObjectPropertyString "class-name" val data DOMElementClassNamePropertyInfo instance AttrInfo DOMElementClassNamePropertyInfo where type AttrAllowedOps DOMElementClassNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint DOMElementClassNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMElementClassNamePropertyInfo = DOMElementK type AttrGetType DOMElementClassNamePropertyInfo = T.Text type AttrLabel DOMElementClassNamePropertyInfo = "class-name" attrGet _ = getDOMElementClassName attrSet _ = setDOMElementClassName attrConstruct _ = constructDOMElementClassName -- VVV Prop "client-height" -- Type: TBasicType TDouble -- Flags: [PropertyReadable] getDOMElementClientHeight :: (MonadIO m, DOMElementK o) => o -> m Double getDOMElementClientHeight obj = liftIO $ getObjectPropertyDouble obj "client-height" data DOMElementClientHeightPropertyInfo instance AttrInfo DOMElementClientHeightPropertyInfo where type AttrAllowedOps DOMElementClientHeightPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementClientHeightPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementClientHeightPropertyInfo = DOMElementK type AttrGetType DOMElementClientHeightPropertyInfo = Double type AttrLabel DOMElementClientHeightPropertyInfo = "client-height" attrGet _ = getDOMElementClientHeight attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "client-left" -- Type: TBasicType TDouble -- Flags: [PropertyReadable] getDOMElementClientLeft :: (MonadIO m, DOMElementK o) => o -> m Double getDOMElementClientLeft obj = liftIO $ getObjectPropertyDouble obj "client-left" data DOMElementClientLeftPropertyInfo instance AttrInfo DOMElementClientLeftPropertyInfo where type AttrAllowedOps DOMElementClientLeftPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementClientLeftPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementClientLeftPropertyInfo = DOMElementK type AttrGetType DOMElementClientLeftPropertyInfo = Double type AttrLabel DOMElementClientLeftPropertyInfo = "client-left" attrGet _ = getDOMElementClientLeft attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "client-top" -- Type: TBasicType TDouble -- Flags: [PropertyReadable] getDOMElementClientTop :: (MonadIO m, DOMElementK o) => o -> m Double getDOMElementClientTop obj = liftIO $ getObjectPropertyDouble obj "client-top" data DOMElementClientTopPropertyInfo instance AttrInfo DOMElementClientTopPropertyInfo where type AttrAllowedOps DOMElementClientTopPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementClientTopPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementClientTopPropertyInfo = DOMElementK type AttrGetType DOMElementClientTopPropertyInfo = Double type AttrLabel DOMElementClientTopPropertyInfo = "client-top" attrGet _ = getDOMElementClientTop attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "client-width" -- Type: TBasicType TDouble -- Flags: [PropertyReadable] getDOMElementClientWidth :: (MonadIO m, DOMElementK o) => o -> m Double getDOMElementClientWidth obj = liftIO $ getObjectPropertyDouble obj "client-width" data DOMElementClientWidthPropertyInfo instance AttrInfo DOMElementClientWidthPropertyInfo where type AttrAllowedOps DOMElementClientWidthPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementClientWidthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementClientWidthPropertyInfo = DOMElementK type AttrGetType DOMElementClientWidthPropertyInfo = Double type AttrLabel DOMElementClientWidthPropertyInfo = "client-width" attrGet _ = getDOMElementClientWidth attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "first-element-child" -- Type: TInterface "WebKit2WebExtension" "DOMElement" -- Flags: [PropertyReadable] getDOMElementFirstElementChild :: (MonadIO m, DOMElementK o) => o -> m DOMElement getDOMElementFirstElementChild obj = liftIO $ getObjectPropertyObject obj "first-element-child" DOMElement data DOMElementFirstElementChildPropertyInfo instance AttrInfo DOMElementFirstElementChildPropertyInfo where type AttrAllowedOps DOMElementFirstElementChildPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementFirstElementChildPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementFirstElementChildPropertyInfo = DOMElementK type AttrGetType DOMElementFirstElementChildPropertyInfo = DOMElement type AttrLabel DOMElementFirstElementChildPropertyInfo = "first-element-child" attrGet _ = getDOMElementFirstElementChild attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "id" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] getDOMElementId :: (MonadIO m, DOMElementK o) => o -> m T.Text getDOMElementId obj = liftIO $ getObjectPropertyString obj "id" setDOMElementId :: (MonadIO m, DOMElementK o) => o -> T.Text -> m () setDOMElementId obj val = liftIO $ setObjectPropertyString obj "id" val constructDOMElementId :: T.Text -> IO ([Char], GValue) constructDOMElementId val = constructObjectPropertyString "id" val data DOMElementIdPropertyInfo instance AttrInfo DOMElementIdPropertyInfo where type AttrAllowedOps DOMElementIdPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint DOMElementIdPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMElementIdPropertyInfo = DOMElementK type AttrGetType DOMElementIdPropertyInfo = T.Text type AttrLabel DOMElementIdPropertyInfo = "id" attrGet _ = getDOMElementId attrSet _ = setDOMElementId attrConstruct _ = constructDOMElementId -- VVV Prop "inner-html" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] getDOMElementInnerHtml :: (MonadIO m, DOMElementK o) => o -> m T.Text getDOMElementInnerHtml obj = liftIO $ getObjectPropertyString obj "inner-html" setDOMElementInnerHtml :: (MonadIO m, DOMElementK o) => o -> T.Text -> m () setDOMElementInnerHtml obj val = liftIO $ setObjectPropertyString obj "inner-html" val constructDOMElementInnerHtml :: T.Text -> IO ([Char], GValue) constructDOMElementInnerHtml val = constructObjectPropertyString "inner-html" val data DOMElementInnerHtmlPropertyInfo instance AttrInfo DOMElementInnerHtmlPropertyInfo where type AttrAllowedOps DOMElementInnerHtmlPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint DOMElementInnerHtmlPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMElementInnerHtmlPropertyInfo = DOMElementK type AttrGetType DOMElementInnerHtmlPropertyInfo = T.Text type AttrLabel DOMElementInnerHtmlPropertyInfo = "inner-html" attrGet _ = getDOMElementInnerHtml attrSet _ = setDOMElementInnerHtml attrConstruct _ = constructDOMElementInnerHtml -- VVV Prop "last-element-child" -- Type: TInterface "WebKit2WebExtension" "DOMElement" -- Flags: [PropertyReadable] getDOMElementLastElementChild :: (MonadIO m, DOMElementK o) => o -> m DOMElement getDOMElementLastElementChild obj = liftIO $ getObjectPropertyObject obj "last-element-child" DOMElement data DOMElementLastElementChildPropertyInfo instance AttrInfo DOMElementLastElementChildPropertyInfo where type AttrAllowedOps DOMElementLastElementChildPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementLastElementChildPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementLastElementChildPropertyInfo = DOMElementK type AttrGetType DOMElementLastElementChildPropertyInfo = DOMElement type AttrLabel DOMElementLastElementChildPropertyInfo = "last-element-child" attrGet _ = getDOMElementLastElementChild attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "next-element-sibling" -- Type: TInterface "WebKit2WebExtension" "DOMElement" -- Flags: [PropertyReadable] getDOMElementNextElementSibling :: (MonadIO m, DOMElementK o) => o -> m DOMElement getDOMElementNextElementSibling obj = liftIO $ getObjectPropertyObject obj "next-element-sibling" DOMElement data DOMElementNextElementSiblingPropertyInfo instance AttrInfo DOMElementNextElementSiblingPropertyInfo where type AttrAllowedOps DOMElementNextElementSiblingPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementNextElementSiblingPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementNextElementSiblingPropertyInfo = DOMElementK type AttrGetType DOMElementNextElementSiblingPropertyInfo = DOMElement type AttrLabel DOMElementNextElementSiblingPropertyInfo = "next-element-sibling" attrGet _ = getDOMElementNextElementSibling attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "offset-height" -- Type: TBasicType TDouble -- Flags: [PropertyReadable] getDOMElementOffsetHeight :: (MonadIO m, DOMElementK o) => o -> m Double getDOMElementOffsetHeight obj = liftIO $ getObjectPropertyDouble obj "offset-height" data DOMElementOffsetHeightPropertyInfo instance AttrInfo DOMElementOffsetHeightPropertyInfo where type AttrAllowedOps DOMElementOffsetHeightPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementOffsetHeightPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementOffsetHeightPropertyInfo = DOMElementK type AttrGetType DOMElementOffsetHeightPropertyInfo = Double type AttrLabel DOMElementOffsetHeightPropertyInfo = "offset-height" attrGet _ = getDOMElementOffsetHeight attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "offset-left" -- Type: TBasicType TDouble -- Flags: [PropertyReadable] getDOMElementOffsetLeft :: (MonadIO m, DOMElementK o) => o -> m Double getDOMElementOffsetLeft obj = liftIO $ getObjectPropertyDouble obj "offset-left" data DOMElementOffsetLeftPropertyInfo instance AttrInfo DOMElementOffsetLeftPropertyInfo where type AttrAllowedOps DOMElementOffsetLeftPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementOffsetLeftPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementOffsetLeftPropertyInfo = DOMElementK type AttrGetType DOMElementOffsetLeftPropertyInfo = Double type AttrLabel DOMElementOffsetLeftPropertyInfo = "offset-left" attrGet _ = getDOMElementOffsetLeft attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "offset-parent" -- Type: TInterface "WebKit2WebExtension" "DOMElement" -- Flags: [PropertyReadable] getDOMElementOffsetParent :: (MonadIO m, DOMElementK o) => o -> m DOMElement getDOMElementOffsetParent obj = liftIO $ getObjectPropertyObject obj "offset-parent" DOMElement data DOMElementOffsetParentPropertyInfo instance AttrInfo DOMElementOffsetParentPropertyInfo where type AttrAllowedOps DOMElementOffsetParentPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementOffsetParentPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementOffsetParentPropertyInfo = DOMElementK type AttrGetType DOMElementOffsetParentPropertyInfo = DOMElement type AttrLabel DOMElementOffsetParentPropertyInfo = "offset-parent" attrGet _ = getDOMElementOffsetParent attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "offset-top" -- Type: TBasicType TDouble -- Flags: [PropertyReadable] getDOMElementOffsetTop :: (MonadIO m, DOMElementK o) => o -> m Double getDOMElementOffsetTop obj = liftIO $ getObjectPropertyDouble obj "offset-top" data DOMElementOffsetTopPropertyInfo instance AttrInfo DOMElementOffsetTopPropertyInfo where type AttrAllowedOps DOMElementOffsetTopPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementOffsetTopPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementOffsetTopPropertyInfo = DOMElementK type AttrGetType DOMElementOffsetTopPropertyInfo = Double type AttrLabel DOMElementOffsetTopPropertyInfo = "offset-top" attrGet _ = getDOMElementOffsetTop attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "offset-width" -- Type: TBasicType TDouble -- Flags: [PropertyReadable] getDOMElementOffsetWidth :: (MonadIO m, DOMElementK o) => o -> m Double getDOMElementOffsetWidth obj = liftIO $ getObjectPropertyDouble obj "offset-width" data DOMElementOffsetWidthPropertyInfo instance AttrInfo DOMElementOffsetWidthPropertyInfo where type AttrAllowedOps DOMElementOffsetWidthPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementOffsetWidthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementOffsetWidthPropertyInfo = DOMElementK type AttrGetType DOMElementOffsetWidthPropertyInfo = Double type AttrLabel DOMElementOffsetWidthPropertyInfo = "offset-width" attrGet _ = getDOMElementOffsetWidth attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "outer-html" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] getDOMElementOuterHtml :: (MonadIO m, DOMElementK o) => o -> m T.Text getDOMElementOuterHtml obj = liftIO $ getObjectPropertyString obj "outer-html" setDOMElementOuterHtml :: (MonadIO m, DOMElementK o) => o -> T.Text -> m () setDOMElementOuterHtml obj val = liftIO $ setObjectPropertyString obj "outer-html" val constructDOMElementOuterHtml :: T.Text -> IO ([Char], GValue) constructDOMElementOuterHtml val = constructObjectPropertyString "outer-html" val data DOMElementOuterHtmlPropertyInfo instance AttrInfo DOMElementOuterHtmlPropertyInfo where type AttrAllowedOps DOMElementOuterHtmlPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint DOMElementOuterHtmlPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMElementOuterHtmlPropertyInfo = DOMElementK type AttrGetType DOMElementOuterHtmlPropertyInfo = T.Text type AttrLabel DOMElementOuterHtmlPropertyInfo = "outer-html" attrGet _ = getDOMElementOuterHtml attrSet _ = setDOMElementOuterHtml attrConstruct _ = constructDOMElementOuterHtml -- VVV Prop "previous-element-sibling" -- Type: TInterface "WebKit2WebExtension" "DOMElement" -- Flags: [PropertyReadable] getDOMElementPreviousElementSibling :: (MonadIO m, DOMElementK o) => o -> m DOMElement getDOMElementPreviousElementSibling obj = liftIO $ getObjectPropertyObject obj "previous-element-sibling" DOMElement data DOMElementPreviousElementSiblingPropertyInfo instance AttrInfo DOMElementPreviousElementSiblingPropertyInfo where type AttrAllowedOps DOMElementPreviousElementSiblingPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementPreviousElementSiblingPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementPreviousElementSiblingPropertyInfo = DOMElementK type AttrGetType DOMElementPreviousElementSiblingPropertyInfo = DOMElement type AttrLabel DOMElementPreviousElementSiblingPropertyInfo = "previous-element-sibling" attrGet _ = getDOMElementPreviousElementSibling attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "scroll-height" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable] getDOMElementScrollHeight :: (MonadIO m, DOMElementK o) => o -> m Int64 getDOMElementScrollHeight obj = liftIO $ getObjectPropertyInt64 obj "scroll-height" data DOMElementScrollHeightPropertyInfo instance AttrInfo DOMElementScrollHeightPropertyInfo where type AttrAllowedOps DOMElementScrollHeightPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementScrollHeightPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementScrollHeightPropertyInfo = DOMElementK type AttrGetType DOMElementScrollHeightPropertyInfo = Int64 type AttrLabel DOMElementScrollHeightPropertyInfo = "scroll-height" attrGet _ = getDOMElementScrollHeight attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "scroll-left" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable,PropertyWritable] getDOMElementScrollLeft :: (MonadIO m, DOMElementK o) => o -> m Int64 getDOMElementScrollLeft obj = liftIO $ getObjectPropertyInt64 obj "scroll-left" setDOMElementScrollLeft :: (MonadIO m, DOMElementK o) => o -> Int64 -> m () setDOMElementScrollLeft obj val = liftIO $ setObjectPropertyInt64 obj "scroll-left" val constructDOMElementScrollLeft :: Int64 -> IO ([Char], GValue) constructDOMElementScrollLeft val = constructObjectPropertyInt64 "scroll-left" val data DOMElementScrollLeftPropertyInfo instance AttrInfo DOMElementScrollLeftPropertyInfo where type AttrAllowedOps DOMElementScrollLeftPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint DOMElementScrollLeftPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMElementScrollLeftPropertyInfo = DOMElementK type AttrGetType DOMElementScrollLeftPropertyInfo = Int64 type AttrLabel DOMElementScrollLeftPropertyInfo = "scroll-left" attrGet _ = getDOMElementScrollLeft attrSet _ = setDOMElementScrollLeft attrConstruct _ = constructDOMElementScrollLeft -- VVV Prop "scroll-top" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable,PropertyWritable] getDOMElementScrollTop :: (MonadIO m, DOMElementK o) => o -> m Int64 getDOMElementScrollTop obj = liftIO $ getObjectPropertyInt64 obj "scroll-top" setDOMElementScrollTop :: (MonadIO m, DOMElementK o) => o -> Int64 -> m () setDOMElementScrollTop obj val = liftIO $ setObjectPropertyInt64 obj "scroll-top" val constructDOMElementScrollTop :: Int64 -> IO ([Char], GValue) constructDOMElementScrollTop val = constructObjectPropertyInt64 "scroll-top" val data DOMElementScrollTopPropertyInfo instance AttrInfo DOMElementScrollTopPropertyInfo where type AttrAllowedOps DOMElementScrollTopPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint DOMElementScrollTopPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMElementScrollTopPropertyInfo = DOMElementK type AttrGetType DOMElementScrollTopPropertyInfo = Int64 type AttrLabel DOMElementScrollTopPropertyInfo = "scroll-top" attrGet _ = getDOMElementScrollTop attrSet _ = setDOMElementScrollTop attrConstruct _ = constructDOMElementScrollTop -- VVV Prop "scroll-width" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable] getDOMElementScrollWidth :: (MonadIO m, DOMElementK o) => o -> m Int64 getDOMElementScrollWidth obj = liftIO $ getObjectPropertyInt64 obj "scroll-width" data DOMElementScrollWidthPropertyInfo instance AttrInfo DOMElementScrollWidthPropertyInfo where type AttrAllowedOps DOMElementScrollWidthPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementScrollWidthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementScrollWidthPropertyInfo = DOMElementK type AttrGetType DOMElementScrollWidthPropertyInfo = Int64 type AttrLabel DOMElementScrollWidthPropertyInfo = "scroll-width" attrGet _ = getDOMElementScrollWidth attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "style" -- Type: TInterface "WebKit2WebExtension" "DOMCSSStyleDeclaration" -- Flags: [PropertyReadable] getDOMElementStyle :: (MonadIO m, DOMElementK o) => o -> m DOMCSSStyleDeclaration getDOMElementStyle obj = liftIO $ getObjectPropertyObject obj "style" DOMCSSStyleDeclaration data DOMElementStylePropertyInfo instance AttrInfo DOMElementStylePropertyInfo where type AttrAllowedOps DOMElementStylePropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementStylePropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementStylePropertyInfo = DOMElementK type AttrGetType DOMElementStylePropertyInfo = DOMCSSStyleDeclaration type AttrLabel DOMElementStylePropertyInfo = "style" attrGet _ = getDOMElementStyle attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "tag-name" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMElementTagName :: (MonadIO m, DOMElementK o) => o -> m T.Text getDOMElementTagName obj = liftIO $ getObjectPropertyString obj "tag-name" data DOMElementTagNamePropertyInfo instance AttrInfo DOMElementTagNamePropertyInfo where type AttrAllowedOps DOMElementTagNamePropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementTagNamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementTagNamePropertyInfo = DOMElementK type AttrGetType DOMElementTagNamePropertyInfo = T.Text type AttrLabel DOMElementTagNamePropertyInfo = "tag-name" attrGet _ = getDOMElementTagName attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "webkit-region-overset" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMElementWebkitRegionOverset :: (MonadIO m, DOMElementK o) => o -> m T.Text getDOMElementWebkitRegionOverset obj = liftIO $ getObjectPropertyString obj "webkit-region-overset" data DOMElementWebkitRegionOversetPropertyInfo instance AttrInfo DOMElementWebkitRegionOversetPropertyInfo where type AttrAllowedOps DOMElementWebkitRegionOversetPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMElementWebkitRegionOversetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementWebkitRegionOversetPropertyInfo = DOMElementK type AttrGetType DOMElementWebkitRegionOversetPropertyInfo = T.Text type AttrLabel DOMElementWebkitRegionOversetPropertyInfo = "webkit-region-overset" attrGet _ = getDOMElementWebkitRegionOverset attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMElement = DOMElementAttributeList type DOMElementAttributeList = ('[ '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMElementChildrenPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMElementInnerHtmlPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMElementOuterHtmlPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMElement = DOMElementSignalList type DOMElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMElement::blur -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", 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_element_blur" webkit_dom_element_blur :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO () dOMElementBlur :: (MonadIO m, DOMElementK a) => a -- _obj -> m () -- result dOMElementBlur _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_element_blur _obj' touchManagedPtr _obj return () data DOMElementBlurMethodInfo instance (signature ~ (m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementBlurMethodInfo a signature where overloadedMethod _ = dOMElementBlur -- method DOMElement::focus -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", 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_element_focus" webkit_dom_element_focus :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO () dOMElementFocus :: (MonadIO m, DOMElementK a) => a -- _obj -> m () -- result dOMElementFocus _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_element_focus _obj' touchManagedPtr _obj return () data DOMElementFocusMethodInfo instance (signature ~ (m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementFocusMethodInfo a signature where overloadedMethod _ = dOMElementFocus -- method DOMElement::get_attribute -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_attribute" webkit_dom_element_get_attribute :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- name : TBasicType TUTF8 IO CString dOMElementGetAttribute :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- name -> m T.Text -- result dOMElementGetAttribute _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name result <- webkit_dom_element_get_attribute _obj' name' checkUnexpectedReturnNULL "webkit_dom_element_get_attribute" result result' <- cstringToText result freeMem result touchManagedPtr _obj freeMem name' return result' data DOMElementGetAttributeMethodInfo instance (signature ~ (T.Text -> m T.Text), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetAttributeMethodInfo a signature where overloadedMethod _ = dOMElementGetAttribute -- method DOMElement::get_attribute_node -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMAttr" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_attribute_node" webkit_dom_element_get_attribute_node :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- name : TBasicType TUTF8 IO (Ptr DOMAttr) dOMElementGetAttributeNode :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- name -> m DOMAttr -- result dOMElementGetAttributeNode _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name result <- webkit_dom_element_get_attribute_node _obj' name' checkUnexpectedReturnNULL "webkit_dom_element_get_attribute_node" result result' <- (newObject DOMAttr) result touchManagedPtr _obj freeMem name' return result' data DOMElementGetAttributeNodeMethodInfo instance (signature ~ (T.Text -> m DOMAttr), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetAttributeNodeMethodInfo a signature where overloadedMethod _ = dOMElementGetAttributeNode -- method DOMElement::get_attribute_node_ns -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMAttr" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_attribute_node_ns" webkit_dom_element_get_attribute_node_ns :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- namespaceURI : TBasicType TUTF8 CString -> -- localName : TBasicType TUTF8 IO (Ptr DOMAttr) dOMElementGetAttributeNodeNs :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- namespaceURI -> T.Text -- localName -> m DOMAttr -- result dOMElementGetAttributeNodeNs _obj namespaceURI localName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj namespaceURI' <- textToCString namespaceURI localName' <- textToCString localName result <- webkit_dom_element_get_attribute_node_ns _obj' namespaceURI' localName' checkUnexpectedReturnNULL "webkit_dom_element_get_attribute_node_ns" result result' <- (newObject DOMAttr) result touchManagedPtr _obj freeMem namespaceURI' freeMem localName' return result' data DOMElementGetAttributeNodeNsMethodInfo instance (signature ~ (T.Text -> T.Text -> m DOMAttr), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetAttributeNodeNsMethodInfo a signature where overloadedMethod _ = dOMElementGetAttributeNodeNs -- method DOMElement::get_attribute_ns -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_attribute_ns" webkit_dom_element_get_attribute_ns :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- namespaceURI : TBasicType TUTF8 CString -> -- localName : TBasicType TUTF8 IO CString dOMElementGetAttributeNs :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- namespaceURI -> T.Text -- localName -> m T.Text -- result dOMElementGetAttributeNs _obj namespaceURI localName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj namespaceURI' <- textToCString namespaceURI localName' <- textToCString localName result <- webkit_dom_element_get_attribute_ns _obj' namespaceURI' localName' checkUnexpectedReturnNULL "webkit_dom_element_get_attribute_ns" result result' <- cstringToText result freeMem result touchManagedPtr _obj freeMem namespaceURI' freeMem localName' return result' data DOMElementGetAttributeNsMethodInfo instance (signature ~ (T.Text -> T.Text -> m T.Text), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetAttributeNsMethodInfo a signature where overloadedMethod _ = dOMElementGetAttributeNs -- method DOMElement::get_attributes -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMNamedNodeMap" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_attributes" webkit_dom_element_get_attributes :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO (Ptr DOMNamedNodeMap) dOMElementGetAttributes :: (MonadIO m, DOMElementK a) => a -- _obj -> m DOMNamedNodeMap -- result dOMElementGetAttributes _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_attributes _obj' checkUnexpectedReturnNULL "webkit_dom_element_get_attributes" result result' <- (wrapObject DOMNamedNodeMap) result touchManagedPtr _obj return result' data DOMElementGetAttributesMethodInfo instance (signature ~ (m DOMNamedNodeMap), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetAttributesMethodInfo a signature where overloadedMethod _ = dOMElementGetAttributes -- method DOMElement::get_child_element_count -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_child_element_count" webkit_dom_element_get_child_element_count :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO Word64 dOMElementGetChildElementCount :: (MonadIO m, DOMElementK a) => a -- _obj -> m Word64 -- result dOMElementGetChildElementCount _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_child_element_count _obj' touchManagedPtr _obj return result data DOMElementGetChildElementCountMethodInfo instance (signature ~ (m Word64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetChildElementCountMethodInfo a signature where overloadedMethod _ = dOMElementGetChildElementCount -- method DOMElement::get_children -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMHTMLCollection" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_children" webkit_dom_element_get_children :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO (Ptr DOMHTMLCollection) dOMElementGetChildren :: (MonadIO m, DOMElementK a) => a -- _obj -> m DOMHTMLCollection -- result dOMElementGetChildren _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_children _obj' checkUnexpectedReturnNULL "webkit_dom_element_get_children" result result' <- (wrapObject DOMHTMLCollection) result touchManagedPtr _obj return result' data DOMElementGetChildrenMethodInfo instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetChildrenMethodInfo a signature where overloadedMethod _ = dOMElementGetChildren -- method DOMElement::get_class_name -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_class_name" webkit_dom_element_get_class_name :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO CString dOMElementGetClassName :: (MonadIO m, DOMElementK a) => a -- _obj -> m T.Text -- result dOMElementGetClassName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_class_name _obj' checkUnexpectedReturnNULL "webkit_dom_element_get_class_name" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMElementGetClassNameMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetClassNameMethodInfo a signature where overloadedMethod _ = dOMElementGetClassName -- method DOMElement::get_client_height -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_client_height" webkit_dom_element_get_client_height :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO CDouble dOMElementGetClientHeight :: (MonadIO m, DOMElementK a) => a -- _obj -> m Double -- result dOMElementGetClientHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_client_height _obj' let result' = realToFrac result touchManagedPtr _obj return result' data DOMElementGetClientHeightMethodInfo instance (signature ~ (m Double), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetClientHeightMethodInfo a signature where overloadedMethod _ = dOMElementGetClientHeight -- method DOMElement::get_client_left -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_client_left" webkit_dom_element_get_client_left :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO CDouble dOMElementGetClientLeft :: (MonadIO m, DOMElementK a) => a -- _obj -> m Double -- result dOMElementGetClientLeft _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_client_left _obj' let result' = realToFrac result touchManagedPtr _obj return result' data DOMElementGetClientLeftMethodInfo instance (signature ~ (m Double), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetClientLeftMethodInfo a signature where overloadedMethod _ = dOMElementGetClientLeft -- method DOMElement::get_client_top -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_client_top" webkit_dom_element_get_client_top :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO CDouble dOMElementGetClientTop :: (MonadIO m, DOMElementK a) => a -- _obj -> m Double -- result dOMElementGetClientTop _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_client_top _obj' let result' = realToFrac result touchManagedPtr _obj return result' data DOMElementGetClientTopMethodInfo instance (signature ~ (m Double), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetClientTopMethodInfo a signature where overloadedMethod _ = dOMElementGetClientTop -- method DOMElement::get_client_width -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_client_width" webkit_dom_element_get_client_width :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO CDouble dOMElementGetClientWidth :: (MonadIO m, DOMElementK a) => a -- _obj -> m Double -- result dOMElementGetClientWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_client_width _obj' let result' = realToFrac result touchManagedPtr _obj return result' data DOMElementGetClientWidthMethodInfo instance (signature ~ (m Double), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetClientWidthMethodInfo a signature where overloadedMethod _ = dOMElementGetClientWidth -- method DOMElement::get_elements_by_class_name -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMNodeList" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_elements_by_class_name" webkit_dom_element_get_elements_by_class_name :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- name : TBasicType TUTF8 IO (Ptr DOMNodeList) dOMElementGetElementsByClassName :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- name -> m DOMNodeList -- result dOMElementGetElementsByClassName _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name result <- webkit_dom_element_get_elements_by_class_name _obj' name' checkUnexpectedReturnNULL "webkit_dom_element_get_elements_by_class_name" result result' <- (wrapObject DOMNodeList) result touchManagedPtr _obj freeMem name' return result' data DOMElementGetElementsByClassNameMethodInfo instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetElementsByClassNameMethodInfo a signature where overloadedMethod _ = dOMElementGetElementsByClassName -- method DOMElement::get_elements_by_tag_name -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMNodeList" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_elements_by_tag_name" webkit_dom_element_get_elements_by_tag_name :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- name : TBasicType TUTF8 IO (Ptr DOMNodeList) dOMElementGetElementsByTagName :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- name -> m DOMNodeList -- result dOMElementGetElementsByTagName _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name result <- webkit_dom_element_get_elements_by_tag_name _obj' name' checkUnexpectedReturnNULL "webkit_dom_element_get_elements_by_tag_name" result result' <- (wrapObject DOMNodeList) result touchManagedPtr _obj freeMem name' return result' data DOMElementGetElementsByTagNameMethodInfo instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetElementsByTagNameMethodInfo a signature where overloadedMethod _ = dOMElementGetElementsByTagName -- method DOMElement::get_elements_by_tag_name_ns -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMNodeList" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_elements_by_tag_name_ns" webkit_dom_element_get_elements_by_tag_name_ns :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- namespaceURI : TBasicType TUTF8 CString -> -- localName : TBasicType TUTF8 IO (Ptr DOMNodeList) dOMElementGetElementsByTagNameNs :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- namespaceURI -> T.Text -- localName -> m DOMNodeList -- result dOMElementGetElementsByTagNameNs _obj namespaceURI localName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj namespaceURI' <- textToCString namespaceURI localName' <- textToCString localName result <- webkit_dom_element_get_elements_by_tag_name_ns _obj' namespaceURI' localName' checkUnexpectedReturnNULL "webkit_dom_element_get_elements_by_tag_name_ns" result result' <- (wrapObject DOMNodeList) result touchManagedPtr _obj freeMem namespaceURI' freeMem localName' return result' data DOMElementGetElementsByTagNameNsMethodInfo instance (signature ~ (T.Text -> T.Text -> m DOMNodeList), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetElementsByTagNameNsMethodInfo a signature where overloadedMethod _ = dOMElementGetElementsByTagNameNs -- method DOMElement::get_first_element_child -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMElement" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_first_element_child" webkit_dom_element_get_first_element_child :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO (Ptr DOMElement) dOMElementGetFirstElementChild :: (MonadIO m, DOMElementK a) => a -- _obj -> m DOMElement -- result dOMElementGetFirstElementChild _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_first_element_child _obj' checkUnexpectedReturnNULL "webkit_dom_element_get_first_element_child" result result' <- (newObject DOMElement) result touchManagedPtr _obj return result' data DOMElementGetFirstElementChildMethodInfo instance (signature ~ (m DOMElement), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetFirstElementChildMethodInfo a signature where overloadedMethod _ = dOMElementGetFirstElementChild -- method DOMElement::get_id -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_id" webkit_dom_element_get_id :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO CString dOMElementGetId :: (MonadIO m, DOMElementK a) => a -- _obj -> m T.Text -- result dOMElementGetId _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_id _obj' checkUnexpectedReturnNULL "webkit_dom_element_get_id" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMElementGetIdMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetIdMethodInfo a signature where overloadedMethod _ = dOMElementGetId -- method DOMElement::get_inner_html -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_inner_html" webkit_dom_element_get_inner_html :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO CString dOMElementGetInnerHtml :: (MonadIO m, DOMElementK a) => a -- _obj -> m T.Text -- result dOMElementGetInnerHtml _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_inner_html _obj' checkUnexpectedReturnNULL "webkit_dom_element_get_inner_html" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMElementGetInnerHtmlMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetInnerHtmlMethodInfo a signature where overloadedMethod _ = dOMElementGetInnerHtml -- method DOMElement::get_last_element_child -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMElement" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_last_element_child" webkit_dom_element_get_last_element_child :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO (Ptr DOMElement) dOMElementGetLastElementChild :: (MonadIO m, DOMElementK a) => a -- _obj -> m DOMElement -- result dOMElementGetLastElementChild _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_last_element_child _obj' checkUnexpectedReturnNULL "webkit_dom_element_get_last_element_child" result result' <- (newObject DOMElement) result touchManagedPtr _obj return result' data DOMElementGetLastElementChildMethodInfo instance (signature ~ (m DOMElement), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetLastElementChildMethodInfo a signature where overloadedMethod _ = dOMElementGetLastElementChild -- method DOMElement::get_next_element_sibling -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMElement" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_next_element_sibling" webkit_dom_element_get_next_element_sibling :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO (Ptr DOMElement) dOMElementGetNextElementSibling :: (MonadIO m, DOMElementK a) => a -- _obj -> m DOMElement -- result dOMElementGetNextElementSibling _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_next_element_sibling _obj' checkUnexpectedReturnNULL "webkit_dom_element_get_next_element_sibling" result result' <- (newObject DOMElement) result touchManagedPtr _obj return result' data DOMElementGetNextElementSiblingMethodInfo instance (signature ~ (m DOMElement), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetNextElementSiblingMethodInfo a signature where overloadedMethod _ = dOMElementGetNextElementSibling -- method DOMElement::get_offset_height -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_offset_height" webkit_dom_element_get_offset_height :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO CDouble dOMElementGetOffsetHeight :: (MonadIO m, DOMElementK a) => a -- _obj -> m Double -- result dOMElementGetOffsetHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_offset_height _obj' let result' = realToFrac result touchManagedPtr _obj return result' data DOMElementGetOffsetHeightMethodInfo instance (signature ~ (m Double), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetOffsetHeightMethodInfo a signature where overloadedMethod _ = dOMElementGetOffsetHeight -- method DOMElement::get_offset_left -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_offset_left" webkit_dom_element_get_offset_left :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO CDouble dOMElementGetOffsetLeft :: (MonadIO m, DOMElementK a) => a -- _obj -> m Double -- result dOMElementGetOffsetLeft _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_offset_left _obj' let result' = realToFrac result touchManagedPtr _obj return result' data DOMElementGetOffsetLeftMethodInfo instance (signature ~ (m Double), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetOffsetLeftMethodInfo a signature where overloadedMethod _ = dOMElementGetOffsetLeft -- method DOMElement::get_offset_parent -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMElement" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_offset_parent" webkit_dom_element_get_offset_parent :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO (Ptr DOMElement) dOMElementGetOffsetParent :: (MonadIO m, DOMElementK a) => a -- _obj -> m DOMElement -- result dOMElementGetOffsetParent _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_offset_parent _obj' checkUnexpectedReturnNULL "webkit_dom_element_get_offset_parent" result result' <- (newObject DOMElement) result touchManagedPtr _obj return result' data DOMElementGetOffsetParentMethodInfo instance (signature ~ (m DOMElement), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetOffsetParentMethodInfo a signature where overloadedMethod _ = dOMElementGetOffsetParent -- method DOMElement::get_offset_top -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_offset_top" webkit_dom_element_get_offset_top :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO CDouble dOMElementGetOffsetTop :: (MonadIO m, DOMElementK a) => a -- _obj -> m Double -- result dOMElementGetOffsetTop _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_offset_top _obj' let result' = realToFrac result touchManagedPtr _obj return result' data DOMElementGetOffsetTopMethodInfo instance (signature ~ (m Double), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetOffsetTopMethodInfo a signature where overloadedMethod _ = dOMElementGetOffsetTop -- method DOMElement::get_offset_width -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_offset_width" webkit_dom_element_get_offset_width :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO CDouble dOMElementGetOffsetWidth :: (MonadIO m, DOMElementK a) => a -- _obj -> m Double -- result dOMElementGetOffsetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_offset_width _obj' let result' = realToFrac result touchManagedPtr _obj return result' data DOMElementGetOffsetWidthMethodInfo instance (signature ~ (m Double), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetOffsetWidthMethodInfo a signature where overloadedMethod _ = dOMElementGetOffsetWidth -- method DOMElement::get_outer_html -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_outer_html" webkit_dom_element_get_outer_html :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO CString dOMElementGetOuterHtml :: (MonadIO m, DOMElementK a) => a -- _obj -> m T.Text -- result dOMElementGetOuterHtml _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_outer_html _obj' checkUnexpectedReturnNULL "webkit_dom_element_get_outer_html" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMElementGetOuterHtmlMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetOuterHtmlMethodInfo a signature where overloadedMethod _ = dOMElementGetOuterHtml -- method DOMElement::get_previous_element_sibling -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMElement" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_previous_element_sibling" webkit_dom_element_get_previous_element_sibling :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO (Ptr DOMElement) dOMElementGetPreviousElementSibling :: (MonadIO m, DOMElementK a) => a -- _obj -> m DOMElement -- result dOMElementGetPreviousElementSibling _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_previous_element_sibling _obj' checkUnexpectedReturnNULL "webkit_dom_element_get_previous_element_sibling" result result' <- (newObject DOMElement) result touchManagedPtr _obj return result' data DOMElementGetPreviousElementSiblingMethodInfo instance (signature ~ (m DOMElement), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetPreviousElementSiblingMethodInfo a signature where overloadedMethod _ = dOMElementGetPreviousElementSibling -- method DOMElement::get_scroll_height -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", 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_element_get_scroll_height" webkit_dom_element_get_scroll_height :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO Int64 dOMElementGetScrollHeight :: (MonadIO m, DOMElementK a) => a -- _obj -> m Int64 -- result dOMElementGetScrollHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_scroll_height _obj' touchManagedPtr _obj return result data DOMElementGetScrollHeightMethodInfo instance (signature ~ (m Int64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetScrollHeightMethodInfo a signature where overloadedMethod _ = dOMElementGetScrollHeight -- method DOMElement::get_scroll_left -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", 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_element_get_scroll_left" webkit_dom_element_get_scroll_left :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO Int64 dOMElementGetScrollLeft :: (MonadIO m, DOMElementK a) => a -- _obj -> m Int64 -- result dOMElementGetScrollLeft _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_scroll_left _obj' touchManagedPtr _obj return result data DOMElementGetScrollLeftMethodInfo instance (signature ~ (m Int64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetScrollLeftMethodInfo a signature where overloadedMethod _ = dOMElementGetScrollLeft -- method DOMElement::get_scroll_top -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", 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_element_get_scroll_top" webkit_dom_element_get_scroll_top :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO Int64 dOMElementGetScrollTop :: (MonadIO m, DOMElementK a) => a -- _obj -> m Int64 -- result dOMElementGetScrollTop _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_scroll_top _obj' touchManagedPtr _obj return result data DOMElementGetScrollTopMethodInfo instance (signature ~ (m Int64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetScrollTopMethodInfo a signature where overloadedMethod _ = dOMElementGetScrollTop -- method DOMElement::get_scroll_width -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", 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_element_get_scroll_width" webkit_dom_element_get_scroll_width :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO Int64 dOMElementGetScrollWidth :: (MonadIO m, DOMElementK a) => a -- _obj -> m Int64 -- result dOMElementGetScrollWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_scroll_width _obj' touchManagedPtr _obj return result data DOMElementGetScrollWidthMethodInfo instance (signature ~ (m Int64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetScrollWidthMethodInfo a signature where overloadedMethod _ = dOMElementGetScrollWidth -- method DOMElement::get_style -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMCSSStyleDeclaration" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_style" webkit_dom_element_get_style :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO (Ptr DOMCSSStyleDeclaration) dOMElementGetStyle :: (MonadIO m, DOMElementK a) => a -- _obj -> m DOMCSSStyleDeclaration -- result dOMElementGetStyle _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_style _obj' checkUnexpectedReturnNULL "webkit_dom_element_get_style" result result' <- (wrapObject DOMCSSStyleDeclaration) result touchManagedPtr _obj return result' data DOMElementGetStyleMethodInfo instance (signature ~ (m DOMCSSStyleDeclaration), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetStyleMethodInfo a signature where overloadedMethod _ = dOMElementGetStyle -- method DOMElement::get_tag_name -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_get_tag_name" webkit_dom_element_get_tag_name :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO CString dOMElementGetTagName :: (MonadIO m, DOMElementK a) => a -- _obj -> m T.Text -- result dOMElementGetTagName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_tag_name _obj' checkUnexpectedReturnNULL "webkit_dom_element_get_tag_name" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMElementGetTagNameMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetTagNameMethodInfo a signature where overloadedMethod _ = dOMElementGetTagName -- method DOMElement::has_attribute -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_has_attribute" webkit_dom_element_has_attribute :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- name : TBasicType TUTF8 IO CInt dOMElementHasAttribute :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- name -> m Bool -- result dOMElementHasAttribute _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name result <- webkit_dom_element_has_attribute _obj' name' let result' = (/= 0) result touchManagedPtr _obj freeMem name' return result' data DOMElementHasAttributeMethodInfo instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMElementK a) => MethodInfo DOMElementHasAttributeMethodInfo a signature where overloadedMethod _ = dOMElementHasAttribute -- method DOMElement::has_attribute_ns -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_has_attribute_ns" webkit_dom_element_has_attribute_ns :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- namespaceURI : TBasicType TUTF8 CString -> -- localName : TBasicType TUTF8 IO CInt dOMElementHasAttributeNs :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- namespaceURI -> T.Text -- localName -> m Bool -- result dOMElementHasAttributeNs _obj namespaceURI localName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj namespaceURI' <- textToCString namespaceURI localName' <- textToCString localName result <- webkit_dom_element_has_attribute_ns _obj' namespaceURI' localName' let result' = (/= 0) result touchManagedPtr _obj freeMem namespaceURI' freeMem localName' return result' data DOMElementHasAttributeNsMethodInfo instance (signature ~ (T.Text -> T.Text -> m Bool), MonadIO m, DOMElementK a) => MethodInfo DOMElementHasAttributeNsMethodInfo a signature where overloadedMethod _ = dOMElementHasAttributeNs -- method DOMElement::has_attributes -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False foreign import ccall "webkit_dom_element_has_attributes" webkit_dom_element_has_attributes :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" IO CInt dOMElementHasAttributes :: (MonadIO m, DOMElementK a) => a -- _obj -> m Bool -- result dOMElementHasAttributes _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_has_attributes _obj' let result' = (/= 0) result touchManagedPtr _obj return result' data DOMElementHasAttributesMethodInfo instance (signature ~ (m Bool), MonadIO m, DOMElementK a) => MethodInfo DOMElementHasAttributesMethodInfo a signature where overloadedMethod _ = dOMElementHasAttributes -- method DOMElement::query_selector -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMElement" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_element_query_selector" webkit_dom_element_query_selector :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- selectors : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO (Ptr DOMElement) dOMElementQuerySelector :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- selectors -> m DOMElement -- result dOMElementQuerySelector _obj selectors = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj selectors' <- textToCString selectors onException (do result <- propagateGError $ webkit_dom_element_query_selector _obj' selectors' checkUnexpectedReturnNULL "webkit_dom_element_query_selector" result result' <- (newObject DOMElement) result touchManagedPtr _obj freeMem selectors' return result' ) (do freeMem selectors' ) data DOMElementQuerySelectorMethodInfo instance (signature ~ (T.Text -> m DOMElement), MonadIO m, DOMElementK a) => MethodInfo DOMElementQuerySelectorMethodInfo a signature where overloadedMethod _ = dOMElementQuerySelector -- method DOMElement::query_selector_all -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMNodeList" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_element_query_selector_all" webkit_dom_element_query_selector_all :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- selectors : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO (Ptr DOMNodeList) dOMElementQuerySelectorAll :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- selectors -> m DOMNodeList -- result dOMElementQuerySelectorAll _obj selectors = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj selectors' <- textToCString selectors onException (do result <- propagateGError $ webkit_dom_element_query_selector_all _obj' selectors' checkUnexpectedReturnNULL "webkit_dom_element_query_selector_all" result result' <- (wrapObject DOMNodeList) result touchManagedPtr _obj freeMem selectors' return result' ) (do freeMem selectors' ) data DOMElementQuerySelectorAllMethodInfo instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMElementK a) => MethodInfo DOMElementQuerySelectorAllMethodInfo a signature where overloadedMethod _ = dOMElementQuerySelectorAll -- method DOMElement::remove_attribute -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, 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_element_remove_attribute" webkit_dom_element_remove_attribute :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- name : TBasicType TUTF8 IO () dOMElementRemoveAttribute :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- name -> m () -- result dOMElementRemoveAttribute _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name webkit_dom_element_remove_attribute _obj' name' touchManagedPtr _obj freeMem name' return () data DOMElementRemoveAttributeMethodInfo instance (signature ~ (T.Text -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementRemoveAttributeMethodInfo a signature where overloadedMethod _ = dOMElementRemoveAttribute -- method DOMElement::remove_attribute_node -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "oldAttr", argType = TInterface "WebKit2WebExtension" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMAttr" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_element_remove_attribute_node" webkit_dom_element_remove_attribute_node :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" Ptr DOMAttr -> -- oldAttr : TInterface "WebKit2WebExtension" "DOMAttr" Ptr (Ptr GError) -> -- error IO (Ptr DOMAttr) dOMElementRemoveAttributeNode :: (MonadIO m, DOMElementK a, DOMAttrK b) => a -- _obj -> b -- oldAttr -> m DOMAttr -- result dOMElementRemoveAttributeNode _obj oldAttr = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let oldAttr' = unsafeManagedPtrCastPtr oldAttr onException (do result <- propagateGError $ webkit_dom_element_remove_attribute_node _obj' oldAttr' checkUnexpectedReturnNULL "webkit_dom_element_remove_attribute_node" result result' <- (newObject DOMAttr) result touchManagedPtr _obj touchManagedPtr oldAttr return result' ) (do return () ) data DOMElementRemoveAttributeNodeMethodInfo instance (signature ~ (b -> m DOMAttr), MonadIO m, DOMElementK a, DOMAttrK b) => MethodInfo DOMElementRemoveAttributeNodeMethodInfo a signature where overloadedMethod _ = dOMElementRemoveAttributeNode -- method DOMElement::remove_attribute_ns -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "localName", argType = TBasicType TUTF8, 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_element_remove_attribute_ns" webkit_dom_element_remove_attribute_ns :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- namespaceURI : TBasicType TUTF8 CString -> -- localName : TBasicType TUTF8 IO () dOMElementRemoveAttributeNs :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- namespaceURI -> T.Text -- localName -> m () -- result dOMElementRemoveAttributeNs _obj namespaceURI localName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj namespaceURI' <- textToCString namespaceURI localName' <- textToCString localName webkit_dom_element_remove_attribute_ns _obj' namespaceURI' localName' touchManagedPtr _obj freeMem namespaceURI' freeMem localName' return () data DOMElementRemoveAttributeNsMethodInfo instance (signature ~ (T.Text -> T.Text -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementRemoveAttributeNsMethodInfo a signature where overloadedMethod _ = dOMElementRemoveAttributeNs -- method DOMElement::scroll_by_lines -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "lines", 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_element_scroll_by_lines" webkit_dom_element_scroll_by_lines :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" Int64 -> -- lines : TBasicType TInt64 IO () dOMElementScrollByLines :: (MonadIO m, DOMElementK a) => a -- _obj -> Int64 -- lines -> m () -- result dOMElementScrollByLines _obj lines = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_element_scroll_by_lines _obj' lines touchManagedPtr _obj return () data DOMElementScrollByLinesMethodInfo instance (signature ~ (Int64 -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementScrollByLinesMethodInfo a signature where overloadedMethod _ = dOMElementScrollByLines -- method DOMElement::scroll_by_pages -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "pages", 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_element_scroll_by_pages" webkit_dom_element_scroll_by_pages :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" Int64 -> -- pages : TBasicType TInt64 IO () dOMElementScrollByPages :: (MonadIO m, DOMElementK a) => a -- _obj -> Int64 -- pages -> m () -- result dOMElementScrollByPages _obj pages = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_element_scroll_by_pages _obj' pages touchManagedPtr _obj return () data DOMElementScrollByPagesMethodInfo instance (signature ~ (Int64 -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementScrollByPagesMethodInfo a signature where overloadedMethod _ = dOMElementScrollByPages -- method DOMElement::scroll_into_view -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "alignWithTop", argType = TBasicType TBoolean, 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_element_scroll_into_view" webkit_dom_element_scroll_into_view :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CInt -> -- alignWithTop : TBasicType TBoolean IO () dOMElementScrollIntoView :: (MonadIO m, DOMElementK a) => a -- _obj -> Bool -- alignWithTop -> m () -- result dOMElementScrollIntoView _obj alignWithTop = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let alignWithTop' = (fromIntegral . fromEnum) alignWithTop webkit_dom_element_scroll_into_view _obj' alignWithTop' touchManagedPtr _obj return () data DOMElementScrollIntoViewMethodInfo instance (signature ~ (Bool -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementScrollIntoViewMethodInfo a signature where overloadedMethod _ = dOMElementScrollIntoView -- method DOMElement::scroll_into_view_if_needed -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "centerIfNeeded", argType = TBasicType TBoolean, 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_element_scroll_into_view_if_needed" webkit_dom_element_scroll_into_view_if_needed :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CInt -> -- centerIfNeeded : TBasicType TBoolean IO () dOMElementScrollIntoViewIfNeeded :: (MonadIO m, DOMElementK a) => a -- _obj -> Bool -- centerIfNeeded -> m () -- result dOMElementScrollIntoViewIfNeeded _obj centerIfNeeded = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let centerIfNeeded' = (fromIntegral . fromEnum) centerIfNeeded webkit_dom_element_scroll_into_view_if_needed _obj' centerIfNeeded' touchManagedPtr _obj return () data DOMElementScrollIntoViewIfNeededMethodInfo instance (signature ~ (Bool -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementScrollIntoViewIfNeededMethodInfo a signature where overloadedMethod _ = dOMElementScrollIntoViewIfNeeded -- method DOMElement::set_attribute -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False foreign import ccall "webkit_dom_element_set_attribute" webkit_dom_element_set_attribute :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- name : TBasicType TUTF8 CString -> -- value : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO () dOMElementSetAttribute :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- name -> T.Text -- value -> m () -- result dOMElementSetAttribute _obj name value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name value' <- textToCString value onException (do propagateGError $ webkit_dom_element_set_attribute _obj' name' value' touchManagedPtr _obj freeMem name' freeMem value' return () ) (do freeMem name' freeMem value' ) data DOMElementSetAttributeMethodInfo instance (signature ~ (T.Text -> T.Text -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementSetAttributeMethodInfo a signature where overloadedMethod _ = dOMElementSetAttribute -- method DOMElement::set_attribute_node -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "newAttr", argType = TInterface "WebKit2WebExtension" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMAttr" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_element_set_attribute_node" webkit_dom_element_set_attribute_node :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" Ptr DOMAttr -> -- newAttr : TInterface "WebKit2WebExtension" "DOMAttr" Ptr (Ptr GError) -> -- error IO (Ptr DOMAttr) dOMElementSetAttributeNode :: (MonadIO m, DOMElementK a, DOMAttrK b) => a -- _obj -> b -- newAttr -> m DOMAttr -- result dOMElementSetAttributeNode _obj newAttr = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let newAttr' = unsafeManagedPtrCastPtr newAttr onException (do result <- propagateGError $ webkit_dom_element_set_attribute_node _obj' newAttr' checkUnexpectedReturnNULL "webkit_dom_element_set_attribute_node" result result' <- (newObject DOMAttr) result touchManagedPtr _obj touchManagedPtr newAttr return result' ) (do return () ) data DOMElementSetAttributeNodeMethodInfo instance (signature ~ (b -> m DOMAttr), MonadIO m, DOMElementK a, DOMAttrK b) => MethodInfo DOMElementSetAttributeNodeMethodInfo a signature where overloadedMethod _ = dOMElementSetAttributeNode -- method DOMElement::set_attribute_node_ns -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "newAttr", argType = TInterface "WebKit2WebExtension" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMAttr" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_element_set_attribute_node_ns" webkit_dom_element_set_attribute_node_ns :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" Ptr DOMAttr -> -- newAttr : TInterface "WebKit2WebExtension" "DOMAttr" Ptr (Ptr GError) -> -- error IO (Ptr DOMAttr) dOMElementSetAttributeNodeNs :: (MonadIO m, DOMElementK a, DOMAttrK b) => a -- _obj -> b -- newAttr -> m DOMAttr -- result dOMElementSetAttributeNodeNs _obj newAttr = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let newAttr' = unsafeManagedPtrCastPtr newAttr onException (do result <- propagateGError $ webkit_dom_element_set_attribute_node_ns _obj' newAttr' checkUnexpectedReturnNULL "webkit_dom_element_set_attribute_node_ns" result result' <- (newObject DOMAttr) result touchManagedPtr _obj touchManagedPtr newAttr return result' ) (do return () ) data DOMElementSetAttributeNodeNsMethodInfo instance (signature ~ (b -> m DOMAttr), MonadIO m, DOMElementK a, DOMAttrK b) => MethodInfo DOMElementSetAttributeNodeNsMethodInfo a signature where overloadedMethod _ = dOMElementSetAttributeNodeNs -- method DOMElement::set_attribute_ns -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "qualifiedName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False foreign import ccall "webkit_dom_element_set_attribute_ns" webkit_dom_element_set_attribute_ns :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- namespaceURI : TBasicType TUTF8 CString -> -- qualifiedName : TBasicType TUTF8 CString -> -- value : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO () dOMElementSetAttributeNs :: (MonadIO m, DOMElementK a) => a -- _obj -> Maybe (T.Text) -- namespaceURI -> T.Text -- qualifiedName -> T.Text -- value -> m () -- result dOMElementSetAttributeNs _obj namespaceURI qualifiedName value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeNamespaceURI <- case namespaceURI of Nothing -> return nullPtr Just jNamespaceURI -> do jNamespaceURI' <- textToCString jNamespaceURI return jNamespaceURI' qualifiedName' <- textToCString qualifiedName value' <- textToCString value onException (do propagateGError $ webkit_dom_element_set_attribute_ns _obj' maybeNamespaceURI qualifiedName' value' touchManagedPtr _obj freeMem maybeNamespaceURI freeMem qualifiedName' freeMem value' return () ) (do freeMem maybeNamespaceURI freeMem qualifiedName' freeMem value' ) data DOMElementSetAttributeNsMethodInfo instance (signature ~ (Maybe (T.Text) -> T.Text -> T.Text -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementSetAttributeNsMethodInfo a signature where overloadedMethod _ = dOMElementSetAttributeNs -- method DOMElement::set_class_name -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, 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_element_set_class_name" webkit_dom_element_set_class_name :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- value : TBasicType TUTF8 IO () dOMElementSetClassName :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- value -> m () -- result dOMElementSetClassName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value webkit_dom_element_set_class_name _obj' value' touchManagedPtr _obj freeMem value' return () data DOMElementSetClassNameMethodInfo instance (signature ~ (T.Text -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementSetClassNameMethodInfo a signature where overloadedMethod _ = dOMElementSetClassName -- method DOMElement::set_id -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, 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_element_set_id" webkit_dom_element_set_id :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- value : TBasicType TUTF8 IO () dOMElementSetId :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- value -> m () -- result dOMElementSetId _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value webkit_dom_element_set_id _obj' value' touchManagedPtr _obj freeMem value' return () data DOMElementSetIdMethodInfo instance (signature ~ (T.Text -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementSetIdMethodInfo a signature where overloadedMethod _ = dOMElementSetId -- method DOMElement::set_inner_html -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False foreign import ccall "webkit_dom_element_set_inner_html" webkit_dom_element_set_inner_html :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- value : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO () dOMElementSetInnerHtml :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- value -> m () -- result dOMElementSetInnerHtml _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value onException (do propagateGError $ webkit_dom_element_set_inner_html _obj' value' touchManagedPtr _obj freeMem value' return () ) (do freeMem value' ) data DOMElementSetInnerHtmlMethodInfo instance (signature ~ (T.Text -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementSetInnerHtmlMethodInfo a signature where overloadedMethod _ = dOMElementSetInnerHtml -- method DOMElement::set_outer_html -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False foreign import ccall "webkit_dom_element_set_outer_html" webkit_dom_element_set_outer_html :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- value : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO () dOMElementSetOuterHtml :: (MonadIO m, DOMElementK a) => a -- _obj -> T.Text -- value -> m () -- result dOMElementSetOuterHtml _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value onException (do propagateGError $ webkit_dom_element_set_outer_html _obj' value' touchManagedPtr _obj freeMem value' return () ) (do freeMem value' ) data DOMElementSetOuterHtmlMethodInfo instance (signature ~ (T.Text -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementSetOuterHtmlMethodInfo a signature where overloadedMethod _ = dOMElementSetOuterHtml -- method DOMElement::set_scroll_left -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", 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_element_set_scroll_left" webkit_dom_element_set_scroll_left :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" Int64 -> -- value : TBasicType TInt64 IO () dOMElementSetScrollLeft :: (MonadIO m, DOMElementK a) => a -- _obj -> Int64 -- value -> m () -- result dOMElementSetScrollLeft _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_element_set_scroll_left _obj' value touchManagedPtr _obj return () data DOMElementSetScrollLeftMethodInfo instance (signature ~ (Int64 -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementSetScrollLeftMethodInfo a signature where overloadedMethod _ = dOMElementSetScrollLeft -- method DOMElement::set_scroll_top -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", 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_element_set_scroll_top" webkit_dom_element_set_scroll_top :: Ptr DOMElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMElement" Int64 -> -- value : TBasicType TInt64 IO () dOMElementSetScrollTop :: (MonadIO m, DOMElementK a) => a -- _obj -> Int64 -- value -> m () -- result dOMElementSetScrollTop _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_element_set_scroll_top _obj' value touchManagedPtr _obj return () data DOMElementSetScrollTopMethodInfo instance (signature ~ (Int64 -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementSetScrollTopMethodInfo a signature where overloadedMethod _ = dOMElementSetScrollTop