{- | 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.DOMDocument ( -- * Exported types DOMDocument(..) , DOMDocumentK , toDOMDocument , noDOMDocument , -- * Methods -- ** dOMDocumentAdoptNode DOMDocumentAdoptNodeMethodInfo , dOMDocumentAdoptNode , -- ** dOMDocumentCreateAttribute DOMDocumentCreateAttributeMethodInfo , dOMDocumentCreateAttribute , -- ** dOMDocumentCreateAttributeNs DOMDocumentCreateAttributeNsMethodInfo , dOMDocumentCreateAttributeNs , -- ** dOMDocumentCreateCdataSection DOMDocumentCreateCdataSectionMethodInfo , dOMDocumentCreateCdataSection , -- ** dOMDocumentCreateComment DOMDocumentCreateCommentMethodInfo , dOMDocumentCreateComment , -- ** dOMDocumentCreateCssStyleDeclaration DOMDocumentCreateCssStyleDeclarationMethodInfo, dOMDocumentCreateCssStyleDeclaration , -- ** dOMDocumentCreateDocumentFragment DOMDocumentCreateDocumentFragmentMethodInfo, dOMDocumentCreateDocumentFragment , -- ** dOMDocumentCreateElement DOMDocumentCreateElementMethodInfo , dOMDocumentCreateElement , -- ** dOMDocumentCreateElementNs DOMDocumentCreateElementNsMethodInfo , dOMDocumentCreateElementNs , -- ** dOMDocumentCreateEntityReference DOMDocumentCreateEntityReferenceMethodInfo, dOMDocumentCreateEntityReference , -- ** dOMDocumentCreateEvent DOMDocumentCreateEventMethodInfo , dOMDocumentCreateEvent , -- ** dOMDocumentCreateExpression DOMDocumentCreateExpressionMethodInfo , dOMDocumentCreateExpression , -- ** dOMDocumentCreateNodeIterator DOMDocumentCreateNodeIteratorMethodInfo , dOMDocumentCreateNodeIterator , -- ** dOMDocumentCreateNsResolver DOMDocumentCreateNsResolverMethodInfo , dOMDocumentCreateNsResolver , -- ** dOMDocumentCreateProcessingInstruction DOMDocumentCreateProcessingInstructionMethodInfo, dOMDocumentCreateProcessingInstruction , -- ** dOMDocumentCreateRange DOMDocumentCreateRangeMethodInfo , dOMDocumentCreateRange , -- ** dOMDocumentCreateTextNode DOMDocumentCreateTextNodeMethodInfo , dOMDocumentCreateTextNode , -- ** dOMDocumentCreateTreeWalker DOMDocumentCreateTreeWalkerMethodInfo , dOMDocumentCreateTreeWalker , -- ** dOMDocumentElementFromPoint DOMDocumentElementFromPointMethodInfo , dOMDocumentElementFromPoint , -- ** dOMDocumentEvaluate DOMDocumentEvaluateMethodInfo , dOMDocumentEvaluate , -- ** dOMDocumentExecCommand DOMDocumentExecCommandMethodInfo , dOMDocumentExecCommand , -- ** dOMDocumentGetActiveElement DOMDocumentGetActiveElementMethodInfo , dOMDocumentGetActiveElement , -- ** dOMDocumentGetAnchors DOMDocumentGetAnchorsMethodInfo , dOMDocumentGetAnchors , -- ** dOMDocumentGetApplets DOMDocumentGetAppletsMethodInfo , dOMDocumentGetApplets , -- ** dOMDocumentGetBody DOMDocumentGetBodyMethodInfo , dOMDocumentGetBody , -- ** dOMDocumentGetCharacterSet DOMDocumentGetCharacterSetMethodInfo , dOMDocumentGetCharacterSet , -- ** dOMDocumentGetCharset DOMDocumentGetCharsetMethodInfo , dOMDocumentGetCharset , -- ** dOMDocumentGetCookie DOMDocumentGetCookieMethodInfo , dOMDocumentGetCookie , -- ** dOMDocumentGetDefaultCharset DOMDocumentGetDefaultCharsetMethodInfo , dOMDocumentGetDefaultCharset , -- ** dOMDocumentGetDefaultView DOMDocumentGetDefaultViewMethodInfo , dOMDocumentGetDefaultView , -- ** dOMDocumentGetDoctype DOMDocumentGetDoctypeMethodInfo , dOMDocumentGetDoctype , -- ** dOMDocumentGetDocumentElement DOMDocumentGetDocumentElementMethodInfo , dOMDocumentGetDocumentElement , -- ** dOMDocumentGetDocumentUri DOMDocumentGetDocumentUriMethodInfo , dOMDocumentGetDocumentUri , -- ** dOMDocumentGetDomain DOMDocumentGetDomainMethodInfo , dOMDocumentGetDomain , -- ** dOMDocumentGetElementById DOMDocumentGetElementByIdMethodInfo , dOMDocumentGetElementById , -- ** dOMDocumentGetElementsByClassName DOMDocumentGetElementsByClassNameMethodInfo, dOMDocumentGetElementsByClassName , -- ** dOMDocumentGetElementsByName DOMDocumentGetElementsByNameMethodInfo , dOMDocumentGetElementsByName , -- ** dOMDocumentGetElementsByTagName DOMDocumentGetElementsByTagNameMethodInfo, dOMDocumentGetElementsByTagName , -- ** dOMDocumentGetElementsByTagNameNs DOMDocumentGetElementsByTagNameNsMethodInfo, dOMDocumentGetElementsByTagNameNs , -- ** dOMDocumentGetForms DOMDocumentGetFormsMethodInfo , dOMDocumentGetForms , -- ** dOMDocumentGetHead DOMDocumentGetHeadMethodInfo , dOMDocumentGetHead , -- ** dOMDocumentGetImages DOMDocumentGetImagesMethodInfo , dOMDocumentGetImages , -- ** dOMDocumentGetImplementation DOMDocumentGetImplementationMethodInfo , dOMDocumentGetImplementation , -- ** dOMDocumentGetInputEncoding DOMDocumentGetInputEncodingMethodInfo , dOMDocumentGetInputEncoding , -- ** dOMDocumentGetLastModified DOMDocumentGetLastModifiedMethodInfo , dOMDocumentGetLastModified , -- ** dOMDocumentGetLinks DOMDocumentGetLinksMethodInfo , dOMDocumentGetLinks , -- ** dOMDocumentGetOverrideStyle DOMDocumentGetOverrideStyleMethodInfo , dOMDocumentGetOverrideStyle , -- ** dOMDocumentGetPreferredStylesheetSet DOMDocumentGetPreferredStylesheetSetMethodInfo, dOMDocumentGetPreferredStylesheetSet , -- ** dOMDocumentGetReadyState DOMDocumentGetReadyStateMethodInfo , dOMDocumentGetReadyState , -- ** dOMDocumentGetReferrer DOMDocumentGetReferrerMethodInfo , dOMDocumentGetReferrer , -- ** dOMDocumentGetSelectedStylesheetSet DOMDocumentGetSelectedStylesheetSetMethodInfo, dOMDocumentGetSelectedStylesheetSet , -- ** dOMDocumentGetStyleSheets DOMDocumentGetStyleSheetsMethodInfo , dOMDocumentGetStyleSheets , -- ** dOMDocumentGetTitle DOMDocumentGetTitleMethodInfo , dOMDocumentGetTitle , -- ** dOMDocumentGetUrl DOMDocumentGetUrlMethodInfo , dOMDocumentGetUrl , -- ** dOMDocumentGetXmlEncoding DOMDocumentGetXmlEncodingMethodInfo , dOMDocumentGetXmlEncoding , -- ** dOMDocumentGetXmlStandalone DOMDocumentGetXmlStandaloneMethodInfo , dOMDocumentGetXmlStandalone , -- ** dOMDocumentGetXmlVersion DOMDocumentGetXmlVersionMethodInfo , dOMDocumentGetXmlVersion , -- ** dOMDocumentHasFocus DOMDocumentHasFocusMethodInfo , dOMDocumentHasFocus , -- ** dOMDocumentImportNode DOMDocumentImportNodeMethodInfo , dOMDocumentImportNode , -- ** dOMDocumentQueryCommandEnabled DOMDocumentQueryCommandEnabledMethodInfo, dOMDocumentQueryCommandEnabled , -- ** dOMDocumentQueryCommandIndeterm DOMDocumentQueryCommandIndetermMethodInfo, dOMDocumentQueryCommandIndeterm , -- ** dOMDocumentQueryCommandState DOMDocumentQueryCommandStateMethodInfo , dOMDocumentQueryCommandState , -- ** dOMDocumentQueryCommandSupported DOMDocumentQueryCommandSupportedMethodInfo, dOMDocumentQueryCommandSupported , -- ** dOMDocumentQueryCommandValue DOMDocumentQueryCommandValueMethodInfo , dOMDocumentQueryCommandValue , -- ** dOMDocumentQuerySelector DOMDocumentQuerySelectorMethodInfo , dOMDocumentQuerySelector , -- ** dOMDocumentQuerySelectorAll DOMDocumentQuerySelectorAllMethodInfo , dOMDocumentQuerySelectorAll , -- ** dOMDocumentSetBody DOMDocumentSetBodyMethodInfo , dOMDocumentSetBody , -- ** dOMDocumentSetCharset DOMDocumentSetCharsetMethodInfo , dOMDocumentSetCharset , -- ** dOMDocumentSetCookie DOMDocumentSetCookieMethodInfo , dOMDocumentSetCookie , -- ** dOMDocumentSetDocumentUri DOMDocumentSetDocumentUriMethodInfo , dOMDocumentSetDocumentUri , -- ** dOMDocumentSetSelectedStylesheetSet DOMDocumentSetSelectedStylesheetSetMethodInfo, dOMDocumentSetSelectedStylesheetSet , -- ** dOMDocumentSetTitle DOMDocumentSetTitleMethodInfo , dOMDocumentSetTitle , -- ** dOMDocumentSetXmlStandalone DOMDocumentSetXmlStandaloneMethodInfo , dOMDocumentSetXmlStandalone , -- ** dOMDocumentSetXmlVersion DOMDocumentSetXmlVersionMethodInfo , dOMDocumentSetXmlVersion , -- * Properties -- ** ActiveElement DOMDocumentActiveElementPropertyInfo , getDOMDocumentActiveElement , -- ** Anchors DOMDocumentAnchorsPropertyInfo , getDOMDocumentAnchors , -- ** Applets DOMDocumentAppletsPropertyInfo , getDOMDocumentApplets , -- ** Body DOMDocumentBodyPropertyInfo , getDOMDocumentBody , -- ** CharacterSet DOMDocumentCharacterSetPropertyInfo , getDOMDocumentCharacterSet , -- ** Charset DOMDocumentCharsetPropertyInfo , constructDOMDocumentCharset , getDOMDocumentCharset , setDOMDocumentCharset , -- ** ChildElementCount DOMDocumentChildElementCountPropertyInfo, getDOMDocumentChildElementCount , -- ** Children DOMDocumentChildrenPropertyInfo , getDOMDocumentChildren , -- ** CompatMode DOMDocumentCompatModePropertyInfo , getDOMDocumentCompatMode , -- ** ContentType DOMDocumentContentTypePropertyInfo , getDOMDocumentContentType , -- ** Cookie DOMDocumentCookiePropertyInfo , constructDOMDocumentCookie , getDOMDocumentCookie , setDOMDocumentCookie , -- ** CurrentScript DOMDocumentCurrentScriptPropertyInfo , getDOMDocumentCurrentScript , -- ** DefaultCharset DOMDocumentDefaultCharsetPropertyInfo , getDOMDocumentDefaultCharset , -- ** DefaultView DOMDocumentDefaultViewPropertyInfo , getDOMDocumentDefaultView , -- ** Doctype DOMDocumentDoctypePropertyInfo , getDOMDocumentDoctype , -- ** DocumentElement DOMDocumentDocumentElementPropertyInfo , getDOMDocumentDocumentElement , -- ** DocumentUri DOMDocumentDocumentUriPropertyInfo , constructDOMDocumentDocumentUri , getDOMDocumentDocumentUri , setDOMDocumentDocumentUri , -- ** Domain DOMDocumentDomainPropertyInfo , getDOMDocumentDomain , -- ** FirstElementChild DOMDocumentFirstElementChildPropertyInfo, getDOMDocumentFirstElementChild , -- ** Forms DOMDocumentFormsPropertyInfo , getDOMDocumentForms , -- ** Head DOMDocumentHeadPropertyInfo , getDOMDocumentHead , -- ** Hidden DOMDocumentHiddenPropertyInfo , getDOMDocumentHidden , -- ** Images DOMDocumentImagesPropertyInfo , getDOMDocumentImages , -- ** Implementation DOMDocumentImplementationPropertyInfo , getDOMDocumentImplementation , -- ** InputEncoding DOMDocumentInputEncodingPropertyInfo , getDOMDocumentInputEncoding , -- ** LastElementChild DOMDocumentLastElementChildPropertyInfo , getDOMDocumentLastElementChild , -- ** LastModified DOMDocumentLastModifiedPropertyInfo , getDOMDocumentLastModified , -- ** Links DOMDocumentLinksPropertyInfo , getDOMDocumentLinks , -- ** Origin DOMDocumentOriginPropertyInfo , getDOMDocumentOrigin , -- ** PointerLockElement DOMDocumentPointerLockElementPropertyInfo, getDOMDocumentPointerLockElement , -- ** PreferredStylesheetSet DOMDocumentPreferredStylesheetSetPropertyInfo, getDOMDocumentPreferredStylesheetSet , -- ** ReadyState DOMDocumentReadyStatePropertyInfo , getDOMDocumentReadyState , -- ** Referrer DOMDocumentReferrerPropertyInfo , getDOMDocumentReferrer , -- ** ScrollingElement DOMDocumentScrollingElementPropertyInfo , getDOMDocumentScrollingElement , -- ** SelectedStylesheetSet DOMDocumentSelectedStylesheetSetPropertyInfo, constructDOMDocumentSelectedStylesheetSet, getDOMDocumentSelectedStylesheetSet , setDOMDocumentSelectedStylesheetSet , -- ** StyleSheets DOMDocumentStyleSheetsPropertyInfo , getDOMDocumentStyleSheets , -- ** Title DOMDocumentTitlePropertyInfo , constructDOMDocumentTitle , getDOMDocumentTitle , setDOMDocumentTitle , -- ** Url DOMDocumentUrlPropertyInfo , getDOMDocumentUrl , -- ** VisibilityState DOMDocumentVisibilityStatePropertyInfo , getDOMDocumentVisibilityState , -- ** WebkitCurrentFullScreenElement DOMDocumentWebkitCurrentFullScreenElementPropertyInfo, getDOMDocumentWebkitCurrentFullScreenElement, -- ** WebkitFullScreenKeyboardInputAllowed DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo, getDOMDocumentWebkitFullScreenKeyboardInputAllowed, -- ** WebkitFullscreenElement DOMDocumentWebkitFullscreenElementPropertyInfo, getDOMDocumentWebkitFullscreenElement , -- ** WebkitFullscreenEnabled DOMDocumentWebkitFullscreenEnabledPropertyInfo, getDOMDocumentWebkitFullscreenEnabled , -- ** WebkitIsFullScreen DOMDocumentWebkitIsFullScreenPropertyInfo, getDOMDocumentWebkitIsFullScreen , -- ** XmlEncoding DOMDocumentXmlEncodingPropertyInfo , getDOMDocumentXmlEncoding , -- ** XmlStandalone DOMDocumentXmlStandalonePropertyInfo , constructDOMDocumentXmlStandalone , getDOMDocumentXmlStandalone , setDOMDocumentXmlStandalone , -- ** XmlVersion DOMDocumentXmlVersionPropertyInfo , constructDOMDocumentXmlVersion , getDOMDocumentXmlVersion , setDOMDocumentXmlVersion , ) 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 DOMDocument = DOMDocument (ForeignPtr DOMDocument) foreign import ccall "webkit_dom_document_get_type" c_webkit_dom_document_get_type :: IO GType type instance ParentTypes DOMDocument = DOMDocumentParentTypes type DOMDocumentParentTypes = '[DOMNode, DOMObject, GObject.Object, DOMEventTarget] instance GObject DOMDocument where gobjectIsInitiallyUnowned _ = False gobjectType _ = c_webkit_dom_document_get_type class GObject o => DOMDocumentK o instance (GObject o, IsDescendantOf DOMDocument o) => DOMDocumentK o toDOMDocument :: DOMDocumentK o => o -> IO DOMDocument toDOMDocument = unsafeCastTo DOMDocument noDOMDocument :: Maybe DOMDocument noDOMDocument = Nothing type family ResolveDOMDocumentMethod (t :: Symbol) (o :: *) :: * where ResolveDOMDocumentMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo ResolveDOMDocumentMethod "adoptNode" o = DOMDocumentAdoptNodeMethodInfo ResolveDOMDocumentMethod "appendChild" o = DOMNodeAppendChildMethodInfo ResolveDOMDocumentMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo ResolveDOMDocumentMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo ResolveDOMDocumentMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo ResolveDOMDocumentMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo ResolveDOMDocumentMethod "contains" o = DOMNodeContainsMethodInfo ResolveDOMDocumentMethod "createAttribute" o = DOMDocumentCreateAttributeMethodInfo ResolveDOMDocumentMethod "createAttributeNs" o = DOMDocumentCreateAttributeNsMethodInfo ResolveDOMDocumentMethod "createCdataSection" o = DOMDocumentCreateCdataSectionMethodInfo ResolveDOMDocumentMethod "createComment" o = DOMDocumentCreateCommentMethodInfo ResolveDOMDocumentMethod "createCssStyleDeclaration" o = DOMDocumentCreateCssStyleDeclarationMethodInfo ResolveDOMDocumentMethod "createDocumentFragment" o = DOMDocumentCreateDocumentFragmentMethodInfo ResolveDOMDocumentMethod "createElement" o = DOMDocumentCreateElementMethodInfo ResolveDOMDocumentMethod "createElementNs" o = DOMDocumentCreateElementNsMethodInfo ResolveDOMDocumentMethod "createEntityReference" o = DOMDocumentCreateEntityReferenceMethodInfo ResolveDOMDocumentMethod "createEvent" o = DOMDocumentCreateEventMethodInfo ResolveDOMDocumentMethod "createExpression" o = DOMDocumentCreateExpressionMethodInfo ResolveDOMDocumentMethod "createNodeIterator" o = DOMDocumentCreateNodeIteratorMethodInfo ResolveDOMDocumentMethod "createNsResolver" o = DOMDocumentCreateNsResolverMethodInfo ResolveDOMDocumentMethod "createProcessingInstruction" o = DOMDocumentCreateProcessingInstructionMethodInfo ResolveDOMDocumentMethod "createRange" o = DOMDocumentCreateRangeMethodInfo ResolveDOMDocumentMethod "createTextNode" o = DOMDocumentCreateTextNodeMethodInfo ResolveDOMDocumentMethod "createTreeWalker" o = DOMDocumentCreateTreeWalkerMethodInfo ResolveDOMDocumentMethod "dispatchEvent" o = DOMEventTargetDispatchEventMethodInfo ResolveDOMDocumentMethod "elementFromPoint" o = DOMDocumentElementFromPointMethodInfo ResolveDOMDocumentMethod "evaluate" o = DOMDocumentEvaluateMethodInfo ResolveDOMDocumentMethod "execCommand" o = DOMDocumentExecCommandMethodInfo ResolveDOMDocumentMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo ResolveDOMDocumentMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo ResolveDOMDocumentMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo ResolveDOMDocumentMethod "hasFocus" o = DOMDocumentHasFocusMethodInfo ResolveDOMDocumentMethod "importNode" o = DOMDocumentImportNodeMethodInfo ResolveDOMDocumentMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo ResolveDOMDocumentMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo ResolveDOMDocumentMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo ResolveDOMDocumentMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo ResolveDOMDocumentMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo ResolveDOMDocumentMethod "isSupported" o = DOMNodeIsSupportedMethodInfo ResolveDOMDocumentMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo ResolveDOMDocumentMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo ResolveDOMDocumentMethod "normalize" o = DOMNodeNormalizeMethodInfo ResolveDOMDocumentMethod "notify" o = GObject.ObjectNotifyMethodInfo ResolveDOMDocumentMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo ResolveDOMDocumentMethod "queryCommandEnabled" o = DOMDocumentQueryCommandEnabledMethodInfo ResolveDOMDocumentMethod "queryCommandIndeterm" o = DOMDocumentQueryCommandIndetermMethodInfo ResolveDOMDocumentMethod "queryCommandState" o = DOMDocumentQueryCommandStateMethodInfo ResolveDOMDocumentMethod "queryCommandSupported" o = DOMDocumentQueryCommandSupportedMethodInfo ResolveDOMDocumentMethod "queryCommandValue" o = DOMDocumentQueryCommandValueMethodInfo ResolveDOMDocumentMethod "querySelector" o = DOMDocumentQuerySelectorMethodInfo ResolveDOMDocumentMethod "querySelectorAll" o = DOMDocumentQuerySelectorAllMethodInfo ResolveDOMDocumentMethod "ref" o = GObject.ObjectRefMethodInfo ResolveDOMDocumentMethod "refSink" o = GObject.ObjectRefSinkMethodInfo ResolveDOMDocumentMethod "removeChild" o = DOMNodeRemoveChildMethodInfo ResolveDOMDocumentMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo ResolveDOMDocumentMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo ResolveDOMDocumentMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo ResolveDOMDocumentMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo ResolveDOMDocumentMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo ResolveDOMDocumentMethod "stealData" o = GObject.ObjectStealDataMethodInfo ResolveDOMDocumentMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo ResolveDOMDocumentMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo ResolveDOMDocumentMethod "unref" o = GObject.ObjectUnrefMethodInfo ResolveDOMDocumentMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo ResolveDOMDocumentMethod "getActiveElement" o = DOMDocumentGetActiveElementMethodInfo ResolveDOMDocumentMethod "getAnchors" o = DOMDocumentGetAnchorsMethodInfo ResolveDOMDocumentMethod "getApplets" o = DOMDocumentGetAppletsMethodInfo ResolveDOMDocumentMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo ResolveDOMDocumentMethod "getBody" o = DOMDocumentGetBodyMethodInfo ResolveDOMDocumentMethod "getCharacterSet" o = DOMDocumentGetCharacterSetMethodInfo ResolveDOMDocumentMethod "getCharset" o = DOMDocumentGetCharsetMethodInfo ResolveDOMDocumentMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo ResolveDOMDocumentMethod "getCookie" o = DOMDocumentGetCookieMethodInfo ResolveDOMDocumentMethod "getData" o = GObject.ObjectGetDataMethodInfo ResolveDOMDocumentMethod "getDefaultCharset" o = DOMDocumentGetDefaultCharsetMethodInfo ResolveDOMDocumentMethod "getDefaultView" o = DOMDocumentGetDefaultViewMethodInfo ResolveDOMDocumentMethod "getDoctype" o = DOMDocumentGetDoctypeMethodInfo ResolveDOMDocumentMethod "getDocumentElement" o = DOMDocumentGetDocumentElementMethodInfo ResolveDOMDocumentMethod "getDocumentUri" o = DOMDocumentGetDocumentUriMethodInfo ResolveDOMDocumentMethod "getDomain" o = DOMDocumentGetDomainMethodInfo ResolveDOMDocumentMethod "getElementById" o = DOMDocumentGetElementByIdMethodInfo ResolveDOMDocumentMethod "getElementsByClassName" o = DOMDocumentGetElementsByClassNameMethodInfo ResolveDOMDocumentMethod "getElementsByName" o = DOMDocumentGetElementsByNameMethodInfo ResolveDOMDocumentMethod "getElementsByTagName" o = DOMDocumentGetElementsByTagNameMethodInfo ResolveDOMDocumentMethod "getElementsByTagNameNs" o = DOMDocumentGetElementsByTagNameNsMethodInfo ResolveDOMDocumentMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo ResolveDOMDocumentMethod "getForms" o = DOMDocumentGetFormsMethodInfo ResolveDOMDocumentMethod "getHead" o = DOMDocumentGetHeadMethodInfo ResolveDOMDocumentMethod "getImages" o = DOMDocumentGetImagesMethodInfo ResolveDOMDocumentMethod "getImplementation" o = DOMDocumentGetImplementationMethodInfo ResolveDOMDocumentMethod "getInputEncoding" o = DOMDocumentGetInputEncodingMethodInfo ResolveDOMDocumentMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo ResolveDOMDocumentMethod "getLastModified" o = DOMDocumentGetLastModifiedMethodInfo ResolveDOMDocumentMethod "getLinks" o = DOMDocumentGetLinksMethodInfo ResolveDOMDocumentMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo ResolveDOMDocumentMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo ResolveDOMDocumentMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo ResolveDOMDocumentMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo ResolveDOMDocumentMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo ResolveDOMDocumentMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo ResolveDOMDocumentMethod "getOverrideStyle" o = DOMDocumentGetOverrideStyleMethodInfo ResolveDOMDocumentMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo ResolveDOMDocumentMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo ResolveDOMDocumentMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo ResolveDOMDocumentMethod "getPreferredStylesheetSet" o = DOMDocumentGetPreferredStylesheetSetMethodInfo ResolveDOMDocumentMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo ResolveDOMDocumentMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo ResolveDOMDocumentMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo ResolveDOMDocumentMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo ResolveDOMDocumentMethod "getReadyState" o = DOMDocumentGetReadyStateMethodInfo ResolveDOMDocumentMethod "getReferrer" o = DOMDocumentGetReferrerMethodInfo ResolveDOMDocumentMethod "getSelectedStylesheetSet" o = DOMDocumentGetSelectedStylesheetSetMethodInfo ResolveDOMDocumentMethod "getStyleSheets" o = DOMDocumentGetStyleSheetsMethodInfo ResolveDOMDocumentMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo ResolveDOMDocumentMethod "getTitle" o = DOMDocumentGetTitleMethodInfo ResolveDOMDocumentMethod "getUrl" o = DOMDocumentGetUrlMethodInfo ResolveDOMDocumentMethod "getXmlEncoding" o = DOMDocumentGetXmlEncodingMethodInfo ResolveDOMDocumentMethod "getXmlStandalone" o = DOMDocumentGetXmlStandaloneMethodInfo ResolveDOMDocumentMethod "getXmlVersion" o = DOMDocumentGetXmlVersionMethodInfo ResolveDOMDocumentMethod "setBody" o = DOMDocumentSetBodyMethodInfo ResolveDOMDocumentMethod "setCharset" o = DOMDocumentSetCharsetMethodInfo ResolveDOMDocumentMethod "setCookie" o = DOMDocumentSetCookieMethodInfo ResolveDOMDocumentMethod "setData" o = GObject.ObjectSetDataMethodInfo ResolveDOMDocumentMethod "setDocumentUri" o = DOMDocumentSetDocumentUriMethodInfo ResolveDOMDocumentMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo ResolveDOMDocumentMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo ResolveDOMDocumentMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo ResolveDOMDocumentMethod "setSelectedStylesheetSet" o = DOMDocumentSetSelectedStylesheetSetMethodInfo ResolveDOMDocumentMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo ResolveDOMDocumentMethod "setTitle" o = DOMDocumentSetTitleMethodInfo ResolveDOMDocumentMethod "setXmlStandalone" o = DOMDocumentSetXmlStandaloneMethodInfo ResolveDOMDocumentMethod "setXmlVersion" o = DOMDocumentSetXmlVersionMethodInfo ResolveDOMDocumentMethod l o = MethodResolutionFailed l o instance (info ~ ResolveDOMDocumentMethod t DOMDocument, MethodInfo info DOMDocument p) => IsLabelProxy t (DOMDocument -> p) where fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) #if MIN_VERSION_base(4,9,0) instance (info ~ ResolveDOMDocumentMethod t DOMDocument, MethodInfo info DOMDocument p) => IsLabel t (DOMDocument -> p) where fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) #endif -- VVV Prop "active-element" -- Type: TInterface "WebKit2WebExtension" "DOMElement" -- Flags: [PropertyReadable] getDOMDocumentActiveElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement getDOMDocumentActiveElement obj = liftIO $ getObjectPropertyObject obj "active-element" DOMElement data DOMDocumentActiveElementPropertyInfo instance AttrInfo DOMDocumentActiveElementPropertyInfo where type AttrAllowedOps DOMDocumentActiveElementPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentActiveElementPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentActiveElementPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentActiveElementPropertyInfo = DOMElement type AttrLabel DOMDocumentActiveElementPropertyInfo = "active-element" attrGet _ = getDOMDocumentActiveElement attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "anchors" -- Type: TInterface "WebKit2WebExtension" "DOMHTMLCollection" -- Flags: [PropertyReadable] getDOMDocumentAnchors :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection getDOMDocumentAnchors obj = liftIO $ getObjectPropertyObject obj "anchors" DOMHTMLCollection data DOMDocumentAnchorsPropertyInfo instance AttrInfo DOMDocumentAnchorsPropertyInfo where type AttrAllowedOps DOMDocumentAnchorsPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentAnchorsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentAnchorsPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentAnchorsPropertyInfo = DOMHTMLCollection type AttrLabel DOMDocumentAnchorsPropertyInfo = "anchors" attrGet _ = getDOMDocumentAnchors attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "applets" -- Type: TInterface "WebKit2WebExtension" "DOMHTMLCollection" -- Flags: [PropertyReadable] getDOMDocumentApplets :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection getDOMDocumentApplets obj = liftIO $ getObjectPropertyObject obj "applets" DOMHTMLCollection data DOMDocumentAppletsPropertyInfo instance AttrInfo DOMDocumentAppletsPropertyInfo where type AttrAllowedOps DOMDocumentAppletsPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentAppletsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentAppletsPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentAppletsPropertyInfo = DOMHTMLCollection type AttrLabel DOMDocumentAppletsPropertyInfo = "applets" attrGet _ = getDOMDocumentApplets attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "body" -- Type: TInterface "WebKit2WebExtension" "DOMHTMLElement" -- Flags: [PropertyReadable] getDOMDocumentBody :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLElement getDOMDocumentBody obj = liftIO $ getObjectPropertyObject obj "body" DOMHTMLElement data DOMDocumentBodyPropertyInfo instance AttrInfo DOMDocumentBodyPropertyInfo where type AttrAllowedOps DOMDocumentBodyPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentBodyPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentBodyPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentBodyPropertyInfo = DOMHTMLElement type AttrLabel DOMDocumentBodyPropertyInfo = "body" attrGet _ = getDOMDocumentBody attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "character-set" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMDocumentCharacterSet :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentCharacterSet obj = liftIO $ getObjectPropertyString obj "character-set" data DOMDocumentCharacterSetPropertyInfo instance AttrInfo DOMDocumentCharacterSetPropertyInfo where type AttrAllowedOps DOMDocumentCharacterSetPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentCharacterSetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentCharacterSetPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentCharacterSetPropertyInfo = T.Text type AttrLabel DOMDocumentCharacterSetPropertyInfo = "character-set" attrGet _ = getDOMDocumentCharacterSet attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "charset" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] getDOMDocumentCharset :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentCharset obj = liftIO $ getObjectPropertyString obj "charset" setDOMDocumentCharset :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () setDOMDocumentCharset obj val = liftIO $ setObjectPropertyString obj "charset" val constructDOMDocumentCharset :: T.Text -> IO ([Char], GValue) constructDOMDocumentCharset val = constructObjectPropertyString "charset" val data DOMDocumentCharsetPropertyInfo instance AttrInfo DOMDocumentCharsetPropertyInfo where type AttrAllowedOps DOMDocumentCharsetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint DOMDocumentCharsetPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMDocumentCharsetPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentCharsetPropertyInfo = T.Text type AttrLabel DOMDocumentCharsetPropertyInfo = "charset" attrGet _ = getDOMDocumentCharset attrSet _ = setDOMDocumentCharset attrConstruct _ = constructDOMDocumentCharset -- VVV Prop "child-element-count" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] getDOMDocumentChildElementCount :: (MonadIO m, DOMDocumentK o) => o -> m Word64 getDOMDocumentChildElementCount obj = liftIO $ getObjectPropertyUInt64 obj "child-element-count" data DOMDocumentChildElementCountPropertyInfo instance AttrInfo DOMDocumentChildElementCountPropertyInfo where type AttrAllowedOps DOMDocumentChildElementCountPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentChildElementCountPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentChildElementCountPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentChildElementCountPropertyInfo = Word64 type AttrLabel DOMDocumentChildElementCountPropertyInfo = "child-element-count" attrGet _ = getDOMDocumentChildElementCount attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "children" -- Type: TInterface "WebKit2WebExtension" "DOMHTMLCollection" -- Flags: [PropertyReadable] getDOMDocumentChildren :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection getDOMDocumentChildren obj = liftIO $ getObjectPropertyObject obj "children" DOMHTMLCollection data DOMDocumentChildrenPropertyInfo instance AttrInfo DOMDocumentChildrenPropertyInfo where type AttrAllowedOps DOMDocumentChildrenPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentChildrenPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentChildrenPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentChildrenPropertyInfo = DOMHTMLCollection type AttrLabel DOMDocumentChildrenPropertyInfo = "children" attrGet _ = getDOMDocumentChildren attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "compat-mode" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMDocumentCompatMode :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentCompatMode obj = liftIO $ getObjectPropertyString obj "compat-mode" data DOMDocumentCompatModePropertyInfo instance AttrInfo DOMDocumentCompatModePropertyInfo where type AttrAllowedOps DOMDocumentCompatModePropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentCompatModePropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentCompatModePropertyInfo = DOMDocumentK type AttrGetType DOMDocumentCompatModePropertyInfo = T.Text type AttrLabel DOMDocumentCompatModePropertyInfo = "compat-mode" attrGet _ = getDOMDocumentCompatMode attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "content-type" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMDocumentContentType :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentContentType obj = liftIO $ getObjectPropertyString obj "content-type" data DOMDocumentContentTypePropertyInfo instance AttrInfo DOMDocumentContentTypePropertyInfo where type AttrAllowedOps DOMDocumentContentTypePropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentContentTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentContentTypePropertyInfo = DOMDocumentK type AttrGetType DOMDocumentContentTypePropertyInfo = T.Text type AttrLabel DOMDocumentContentTypePropertyInfo = "content-type" attrGet _ = getDOMDocumentContentType attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "cookie" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] getDOMDocumentCookie :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentCookie obj = liftIO $ getObjectPropertyString obj "cookie" setDOMDocumentCookie :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () setDOMDocumentCookie obj val = liftIO $ setObjectPropertyString obj "cookie" val constructDOMDocumentCookie :: T.Text -> IO ([Char], GValue) constructDOMDocumentCookie val = constructObjectPropertyString "cookie" val data DOMDocumentCookiePropertyInfo instance AttrInfo DOMDocumentCookiePropertyInfo where type AttrAllowedOps DOMDocumentCookiePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint DOMDocumentCookiePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMDocumentCookiePropertyInfo = DOMDocumentK type AttrGetType DOMDocumentCookiePropertyInfo = T.Text type AttrLabel DOMDocumentCookiePropertyInfo = "cookie" attrGet _ = getDOMDocumentCookie attrSet _ = setDOMDocumentCookie attrConstruct _ = constructDOMDocumentCookie -- VVV Prop "current-script" -- Type: TInterface "WebKit2WebExtension" "DOMHTMLScriptElement" -- Flags: [PropertyReadable] getDOMDocumentCurrentScript :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLScriptElement getDOMDocumentCurrentScript obj = liftIO $ getObjectPropertyObject obj "current-script" DOMHTMLScriptElement data DOMDocumentCurrentScriptPropertyInfo instance AttrInfo DOMDocumentCurrentScriptPropertyInfo where type AttrAllowedOps DOMDocumentCurrentScriptPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentCurrentScriptPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentCurrentScriptPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentCurrentScriptPropertyInfo = DOMHTMLScriptElement type AttrLabel DOMDocumentCurrentScriptPropertyInfo = "current-script" attrGet _ = getDOMDocumentCurrentScript attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "default-charset" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMDocumentDefaultCharset :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentDefaultCharset obj = liftIO $ getObjectPropertyString obj "default-charset" data DOMDocumentDefaultCharsetPropertyInfo instance AttrInfo DOMDocumentDefaultCharsetPropertyInfo where type AttrAllowedOps DOMDocumentDefaultCharsetPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentDefaultCharsetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentDefaultCharsetPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentDefaultCharsetPropertyInfo = T.Text type AttrLabel DOMDocumentDefaultCharsetPropertyInfo = "default-charset" attrGet _ = getDOMDocumentDefaultCharset attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "default-view" -- Type: TInterface "WebKit2WebExtension" "DOMDOMWindow" -- Flags: [PropertyReadable] getDOMDocumentDefaultView :: (MonadIO m, DOMDocumentK o) => o -> m DOMDOMWindow getDOMDocumentDefaultView obj = liftIO $ getObjectPropertyObject obj "default-view" DOMDOMWindow data DOMDocumentDefaultViewPropertyInfo instance AttrInfo DOMDocumentDefaultViewPropertyInfo where type AttrAllowedOps DOMDocumentDefaultViewPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentDefaultViewPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentDefaultViewPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentDefaultViewPropertyInfo = DOMDOMWindow type AttrLabel DOMDocumentDefaultViewPropertyInfo = "default-view" attrGet _ = getDOMDocumentDefaultView attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "doctype" -- Type: TInterface "WebKit2WebExtension" "DOMDocumentType" -- Flags: [PropertyReadable] getDOMDocumentDoctype :: (MonadIO m, DOMDocumentK o) => o -> m DOMDocumentType getDOMDocumentDoctype obj = liftIO $ getObjectPropertyObject obj "doctype" DOMDocumentType data DOMDocumentDoctypePropertyInfo instance AttrInfo DOMDocumentDoctypePropertyInfo where type AttrAllowedOps DOMDocumentDoctypePropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentDoctypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentDoctypePropertyInfo = DOMDocumentK type AttrGetType DOMDocumentDoctypePropertyInfo = DOMDocumentType type AttrLabel DOMDocumentDoctypePropertyInfo = "doctype" attrGet _ = getDOMDocumentDoctype attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "document-element" -- Type: TInterface "WebKit2WebExtension" "DOMElement" -- Flags: [PropertyReadable] getDOMDocumentDocumentElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement getDOMDocumentDocumentElement obj = liftIO $ getObjectPropertyObject obj "document-element" DOMElement data DOMDocumentDocumentElementPropertyInfo instance AttrInfo DOMDocumentDocumentElementPropertyInfo where type AttrAllowedOps DOMDocumentDocumentElementPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentDocumentElementPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentDocumentElementPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentDocumentElementPropertyInfo = DOMElement type AttrLabel DOMDocumentDocumentElementPropertyInfo = "document-element" attrGet _ = getDOMDocumentDocumentElement attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "document-uri" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] getDOMDocumentDocumentUri :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentDocumentUri obj = liftIO $ getObjectPropertyString obj "document-uri" setDOMDocumentDocumentUri :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () setDOMDocumentDocumentUri obj val = liftIO $ setObjectPropertyString obj "document-uri" val constructDOMDocumentDocumentUri :: T.Text -> IO ([Char], GValue) constructDOMDocumentDocumentUri val = constructObjectPropertyString "document-uri" val data DOMDocumentDocumentUriPropertyInfo instance AttrInfo DOMDocumentDocumentUriPropertyInfo where type AttrAllowedOps DOMDocumentDocumentUriPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint DOMDocumentDocumentUriPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMDocumentDocumentUriPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentDocumentUriPropertyInfo = T.Text type AttrLabel DOMDocumentDocumentUriPropertyInfo = "document-uri" attrGet _ = getDOMDocumentDocumentUri attrSet _ = setDOMDocumentDocumentUri attrConstruct _ = constructDOMDocumentDocumentUri -- VVV Prop "domain" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMDocumentDomain :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentDomain obj = liftIO $ getObjectPropertyString obj "domain" data DOMDocumentDomainPropertyInfo instance AttrInfo DOMDocumentDomainPropertyInfo where type AttrAllowedOps DOMDocumentDomainPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentDomainPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentDomainPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentDomainPropertyInfo = T.Text type AttrLabel DOMDocumentDomainPropertyInfo = "domain" attrGet _ = getDOMDocumentDomain attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "first-element-child" -- Type: TInterface "WebKit2WebExtension" "DOMElement" -- Flags: [PropertyReadable] getDOMDocumentFirstElementChild :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement getDOMDocumentFirstElementChild obj = liftIO $ getObjectPropertyObject obj "first-element-child" DOMElement data DOMDocumentFirstElementChildPropertyInfo instance AttrInfo DOMDocumentFirstElementChildPropertyInfo where type AttrAllowedOps DOMDocumentFirstElementChildPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentFirstElementChildPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentFirstElementChildPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentFirstElementChildPropertyInfo = DOMElement type AttrLabel DOMDocumentFirstElementChildPropertyInfo = "first-element-child" attrGet _ = getDOMDocumentFirstElementChild attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "forms" -- Type: TInterface "WebKit2WebExtension" "DOMHTMLCollection" -- Flags: [PropertyReadable] getDOMDocumentForms :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection getDOMDocumentForms obj = liftIO $ getObjectPropertyObject obj "forms" DOMHTMLCollection data DOMDocumentFormsPropertyInfo instance AttrInfo DOMDocumentFormsPropertyInfo where type AttrAllowedOps DOMDocumentFormsPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentFormsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentFormsPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentFormsPropertyInfo = DOMHTMLCollection type AttrLabel DOMDocumentFormsPropertyInfo = "forms" attrGet _ = getDOMDocumentForms attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "head" -- Type: TInterface "WebKit2WebExtension" "DOMHTMLHeadElement" -- Flags: [PropertyReadable] getDOMDocumentHead :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLHeadElement getDOMDocumentHead obj = liftIO $ getObjectPropertyObject obj "head" DOMHTMLHeadElement data DOMDocumentHeadPropertyInfo instance AttrInfo DOMDocumentHeadPropertyInfo where type AttrAllowedOps DOMDocumentHeadPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentHeadPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentHeadPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentHeadPropertyInfo = DOMHTMLHeadElement type AttrLabel DOMDocumentHeadPropertyInfo = "head" attrGet _ = getDOMDocumentHead attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "hidden" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] getDOMDocumentHidden :: (MonadIO m, DOMDocumentK o) => o -> m Bool getDOMDocumentHidden obj = liftIO $ getObjectPropertyBool obj "hidden" data DOMDocumentHiddenPropertyInfo instance AttrInfo DOMDocumentHiddenPropertyInfo where type AttrAllowedOps DOMDocumentHiddenPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentHiddenPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentHiddenPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentHiddenPropertyInfo = Bool type AttrLabel DOMDocumentHiddenPropertyInfo = "hidden" attrGet _ = getDOMDocumentHidden attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "images" -- Type: TInterface "WebKit2WebExtension" "DOMHTMLCollection" -- Flags: [PropertyReadable] getDOMDocumentImages :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection getDOMDocumentImages obj = liftIO $ getObjectPropertyObject obj "images" DOMHTMLCollection data DOMDocumentImagesPropertyInfo instance AttrInfo DOMDocumentImagesPropertyInfo where type AttrAllowedOps DOMDocumentImagesPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentImagesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentImagesPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentImagesPropertyInfo = DOMHTMLCollection type AttrLabel DOMDocumentImagesPropertyInfo = "images" attrGet _ = getDOMDocumentImages attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "implementation" -- Type: TInterface "WebKit2WebExtension" "DOMDOMImplementation" -- Flags: [PropertyReadable] getDOMDocumentImplementation :: (MonadIO m, DOMDocumentK o) => o -> m DOMDOMImplementation getDOMDocumentImplementation obj = liftIO $ getObjectPropertyObject obj "implementation" DOMDOMImplementation data DOMDocumentImplementationPropertyInfo instance AttrInfo DOMDocumentImplementationPropertyInfo where type AttrAllowedOps DOMDocumentImplementationPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentImplementationPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentImplementationPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentImplementationPropertyInfo = DOMDOMImplementation type AttrLabel DOMDocumentImplementationPropertyInfo = "implementation" attrGet _ = getDOMDocumentImplementation attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "input-encoding" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMDocumentInputEncoding :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentInputEncoding obj = liftIO $ getObjectPropertyString obj "input-encoding" data DOMDocumentInputEncodingPropertyInfo instance AttrInfo DOMDocumentInputEncodingPropertyInfo where type AttrAllowedOps DOMDocumentInputEncodingPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentInputEncodingPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentInputEncodingPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentInputEncodingPropertyInfo = T.Text type AttrLabel DOMDocumentInputEncodingPropertyInfo = "input-encoding" attrGet _ = getDOMDocumentInputEncoding attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "last-element-child" -- Type: TInterface "WebKit2WebExtension" "DOMElement" -- Flags: [PropertyReadable] getDOMDocumentLastElementChild :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement getDOMDocumentLastElementChild obj = liftIO $ getObjectPropertyObject obj "last-element-child" DOMElement data DOMDocumentLastElementChildPropertyInfo instance AttrInfo DOMDocumentLastElementChildPropertyInfo where type AttrAllowedOps DOMDocumentLastElementChildPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentLastElementChildPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentLastElementChildPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentLastElementChildPropertyInfo = DOMElement type AttrLabel DOMDocumentLastElementChildPropertyInfo = "last-element-child" attrGet _ = getDOMDocumentLastElementChild attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "last-modified" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMDocumentLastModified :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentLastModified obj = liftIO $ getObjectPropertyString obj "last-modified" data DOMDocumentLastModifiedPropertyInfo instance AttrInfo DOMDocumentLastModifiedPropertyInfo where type AttrAllowedOps DOMDocumentLastModifiedPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentLastModifiedPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentLastModifiedPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentLastModifiedPropertyInfo = T.Text type AttrLabel DOMDocumentLastModifiedPropertyInfo = "last-modified" attrGet _ = getDOMDocumentLastModified attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "links" -- Type: TInterface "WebKit2WebExtension" "DOMHTMLCollection" -- Flags: [PropertyReadable] getDOMDocumentLinks :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection getDOMDocumentLinks obj = liftIO $ getObjectPropertyObject obj "links" DOMHTMLCollection data DOMDocumentLinksPropertyInfo instance AttrInfo DOMDocumentLinksPropertyInfo where type AttrAllowedOps DOMDocumentLinksPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentLinksPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentLinksPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentLinksPropertyInfo = DOMHTMLCollection type AttrLabel DOMDocumentLinksPropertyInfo = "links" attrGet _ = getDOMDocumentLinks attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "origin" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMDocumentOrigin :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentOrigin obj = liftIO $ getObjectPropertyString obj "origin" data DOMDocumentOriginPropertyInfo instance AttrInfo DOMDocumentOriginPropertyInfo where type AttrAllowedOps DOMDocumentOriginPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentOriginPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentOriginPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentOriginPropertyInfo = T.Text type AttrLabel DOMDocumentOriginPropertyInfo = "origin" attrGet _ = getDOMDocumentOrigin attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "pointer-lock-element" -- Type: TInterface "WebKit2WebExtension" "DOMElement" -- Flags: [PropertyReadable] getDOMDocumentPointerLockElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement getDOMDocumentPointerLockElement obj = liftIO $ getObjectPropertyObject obj "pointer-lock-element" DOMElement data DOMDocumentPointerLockElementPropertyInfo instance AttrInfo DOMDocumentPointerLockElementPropertyInfo where type AttrAllowedOps DOMDocumentPointerLockElementPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentPointerLockElementPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentPointerLockElementPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentPointerLockElementPropertyInfo = DOMElement type AttrLabel DOMDocumentPointerLockElementPropertyInfo = "pointer-lock-element" attrGet _ = getDOMDocumentPointerLockElement attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "preferred-stylesheet-set" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMDocumentPreferredStylesheetSet :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentPreferredStylesheetSet obj = liftIO $ getObjectPropertyString obj "preferred-stylesheet-set" data DOMDocumentPreferredStylesheetSetPropertyInfo instance AttrInfo DOMDocumentPreferredStylesheetSetPropertyInfo where type AttrAllowedOps DOMDocumentPreferredStylesheetSetPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentPreferredStylesheetSetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentPreferredStylesheetSetPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentPreferredStylesheetSetPropertyInfo = T.Text type AttrLabel DOMDocumentPreferredStylesheetSetPropertyInfo = "preferred-stylesheet-set" attrGet _ = getDOMDocumentPreferredStylesheetSet attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "ready-state" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMDocumentReadyState :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentReadyState obj = liftIO $ getObjectPropertyString obj "ready-state" data DOMDocumentReadyStatePropertyInfo instance AttrInfo DOMDocumentReadyStatePropertyInfo where type AttrAllowedOps DOMDocumentReadyStatePropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentReadyStatePropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentReadyStatePropertyInfo = DOMDocumentK type AttrGetType DOMDocumentReadyStatePropertyInfo = T.Text type AttrLabel DOMDocumentReadyStatePropertyInfo = "ready-state" attrGet _ = getDOMDocumentReadyState attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "referrer" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMDocumentReferrer :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentReferrer obj = liftIO $ getObjectPropertyString obj "referrer" data DOMDocumentReferrerPropertyInfo instance AttrInfo DOMDocumentReferrerPropertyInfo where type AttrAllowedOps DOMDocumentReferrerPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentReferrerPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentReferrerPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentReferrerPropertyInfo = T.Text type AttrLabel DOMDocumentReferrerPropertyInfo = "referrer" attrGet _ = getDOMDocumentReferrer attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "scrolling-element" -- Type: TInterface "WebKit2WebExtension" "DOMElement" -- Flags: [PropertyReadable] getDOMDocumentScrollingElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement getDOMDocumentScrollingElement obj = liftIO $ getObjectPropertyObject obj "scrolling-element" DOMElement data DOMDocumentScrollingElementPropertyInfo instance AttrInfo DOMDocumentScrollingElementPropertyInfo where type AttrAllowedOps DOMDocumentScrollingElementPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentScrollingElementPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentScrollingElementPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentScrollingElementPropertyInfo = DOMElement type AttrLabel DOMDocumentScrollingElementPropertyInfo = "scrolling-element" attrGet _ = getDOMDocumentScrollingElement attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "selected-stylesheet-set" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] getDOMDocumentSelectedStylesheetSet :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentSelectedStylesheetSet obj = liftIO $ getObjectPropertyString obj "selected-stylesheet-set" setDOMDocumentSelectedStylesheetSet :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () setDOMDocumentSelectedStylesheetSet obj val = liftIO $ setObjectPropertyString obj "selected-stylesheet-set" val constructDOMDocumentSelectedStylesheetSet :: T.Text -> IO ([Char], GValue) constructDOMDocumentSelectedStylesheetSet val = constructObjectPropertyString "selected-stylesheet-set" val data DOMDocumentSelectedStylesheetSetPropertyInfo instance AttrInfo DOMDocumentSelectedStylesheetSetPropertyInfo where type AttrAllowedOps DOMDocumentSelectedStylesheetSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint DOMDocumentSelectedStylesheetSetPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMDocumentSelectedStylesheetSetPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentSelectedStylesheetSetPropertyInfo = T.Text type AttrLabel DOMDocumentSelectedStylesheetSetPropertyInfo = "selected-stylesheet-set" attrGet _ = getDOMDocumentSelectedStylesheetSet attrSet _ = setDOMDocumentSelectedStylesheetSet attrConstruct _ = constructDOMDocumentSelectedStylesheetSet -- VVV Prop "style-sheets" -- Type: TInterface "WebKit2WebExtension" "DOMStyleSheetList" -- Flags: [PropertyReadable] getDOMDocumentStyleSheets :: (MonadIO m, DOMDocumentK o) => o -> m DOMStyleSheetList getDOMDocumentStyleSheets obj = liftIO $ getObjectPropertyObject obj "style-sheets" DOMStyleSheetList data DOMDocumentStyleSheetsPropertyInfo instance AttrInfo DOMDocumentStyleSheetsPropertyInfo where type AttrAllowedOps DOMDocumentStyleSheetsPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentStyleSheetsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentStyleSheetsPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentStyleSheetsPropertyInfo = DOMStyleSheetList type AttrLabel DOMDocumentStyleSheetsPropertyInfo = "style-sheets" attrGet _ = getDOMDocumentStyleSheets attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "title" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] getDOMDocumentTitle :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentTitle obj = liftIO $ getObjectPropertyString obj "title" setDOMDocumentTitle :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () setDOMDocumentTitle obj val = liftIO $ setObjectPropertyString obj "title" val constructDOMDocumentTitle :: T.Text -> IO ([Char], GValue) constructDOMDocumentTitle val = constructObjectPropertyString "title" val data DOMDocumentTitlePropertyInfo instance AttrInfo DOMDocumentTitlePropertyInfo where type AttrAllowedOps DOMDocumentTitlePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint DOMDocumentTitlePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMDocumentTitlePropertyInfo = DOMDocumentK type AttrGetType DOMDocumentTitlePropertyInfo = T.Text type AttrLabel DOMDocumentTitlePropertyInfo = "title" attrGet _ = getDOMDocumentTitle attrSet _ = setDOMDocumentTitle attrConstruct _ = constructDOMDocumentTitle -- VVV Prop "url" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMDocumentUrl :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentUrl obj = liftIO $ getObjectPropertyString obj "url" data DOMDocumentUrlPropertyInfo instance AttrInfo DOMDocumentUrlPropertyInfo where type AttrAllowedOps DOMDocumentUrlPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentUrlPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentUrlPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentUrlPropertyInfo = T.Text type AttrLabel DOMDocumentUrlPropertyInfo = "url" attrGet _ = getDOMDocumentUrl attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "visibility-state" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMDocumentVisibilityState :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentVisibilityState obj = liftIO $ getObjectPropertyString obj "visibility-state" data DOMDocumentVisibilityStatePropertyInfo instance AttrInfo DOMDocumentVisibilityStatePropertyInfo where type AttrAllowedOps DOMDocumentVisibilityStatePropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentVisibilityStatePropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentVisibilityStatePropertyInfo = DOMDocumentK type AttrGetType DOMDocumentVisibilityStatePropertyInfo = T.Text type AttrLabel DOMDocumentVisibilityStatePropertyInfo = "visibility-state" attrGet _ = getDOMDocumentVisibilityState attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "webkit-current-full-screen-element" -- Type: TInterface "WebKit2WebExtension" "DOMElement" -- Flags: [PropertyReadable] getDOMDocumentWebkitCurrentFullScreenElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement getDOMDocumentWebkitCurrentFullScreenElement obj = liftIO $ getObjectPropertyObject obj "webkit-current-full-screen-element" DOMElement data DOMDocumentWebkitCurrentFullScreenElementPropertyInfo instance AttrInfo DOMDocumentWebkitCurrentFullScreenElementPropertyInfo where type AttrAllowedOps DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = DOMElement type AttrLabel DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = "webkit-current-full-screen-element" attrGet _ = getDOMDocumentWebkitCurrentFullScreenElement attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "webkit-full-screen-keyboard-input-allowed" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] getDOMDocumentWebkitFullScreenKeyboardInputAllowed :: (MonadIO m, DOMDocumentK o) => o -> m Bool getDOMDocumentWebkitFullScreenKeyboardInputAllowed obj = liftIO $ getObjectPropertyBool obj "webkit-full-screen-keyboard-input-allowed" data DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo instance AttrInfo DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo where type AttrAllowedOps DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = Bool type AttrLabel DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = "webkit-full-screen-keyboard-input-allowed" attrGet _ = getDOMDocumentWebkitFullScreenKeyboardInputAllowed attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "webkit-fullscreen-element" -- Type: TInterface "WebKit2WebExtension" "DOMElement" -- Flags: [PropertyReadable] getDOMDocumentWebkitFullscreenElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement getDOMDocumentWebkitFullscreenElement obj = liftIO $ getObjectPropertyObject obj "webkit-fullscreen-element" DOMElement data DOMDocumentWebkitFullscreenElementPropertyInfo instance AttrInfo DOMDocumentWebkitFullscreenElementPropertyInfo where type AttrAllowedOps DOMDocumentWebkitFullscreenElementPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentWebkitFullscreenElementPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentWebkitFullscreenElementPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentWebkitFullscreenElementPropertyInfo = DOMElement type AttrLabel DOMDocumentWebkitFullscreenElementPropertyInfo = "webkit-fullscreen-element" attrGet _ = getDOMDocumentWebkitFullscreenElement attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "webkit-fullscreen-enabled" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] getDOMDocumentWebkitFullscreenEnabled :: (MonadIO m, DOMDocumentK o) => o -> m Bool getDOMDocumentWebkitFullscreenEnabled obj = liftIO $ getObjectPropertyBool obj "webkit-fullscreen-enabled" data DOMDocumentWebkitFullscreenEnabledPropertyInfo instance AttrInfo DOMDocumentWebkitFullscreenEnabledPropertyInfo where type AttrAllowedOps DOMDocumentWebkitFullscreenEnabledPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentWebkitFullscreenEnabledPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentWebkitFullscreenEnabledPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentWebkitFullscreenEnabledPropertyInfo = Bool type AttrLabel DOMDocumentWebkitFullscreenEnabledPropertyInfo = "webkit-fullscreen-enabled" attrGet _ = getDOMDocumentWebkitFullscreenEnabled attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "webkit-is-full-screen" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] getDOMDocumentWebkitIsFullScreen :: (MonadIO m, DOMDocumentK o) => o -> m Bool getDOMDocumentWebkitIsFullScreen obj = liftIO $ getObjectPropertyBool obj "webkit-is-full-screen" data DOMDocumentWebkitIsFullScreenPropertyInfo instance AttrInfo DOMDocumentWebkitIsFullScreenPropertyInfo where type AttrAllowedOps DOMDocumentWebkitIsFullScreenPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentWebkitIsFullScreenPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentWebkitIsFullScreenPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentWebkitIsFullScreenPropertyInfo = Bool type AttrLabel DOMDocumentWebkitIsFullScreenPropertyInfo = "webkit-is-full-screen" attrGet _ = getDOMDocumentWebkitIsFullScreen attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "xml-encoding" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMDocumentXmlEncoding :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentXmlEncoding obj = liftIO $ getObjectPropertyString obj "xml-encoding" data DOMDocumentXmlEncodingPropertyInfo instance AttrInfo DOMDocumentXmlEncodingPropertyInfo where type AttrAllowedOps DOMDocumentXmlEncodingPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMDocumentXmlEncodingPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentXmlEncodingPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentXmlEncodingPropertyInfo = T.Text type AttrLabel DOMDocumentXmlEncodingPropertyInfo = "xml-encoding" attrGet _ = getDOMDocumentXmlEncoding attrSet _ = undefined attrConstruct _ = undefined -- VVV Prop "xml-standalone" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] getDOMDocumentXmlStandalone :: (MonadIO m, DOMDocumentK o) => o -> m Bool getDOMDocumentXmlStandalone obj = liftIO $ getObjectPropertyBool obj "xml-standalone" setDOMDocumentXmlStandalone :: (MonadIO m, DOMDocumentK o) => o -> Bool -> m () setDOMDocumentXmlStandalone obj val = liftIO $ setObjectPropertyBool obj "xml-standalone" val constructDOMDocumentXmlStandalone :: Bool -> IO ([Char], GValue) constructDOMDocumentXmlStandalone val = constructObjectPropertyBool "xml-standalone" val data DOMDocumentXmlStandalonePropertyInfo instance AttrInfo DOMDocumentXmlStandalonePropertyInfo where type AttrAllowedOps DOMDocumentXmlStandalonePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint DOMDocumentXmlStandalonePropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMDocumentXmlStandalonePropertyInfo = DOMDocumentK type AttrGetType DOMDocumentXmlStandalonePropertyInfo = Bool type AttrLabel DOMDocumentXmlStandalonePropertyInfo = "xml-standalone" attrGet _ = getDOMDocumentXmlStandalone attrSet _ = setDOMDocumentXmlStandalone attrConstruct _ = constructDOMDocumentXmlStandalone -- VVV Prop "xml-version" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] getDOMDocumentXmlVersion :: (MonadIO m, DOMDocumentK o) => o -> m T.Text getDOMDocumentXmlVersion obj = liftIO $ getObjectPropertyString obj "xml-version" setDOMDocumentXmlVersion :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () setDOMDocumentXmlVersion obj val = liftIO $ setObjectPropertyString obj "xml-version" val constructDOMDocumentXmlVersion :: T.Text -> IO ([Char], GValue) constructDOMDocumentXmlVersion val = constructObjectPropertyString "xml-version" val data DOMDocumentXmlVersionPropertyInfo instance AttrInfo DOMDocumentXmlVersionPropertyInfo where type AttrAllowedOps DOMDocumentXmlVersionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint DOMDocumentXmlVersionPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMDocumentXmlVersionPropertyInfo = DOMDocumentK type AttrGetType DOMDocumentXmlVersionPropertyInfo = T.Text type AttrLabel DOMDocumentXmlVersionPropertyInfo = "xml-version" attrGet _ = getDOMDocumentXmlVersion attrSet _ = setDOMDocumentXmlVersion attrConstruct _ = constructDOMDocumentXmlVersion type instance AttributeList DOMDocument = DOMDocumentAttributeList type DOMDocumentAttributeList = ('[ '("activeElement", DOMDocumentActiveElementPropertyInfo), '("anchors", DOMDocumentAnchorsPropertyInfo), '("applets", DOMDocumentAppletsPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("body", DOMDocumentBodyPropertyInfo), '("characterSet", DOMDocumentCharacterSetPropertyInfo), '("charset", DOMDocumentCharsetPropertyInfo), '("childElementCount", DOMDocumentChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMDocumentChildrenPropertyInfo), '("compatMode", DOMDocumentCompatModePropertyInfo), '("contentType", DOMDocumentContentTypePropertyInfo), '("cookie", DOMDocumentCookiePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("currentScript", DOMDocumentCurrentScriptPropertyInfo), '("defaultCharset", DOMDocumentDefaultCharsetPropertyInfo), '("defaultView", DOMDocumentDefaultViewPropertyInfo), '("doctype", DOMDocumentDoctypePropertyInfo), '("documentElement", DOMDocumentDocumentElementPropertyInfo), '("documentUri", DOMDocumentDocumentUriPropertyInfo), '("domain", DOMDocumentDomainPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMDocumentFirstElementChildPropertyInfo), '("forms", DOMDocumentFormsPropertyInfo), '("head", DOMDocumentHeadPropertyInfo), '("hidden", DOMDocumentHiddenPropertyInfo), '("images", DOMDocumentImagesPropertyInfo), '("implementation", DOMDocumentImplementationPropertyInfo), '("inputEncoding", DOMDocumentInputEncodingPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMDocumentLastElementChildPropertyInfo), '("lastModified", DOMDocumentLastModifiedPropertyInfo), '("links", DOMDocumentLinksPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("origin", DOMDocumentOriginPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("pointerLockElement", DOMDocumentPointerLockElementPropertyInfo), '("preferredStylesheetSet", DOMDocumentPreferredStylesheetSetPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("readyState", DOMDocumentReadyStatePropertyInfo), '("referrer", DOMDocumentReferrerPropertyInfo), '("scrollingElement", DOMDocumentScrollingElementPropertyInfo), '("selectedStylesheetSet", DOMDocumentSelectedStylesheetSetPropertyInfo), '("styleSheets", DOMDocumentStyleSheetsPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMDocumentTitlePropertyInfo), '("url", DOMDocumentUrlPropertyInfo), '("visibilityState", DOMDocumentVisibilityStatePropertyInfo), '("webkitCurrentFullScreenElement", DOMDocumentWebkitCurrentFullScreenElementPropertyInfo), '("webkitFullScreenKeyboardInputAllowed", DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo), '("webkitFullscreenElement", DOMDocumentWebkitFullscreenElementPropertyInfo), '("webkitFullscreenEnabled", DOMDocumentWebkitFullscreenEnabledPropertyInfo), '("webkitIsFullScreen", DOMDocumentWebkitIsFullScreenPropertyInfo), '("xmlEncoding", DOMDocumentXmlEncodingPropertyInfo), '("xmlStandalone", DOMDocumentXmlStandalonePropertyInfo), '("xmlVersion", DOMDocumentXmlVersionPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDocument = DOMDocumentSignalList type DOMDocumentSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDocument::adopt_node -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "source", argType = TInterface "WebKit2WebExtension" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMNode" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_document_adopt_node" webkit_dom_document_adopt_node :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" Ptr DOMNode -> -- source : TInterface "WebKit2WebExtension" "DOMNode" Ptr (Ptr GError) -> -- error IO (Ptr DOMNode) dOMDocumentAdoptNode :: (MonadIO m, DOMDocumentK a, DOMNodeK b) => a -- _obj -> b -- source -> m DOMNode -- result dOMDocumentAdoptNode _obj source = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let source' = unsafeManagedPtrCastPtr source onException (do result <- propagateGError $ webkit_dom_document_adopt_node _obj' source' checkUnexpectedReturnNULL "webkit_dom_document_adopt_node" result result' <- (newObject DOMNode) result touchManagedPtr _obj touchManagedPtr source return result' ) (do return () ) data DOMDocumentAdoptNodeMethodInfo instance (signature ~ (b -> m DOMNode), MonadIO m, DOMDocumentK a, DOMNodeK b) => MethodInfo DOMDocumentAdoptNodeMethodInfo a signature where overloadedMethod _ = dOMDocumentAdoptNode -- method DOMDocument::create_attribute -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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 : True -- Skip return : False foreign import ccall "webkit_dom_document_create_attribute" webkit_dom_document_create_attribute :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- name : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO (Ptr DOMAttr) dOMDocumentCreateAttribute :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- name -> m DOMAttr -- result dOMDocumentCreateAttribute _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name onException (do result <- propagateGError $ webkit_dom_document_create_attribute _obj' name' checkUnexpectedReturnNULL "webkit_dom_document_create_attribute" result result' <- (newObject DOMAttr) result touchManagedPtr _obj freeMem name' return result' ) (do freeMem name' ) data DOMDocumentCreateAttributeMethodInfo instance (signature ~ (T.Text -> m DOMAttr), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateAttributeMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateAttribute -- method DOMDocument::create_attribute_ns -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMAttr" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_document_create_attribute_ns" webkit_dom_document_create_attribute_ns :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- namespaceURI : TBasicType TUTF8 CString -> -- qualifiedName : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO (Ptr DOMAttr) dOMDocumentCreateAttributeNs :: (MonadIO m, DOMDocumentK a) => a -- _obj -> Maybe (T.Text) -- namespaceURI -> T.Text -- qualifiedName -> m DOMAttr -- result dOMDocumentCreateAttributeNs _obj namespaceURI qualifiedName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeNamespaceURI <- case namespaceURI of Nothing -> return nullPtr Just jNamespaceURI -> do jNamespaceURI' <- textToCString jNamespaceURI return jNamespaceURI' qualifiedName' <- textToCString qualifiedName onException (do result <- propagateGError $ webkit_dom_document_create_attribute_ns _obj' maybeNamespaceURI qualifiedName' checkUnexpectedReturnNULL "webkit_dom_document_create_attribute_ns" result result' <- (newObject DOMAttr) result touchManagedPtr _obj freeMem maybeNamespaceURI freeMem qualifiedName' return result' ) (do freeMem maybeNamespaceURI freeMem qualifiedName' ) data DOMDocumentCreateAttributeNsMethodInfo instance (signature ~ (Maybe (T.Text) -> T.Text -> m DOMAttr), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateAttributeNsMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateAttributeNs -- method DOMDocument::create_cdata_section -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMCDATASection" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_document_create_cdata_section" webkit_dom_document_create_cdata_section :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- data : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO (Ptr DOMCDATASection) dOMDocumentCreateCdataSection :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- data_ -> m DOMCDATASection -- result dOMDocumentCreateCdataSection _obj data_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj data_' <- textToCString data_ onException (do result <- propagateGError $ webkit_dom_document_create_cdata_section _obj' data_' checkUnexpectedReturnNULL "webkit_dom_document_create_cdata_section" result result' <- (newObject DOMCDATASection) result touchManagedPtr _obj freeMem data_' return result' ) (do freeMem data_' ) data DOMDocumentCreateCdataSectionMethodInfo instance (signature ~ (T.Text -> m DOMCDATASection), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateCdataSectionMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateCdataSection -- method DOMDocument::create_comment -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMComment" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_document_create_comment" webkit_dom_document_create_comment :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- data : TBasicType TUTF8 IO (Ptr DOMComment) dOMDocumentCreateComment :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- data_ -> m DOMComment -- result dOMDocumentCreateComment _obj data_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj data_' <- textToCString data_ result <- webkit_dom_document_create_comment _obj' data_' checkUnexpectedReturnNULL "webkit_dom_document_create_comment" result result' <- (newObject DOMComment) result touchManagedPtr _obj freeMem data_' return result' data DOMDocumentCreateCommentMethodInfo instance (signature ~ (T.Text -> m DOMComment), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateCommentMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateComment -- method DOMDocument::create_css_style_declaration -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_create_css_style_declaration" webkit_dom_document_create_css_style_declaration :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO (Ptr DOMCSSStyleDeclaration) dOMDocumentCreateCssStyleDeclaration :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m DOMCSSStyleDeclaration -- result dOMDocumentCreateCssStyleDeclaration _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_create_css_style_declaration _obj' checkUnexpectedReturnNULL "webkit_dom_document_create_css_style_declaration" result result' <- (wrapObject DOMCSSStyleDeclaration) result touchManagedPtr _obj return result' data DOMDocumentCreateCssStyleDeclarationMethodInfo instance (signature ~ (m DOMCSSStyleDeclaration), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateCssStyleDeclarationMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateCssStyleDeclaration -- method DOMDocument::create_document_fragment -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMDocumentFragment" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_document_create_document_fragment" webkit_dom_document_create_document_fragment :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO (Ptr DOMDocumentFragment) dOMDocumentCreateDocumentFragment :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m DOMDocumentFragment -- result dOMDocumentCreateDocumentFragment _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_create_document_fragment _obj' checkUnexpectedReturnNULL "webkit_dom_document_create_document_fragment" result result' <- (newObject DOMDocumentFragment) result touchManagedPtr _obj return result' data DOMDocumentCreateDocumentFragmentMethodInfo instance (signature ~ (m DOMDocumentFragment), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateDocumentFragmentMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateDocumentFragment -- method DOMDocument::create_element -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tagName", 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_document_create_element" webkit_dom_document_create_element :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- tagName : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO (Ptr DOMElement) dOMDocumentCreateElement :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- tagName -> m DOMElement -- result dOMDocumentCreateElement _obj tagName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj tagName' <- textToCString tagName onException (do result <- propagateGError $ webkit_dom_document_create_element _obj' tagName' checkUnexpectedReturnNULL "webkit_dom_document_create_element" result result' <- (newObject DOMElement) result touchManagedPtr _obj freeMem tagName' return result' ) (do freeMem tagName' ) data DOMDocumentCreateElementMethodInfo instance (signature ~ (T.Text -> m DOMElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateElementMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateElement -- method DOMDocument::create_element_ns -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMElement" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_document_create_element_ns" webkit_dom_document_create_element_ns :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- namespaceURI : TBasicType TUTF8 CString -> -- qualifiedName : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO (Ptr DOMElement) dOMDocumentCreateElementNs :: (MonadIO m, DOMDocumentK a) => a -- _obj -> Maybe (T.Text) -- namespaceURI -> T.Text -- qualifiedName -> m DOMElement -- result dOMDocumentCreateElementNs _obj namespaceURI qualifiedName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeNamespaceURI <- case namespaceURI of Nothing -> return nullPtr Just jNamespaceURI -> do jNamespaceURI' <- textToCString jNamespaceURI return jNamespaceURI' qualifiedName' <- textToCString qualifiedName onException (do result <- propagateGError $ webkit_dom_document_create_element_ns _obj' maybeNamespaceURI qualifiedName' checkUnexpectedReturnNULL "webkit_dom_document_create_element_ns" result result' <- (newObject DOMElement) result touchManagedPtr _obj freeMem maybeNamespaceURI freeMem qualifiedName' return result' ) (do freeMem maybeNamespaceURI freeMem qualifiedName' ) data DOMDocumentCreateElementNsMethodInfo instance (signature ~ (Maybe (T.Text) -> T.Text -> m DOMElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateElementNsMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateElementNs -- method DOMDocument::create_entity_reference -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMEntityReference" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_document_create_entity_reference" webkit_dom_document_create_entity_reference :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- name : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO (Ptr DOMEntityReference) dOMDocumentCreateEntityReference :: (MonadIO m, DOMDocumentK a) => a -- _obj -> Maybe (T.Text) -- name -> m DOMEntityReference -- result dOMDocumentCreateEntityReference _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeName <- case name of Nothing -> return nullPtr Just jName -> do jName' <- textToCString jName return jName' onException (do result <- propagateGError $ webkit_dom_document_create_entity_reference _obj' maybeName checkUnexpectedReturnNULL "webkit_dom_document_create_entity_reference" result result' <- (newObject DOMEntityReference) result touchManagedPtr _obj freeMem maybeName return result' ) (do freeMem maybeName ) data DOMDocumentCreateEntityReferenceMethodInfo instance (signature ~ (Maybe (T.Text) -> m DOMEntityReference), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateEntityReferenceMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateEntityReference -- method DOMDocument::create_event -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "eventType", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMEvent" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_document_create_event" webkit_dom_document_create_event :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- eventType : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO (Ptr DOMEvent) dOMDocumentCreateEvent :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- eventType -> m DOMEvent -- result dOMDocumentCreateEvent _obj eventType = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj eventType' <- textToCString eventType onException (do result <- propagateGError $ webkit_dom_document_create_event _obj' eventType' checkUnexpectedReturnNULL "webkit_dom_document_create_event" result result' <- (wrapObject DOMEvent) result touchManagedPtr _obj freeMem eventType' return result' ) (do freeMem eventType' ) data DOMDocumentCreateEventMethodInfo instance (signature ~ (T.Text -> m DOMEvent), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateEventMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateEvent -- method DOMDocument::create_expression -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "expression", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "resolver", argType = TInterface "WebKit2WebExtension" "DOMXPathNSResolver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMXPathExpression" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_document_create_expression" webkit_dom_document_create_expression :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- expression : TBasicType TUTF8 Ptr DOMXPathNSResolver -> -- resolver : TInterface "WebKit2WebExtension" "DOMXPathNSResolver" Ptr (Ptr GError) -> -- error IO (Ptr DOMXPathExpression) dOMDocumentCreateExpression :: (MonadIO m, DOMDocumentK a, DOMXPathNSResolverK b) => a -- _obj -> T.Text -- expression -> b -- resolver -> m DOMXPathExpression -- result dOMDocumentCreateExpression _obj expression resolver = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj expression' <- textToCString expression let resolver' = unsafeManagedPtrCastPtr resolver onException (do result <- propagateGError $ webkit_dom_document_create_expression _obj' expression' resolver' checkUnexpectedReturnNULL "webkit_dom_document_create_expression" result result' <- (wrapObject DOMXPathExpression) result touchManagedPtr _obj touchManagedPtr resolver freeMem expression' return result' ) (do freeMem expression' ) data DOMDocumentCreateExpressionMethodInfo instance (signature ~ (T.Text -> b -> m DOMXPathExpression), MonadIO m, DOMDocumentK a, DOMXPathNSResolverK b) => MethodInfo DOMDocumentCreateExpressionMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateExpression -- method DOMDocument::create_node_iterator -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "root", argType = TInterface "WebKit2WebExtension" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "whatToShow", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "filter", argType = TInterface "WebKit2WebExtension" "DOMNodeFilter", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "expandEntityReferences", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMNodeIterator" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_document_create_node_iterator" webkit_dom_document_create_node_iterator :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" Ptr DOMNode -> -- root : TInterface "WebKit2WebExtension" "DOMNode" Word64 -> -- whatToShow : TBasicType TUInt64 Ptr DOMNodeFilter -> -- filter : TInterface "WebKit2WebExtension" "DOMNodeFilter" CInt -> -- expandEntityReferences : TBasicType TBoolean Ptr (Ptr GError) -> -- error IO (Ptr DOMNodeIterator) dOMDocumentCreateNodeIterator :: (MonadIO m, DOMDocumentK a, DOMNodeK b, DOMNodeFilterK c) => a -- _obj -> b -- root -> Word64 -- whatToShow -> Maybe (c) -- filter -> Bool -- expandEntityReferences -> m DOMNodeIterator -- result dOMDocumentCreateNodeIterator _obj root whatToShow filter expandEntityReferences = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let root' = unsafeManagedPtrCastPtr root maybeFilter <- case filter of Nothing -> return nullPtr Just jFilter -> do let jFilter' = unsafeManagedPtrCastPtr jFilter return jFilter' let expandEntityReferences' = (fromIntegral . fromEnum) expandEntityReferences onException (do result <- propagateGError $ webkit_dom_document_create_node_iterator _obj' root' whatToShow maybeFilter expandEntityReferences' checkUnexpectedReturnNULL "webkit_dom_document_create_node_iterator" result result' <- (wrapObject DOMNodeIterator) result touchManagedPtr _obj touchManagedPtr root whenJust filter touchManagedPtr return result' ) (do return () ) data DOMDocumentCreateNodeIteratorMethodInfo instance (signature ~ (b -> Word64 -> Maybe (c) -> Bool -> m DOMNodeIterator), MonadIO m, DOMDocumentK a, DOMNodeK b, DOMNodeFilterK c) => MethodInfo DOMDocumentCreateNodeIteratorMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateNodeIterator -- method DOMDocument::create_ns_resolver -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "nodeResolver", argType = TInterface "WebKit2WebExtension" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMXPathNSResolver" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_document_create_ns_resolver" webkit_dom_document_create_ns_resolver :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" Ptr DOMNode -> -- nodeResolver : TInterface "WebKit2WebExtension" "DOMNode" IO (Ptr DOMXPathNSResolver) dOMDocumentCreateNsResolver :: (MonadIO m, DOMDocumentK a, DOMNodeK b) => a -- _obj -> b -- nodeResolver -> m DOMXPathNSResolver -- result dOMDocumentCreateNsResolver _obj nodeResolver = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let nodeResolver' = unsafeManagedPtrCastPtr nodeResolver result <- webkit_dom_document_create_ns_resolver _obj' nodeResolver' checkUnexpectedReturnNULL "webkit_dom_document_create_ns_resolver" result result' <- (wrapObject DOMXPathNSResolver) result touchManagedPtr _obj touchManagedPtr nodeResolver return result' data DOMDocumentCreateNsResolverMethodInfo instance (signature ~ (b -> m DOMXPathNSResolver), MonadIO m, DOMDocumentK a, DOMNodeK b) => MethodInfo DOMDocumentCreateNsResolverMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateNsResolver -- method DOMDocument::create_processing_instruction -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "target", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMProcessingInstruction" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_document_create_processing_instruction" webkit_dom_document_create_processing_instruction :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- target : TBasicType TUTF8 CString -> -- data : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO (Ptr DOMProcessingInstruction) dOMDocumentCreateProcessingInstruction :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- target -> T.Text -- data_ -> m DOMProcessingInstruction -- result dOMDocumentCreateProcessingInstruction _obj target data_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj target' <- textToCString target data_' <- textToCString data_ onException (do result <- propagateGError $ webkit_dom_document_create_processing_instruction _obj' target' data_' checkUnexpectedReturnNULL "webkit_dom_document_create_processing_instruction" result result' <- (newObject DOMProcessingInstruction) result touchManagedPtr _obj freeMem target' freeMem data_' return result' ) (do freeMem target' freeMem data_' ) data DOMDocumentCreateProcessingInstructionMethodInfo instance (signature ~ (T.Text -> T.Text -> m DOMProcessingInstruction), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateProcessingInstructionMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateProcessingInstruction -- method DOMDocument::create_range -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMRange" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_document_create_range" webkit_dom_document_create_range :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO (Ptr DOMRange) dOMDocumentCreateRange :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m DOMRange -- result dOMDocumentCreateRange _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_create_range _obj' checkUnexpectedReturnNULL "webkit_dom_document_create_range" result result' <- (wrapObject DOMRange) result touchManagedPtr _obj return result' data DOMDocumentCreateRangeMethodInfo instance (signature ~ (m DOMRange), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateRangeMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateRange -- method DOMDocument::create_text_node -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMText" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_document_create_text_node" webkit_dom_document_create_text_node :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- data : TBasicType TUTF8 IO (Ptr DOMText) dOMDocumentCreateTextNode :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- data_ -> m DOMText -- result dOMDocumentCreateTextNode _obj data_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj data_' <- textToCString data_ result <- webkit_dom_document_create_text_node _obj' data_' checkUnexpectedReturnNULL "webkit_dom_document_create_text_node" result result' <- (newObject DOMText) result touchManagedPtr _obj freeMem data_' return result' data DOMDocumentCreateTextNodeMethodInfo instance (signature ~ (T.Text -> m DOMText), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateTextNodeMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateTextNode -- method DOMDocument::create_tree_walker -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "root", argType = TInterface "WebKit2WebExtension" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "whatToShow", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "filter", argType = TInterface "WebKit2WebExtension" "DOMNodeFilter", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "expandEntityReferences", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMTreeWalker" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_document_create_tree_walker" webkit_dom_document_create_tree_walker :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" Ptr DOMNode -> -- root : TInterface "WebKit2WebExtension" "DOMNode" Word64 -> -- whatToShow : TBasicType TUInt64 Ptr DOMNodeFilter -> -- filter : TInterface "WebKit2WebExtension" "DOMNodeFilter" CInt -> -- expandEntityReferences : TBasicType TBoolean Ptr (Ptr GError) -> -- error IO (Ptr DOMTreeWalker) dOMDocumentCreateTreeWalker :: (MonadIO m, DOMDocumentK a, DOMNodeK b, DOMNodeFilterK c) => a -- _obj -> b -- root -> Word64 -- whatToShow -> Maybe (c) -- filter -> Bool -- expandEntityReferences -> m DOMTreeWalker -- result dOMDocumentCreateTreeWalker _obj root whatToShow filter expandEntityReferences = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let root' = unsafeManagedPtrCastPtr root maybeFilter <- case filter of Nothing -> return nullPtr Just jFilter -> do let jFilter' = unsafeManagedPtrCastPtr jFilter return jFilter' let expandEntityReferences' = (fromIntegral . fromEnum) expandEntityReferences onException (do result <- propagateGError $ webkit_dom_document_create_tree_walker _obj' root' whatToShow maybeFilter expandEntityReferences' checkUnexpectedReturnNULL "webkit_dom_document_create_tree_walker" result result' <- (wrapObject DOMTreeWalker) result touchManagedPtr _obj touchManagedPtr root whenJust filter touchManagedPtr return result' ) (do return () ) data DOMDocumentCreateTreeWalkerMethodInfo instance (signature ~ (b -> Word64 -> Maybe (c) -> Bool -> m DOMTreeWalker), MonadIO m, DOMDocumentK a, DOMNodeK b, DOMNodeFilterK c) => MethodInfo DOMDocumentCreateTreeWalkerMethodInfo a signature where overloadedMethod _ = dOMDocumentCreateTreeWalker -- method DOMDocument::element_from_point -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "y", argType = TBasicType TInt64, 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_document_element_from_point" webkit_dom_document_element_from_point :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" Int64 -> -- x : TBasicType TInt64 Int64 -> -- y : TBasicType TInt64 IO (Ptr DOMElement) dOMDocumentElementFromPoint :: (MonadIO m, DOMDocumentK a) => a -- _obj -> Int64 -- x -> Int64 -- y -> m DOMElement -- result dOMDocumentElementFromPoint _obj x y = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_element_from_point _obj' x y checkUnexpectedReturnNULL "webkit_dom_document_element_from_point" result result' <- (newObject DOMElement) result touchManagedPtr _obj return result' data DOMDocumentElementFromPointMethodInfo instance (signature ~ (Int64 -> Int64 -> m DOMElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentElementFromPointMethodInfo a signature where overloadedMethod _ = dOMDocumentElementFromPoint -- method DOMDocument::evaluate -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "expression", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "contextNode", argType = TInterface "WebKit2WebExtension" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "resolver", argType = TInterface "WebKit2WebExtension" "DOMXPathNSResolver", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "type", argType = TBasicType TUInt16, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "inResult", argType = TInterface "WebKit2WebExtension" "DOMXPathResult", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMXPathResult" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_document_evaluate" webkit_dom_document_evaluate :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- expression : TBasicType TUTF8 Ptr DOMNode -> -- contextNode : TInterface "WebKit2WebExtension" "DOMNode" Ptr DOMXPathNSResolver -> -- resolver : TInterface "WebKit2WebExtension" "DOMXPathNSResolver" Word16 -> -- type : TBasicType TUInt16 Ptr DOMXPathResult -> -- inResult : TInterface "WebKit2WebExtension" "DOMXPathResult" Ptr (Ptr GError) -> -- error IO (Ptr DOMXPathResult) dOMDocumentEvaluate :: (MonadIO m, DOMDocumentK a, DOMNodeK b, DOMXPathNSResolverK c, DOMXPathResultK d) => a -- _obj -> T.Text -- expression -> b -- contextNode -> Maybe (c) -- resolver -> Word16 -- type_ -> Maybe (d) -- inResult -> m DOMXPathResult -- result dOMDocumentEvaluate _obj expression contextNode resolver type_ inResult = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj expression' <- textToCString expression let contextNode' = unsafeManagedPtrCastPtr contextNode maybeResolver <- case resolver of Nothing -> return nullPtr Just jResolver -> do let jResolver' = unsafeManagedPtrCastPtr jResolver return jResolver' maybeInResult <- case inResult of Nothing -> return nullPtr Just jInResult -> do let jInResult' = unsafeManagedPtrCastPtr jInResult return jInResult' onException (do result <- propagateGError $ webkit_dom_document_evaluate _obj' expression' contextNode' maybeResolver type_ maybeInResult checkUnexpectedReturnNULL "webkit_dom_document_evaluate" result result' <- (wrapObject DOMXPathResult) result touchManagedPtr _obj touchManagedPtr contextNode whenJust resolver touchManagedPtr whenJust inResult touchManagedPtr freeMem expression' return result' ) (do freeMem expression' ) data DOMDocumentEvaluateMethodInfo instance (signature ~ (T.Text -> b -> Maybe (c) -> Word16 -> Maybe (d) -> m DOMXPathResult), MonadIO m, DOMDocumentK a, DOMNodeK b, DOMXPathNSResolverK c, DOMXPathResultK d) => MethodInfo DOMDocumentEvaluateMethodInfo a signature where overloadedMethod _ = dOMDocumentEvaluate -- method DOMDocument::exec_command -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "userInterface", argType = TBasicType TBoolean, 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 TBoolean -- throws : False -- Skip return : False foreign import ccall "webkit_dom_document_exec_command" webkit_dom_document_exec_command :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- command : TBasicType TUTF8 CInt -> -- userInterface : TBasicType TBoolean CString -> -- value : TBasicType TUTF8 IO CInt dOMDocumentExecCommand :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- command -> Bool -- userInterface -> T.Text -- value -> m Bool -- result dOMDocumentExecCommand _obj command userInterface value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj command' <- textToCString command let userInterface' = (fromIntegral . fromEnum) userInterface value' <- textToCString value result <- webkit_dom_document_exec_command _obj' command' userInterface' value' let result' = (/= 0) result touchManagedPtr _obj freeMem command' freeMem value' return result' data DOMDocumentExecCommandMethodInfo instance (signature ~ (T.Text -> Bool -> T.Text -> m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentExecCommandMethodInfo a signature where overloadedMethod _ = dOMDocumentExecCommand -- method DOMDocument::get_active_element -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_active_element" webkit_dom_document_get_active_element :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO (Ptr DOMElement) dOMDocumentGetActiveElement :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m DOMElement -- result dOMDocumentGetActiveElement _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_active_element _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_active_element" result result' <- (newObject DOMElement) result touchManagedPtr _obj return result' data DOMDocumentGetActiveElementMethodInfo instance (signature ~ (m DOMElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetActiveElementMethodInfo a signature where overloadedMethod _ = dOMDocumentGetActiveElement -- method DOMDocument::get_anchors -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_anchors" webkit_dom_document_get_anchors :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO (Ptr DOMHTMLCollection) dOMDocumentGetAnchors :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m DOMHTMLCollection -- result dOMDocumentGetAnchors _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_anchors _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_anchors" result result' <- (wrapObject DOMHTMLCollection) result touchManagedPtr _obj return result' data DOMDocumentGetAnchorsMethodInfo instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetAnchorsMethodInfo a signature where overloadedMethod _ = dOMDocumentGetAnchors -- method DOMDocument::get_applets -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_applets" webkit_dom_document_get_applets :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO (Ptr DOMHTMLCollection) dOMDocumentGetApplets :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m DOMHTMLCollection -- result dOMDocumentGetApplets _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_applets _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_applets" result result' <- (wrapObject DOMHTMLCollection) result touchManagedPtr _obj return result' data DOMDocumentGetAppletsMethodInfo instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetAppletsMethodInfo a signature where overloadedMethod _ = dOMDocumentGetApplets -- method DOMDocument::get_body -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMHTMLElement" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_document_get_body" webkit_dom_document_get_body :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO (Ptr DOMHTMLElement) dOMDocumentGetBody :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m DOMHTMLElement -- result dOMDocumentGetBody _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_body _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_body" result result' <- (newObject DOMHTMLElement) result touchManagedPtr _obj return result' data DOMDocumentGetBodyMethodInfo instance (signature ~ (m DOMHTMLElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetBodyMethodInfo a signature where overloadedMethod _ = dOMDocumentGetBody -- method DOMDocument::get_character_set -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_character_set" webkit_dom_document_get_character_set :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CString dOMDocumentGetCharacterSet :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m T.Text -- result dOMDocumentGetCharacterSet _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_character_set _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_character_set" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMDocumentGetCharacterSetMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetCharacterSetMethodInfo a signature where overloadedMethod _ = dOMDocumentGetCharacterSet -- method DOMDocument::get_charset -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_charset" webkit_dom_document_get_charset :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CString dOMDocumentGetCharset :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m T.Text -- result dOMDocumentGetCharset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_charset _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_charset" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMDocumentGetCharsetMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetCharsetMethodInfo a signature where overloadedMethod _ = dOMDocumentGetCharset -- method DOMDocument::get_cookie -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TBasicType TUTF8 -- throws : True -- Skip return : False foreign import ccall "webkit_dom_document_get_cookie" webkit_dom_document_get_cookie :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" Ptr (Ptr GError) -> -- error IO CString dOMDocumentGetCookie :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m T.Text -- result dOMDocumentGetCookie _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do result <- propagateGError $ webkit_dom_document_get_cookie _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_cookie" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' ) (do return () ) data DOMDocumentGetCookieMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetCookieMethodInfo a signature where overloadedMethod _ = dOMDocumentGetCookie -- method DOMDocument::get_default_charset -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_default_charset" webkit_dom_document_get_default_charset :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CString dOMDocumentGetDefaultCharset :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m T.Text -- result dOMDocumentGetDefaultCharset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_default_charset _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_default_charset" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMDocumentGetDefaultCharsetMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetDefaultCharsetMethodInfo a signature where overloadedMethod _ = dOMDocumentGetDefaultCharset -- method DOMDocument::get_default_view -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMDOMWindow" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_document_get_default_view" webkit_dom_document_get_default_view :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO (Ptr DOMDOMWindow) dOMDocumentGetDefaultView :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m DOMDOMWindow -- result dOMDocumentGetDefaultView _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_default_view _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_default_view" result result' <- (wrapObject DOMDOMWindow) result touchManagedPtr _obj return result' data DOMDocumentGetDefaultViewMethodInfo instance (signature ~ (m DOMDOMWindow), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetDefaultViewMethodInfo a signature where overloadedMethod _ = dOMDocumentGetDefaultView -- method DOMDocument::get_doctype -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMDocumentType" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_document_get_doctype" webkit_dom_document_get_doctype :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO (Ptr DOMDocumentType) dOMDocumentGetDoctype :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m DOMDocumentType -- result dOMDocumentGetDoctype _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_doctype _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_doctype" result result' <- (newObject DOMDocumentType) result touchManagedPtr _obj return result' data DOMDocumentGetDoctypeMethodInfo instance (signature ~ (m DOMDocumentType), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetDoctypeMethodInfo a signature where overloadedMethod _ = dOMDocumentGetDoctype -- method DOMDocument::get_document_element -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_document_element" webkit_dom_document_get_document_element :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO (Ptr DOMElement) dOMDocumentGetDocumentElement :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m DOMElement -- result dOMDocumentGetDocumentElement _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_document_element _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_document_element" result result' <- (newObject DOMElement) result touchManagedPtr _obj return result' data DOMDocumentGetDocumentElementMethodInfo instance (signature ~ (m DOMElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetDocumentElementMethodInfo a signature where overloadedMethod _ = dOMDocumentGetDocumentElement -- method DOMDocument::get_document_uri -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_document_uri" webkit_dom_document_get_document_uri :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CString dOMDocumentGetDocumentUri :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m T.Text -- result dOMDocumentGetDocumentUri _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_document_uri _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_document_uri" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMDocumentGetDocumentUriMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetDocumentUriMethodInfo a signature where overloadedMethod _ = dOMDocumentGetDocumentUri -- method DOMDocument::get_domain -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_domain" webkit_dom_document_get_domain :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CString dOMDocumentGetDomain :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m T.Text -- result dOMDocumentGetDomain _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_domain _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_domain" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMDocumentGetDomainMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetDomainMethodInfo a signature where overloadedMethod _ = dOMDocumentGetDomain -- method DOMDocument::get_element_by_id -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "elementId", argType = TBasicType TUTF8, 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_document_get_element_by_id" webkit_dom_document_get_element_by_id :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- elementId : TBasicType TUTF8 IO (Ptr DOMElement) dOMDocumentGetElementById :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- elementId -> m DOMElement -- result dOMDocumentGetElementById _obj elementId = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj elementId' <- textToCString elementId result <- webkit_dom_document_get_element_by_id _obj' elementId' checkUnexpectedReturnNULL "webkit_dom_document_get_element_by_id" result result' <- (newObject DOMElement) result touchManagedPtr _obj freeMem elementId' return result' data DOMDocumentGetElementByIdMethodInfo instance (signature ~ (T.Text -> m DOMElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetElementByIdMethodInfo a signature where overloadedMethod _ = dOMDocumentGetElementById -- method DOMDocument::get_elements_by_class_name -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "classNames", 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_document_get_elements_by_class_name" webkit_dom_document_get_elements_by_class_name :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- classNames : TBasicType TUTF8 IO (Ptr DOMNodeList) dOMDocumentGetElementsByClassName :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- classNames -> m DOMNodeList -- result dOMDocumentGetElementsByClassName _obj classNames = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj classNames' <- textToCString classNames result <- webkit_dom_document_get_elements_by_class_name _obj' classNames' checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_class_name" result result' <- (wrapObject DOMNodeList) result touchManagedPtr _obj freeMem classNames' return result' data DOMDocumentGetElementsByClassNameMethodInfo instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetElementsByClassNameMethodInfo a signature where overloadedMethod _ = dOMDocumentGetElementsByClassName -- method DOMDocument::get_elements_by_name -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "elementName", 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_document_get_elements_by_name" webkit_dom_document_get_elements_by_name :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- elementName : TBasicType TUTF8 IO (Ptr DOMNodeList) dOMDocumentGetElementsByName :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- elementName -> m DOMNodeList -- result dOMDocumentGetElementsByName _obj elementName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj elementName' <- textToCString elementName result <- webkit_dom_document_get_elements_by_name _obj' elementName' checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_name" result result' <- (wrapObject DOMNodeList) result touchManagedPtr _obj freeMem elementName' return result' data DOMDocumentGetElementsByNameMethodInfo instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetElementsByNameMethodInfo a signature where overloadedMethod _ = dOMDocumentGetElementsByName -- method DOMDocument::get_elements_by_tag_name -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tagname", 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_document_get_elements_by_tag_name" webkit_dom_document_get_elements_by_tag_name :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- tagname : TBasicType TUTF8 IO (Ptr DOMNodeList) dOMDocumentGetElementsByTagName :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- tagname -> m DOMNodeList -- result dOMDocumentGetElementsByTagName _obj tagname = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj tagname' <- textToCString tagname result <- webkit_dom_document_get_elements_by_tag_name _obj' tagname' checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_tag_name" result result' <- (wrapObject DOMNodeList) result touchManagedPtr _obj freeMem tagname' return result' data DOMDocumentGetElementsByTagNameMethodInfo instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetElementsByTagNameMethodInfo a signature where overloadedMethod _ = dOMDocumentGetElementsByTagName -- method DOMDocument::get_elements_by_tag_name_ns -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_elements_by_tag_name_ns" webkit_dom_document_get_elements_by_tag_name_ns :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- namespaceURI : TBasicType TUTF8 CString -> -- localName : TBasicType TUTF8 IO (Ptr DOMNodeList) dOMDocumentGetElementsByTagNameNs :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- namespaceURI -> T.Text -- localName -> m DOMNodeList -- result dOMDocumentGetElementsByTagNameNs _obj namespaceURI localName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj namespaceURI' <- textToCString namespaceURI localName' <- textToCString localName result <- webkit_dom_document_get_elements_by_tag_name_ns _obj' namespaceURI' localName' checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_tag_name_ns" result result' <- (wrapObject DOMNodeList) result touchManagedPtr _obj freeMem namespaceURI' freeMem localName' return result' data DOMDocumentGetElementsByTagNameNsMethodInfo instance (signature ~ (T.Text -> T.Text -> m DOMNodeList), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetElementsByTagNameNsMethodInfo a signature where overloadedMethod _ = dOMDocumentGetElementsByTagNameNs -- method DOMDocument::get_forms -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_forms" webkit_dom_document_get_forms :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO (Ptr DOMHTMLCollection) dOMDocumentGetForms :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m DOMHTMLCollection -- result dOMDocumentGetForms _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_forms _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_forms" result result' <- (wrapObject DOMHTMLCollection) result touchManagedPtr _obj return result' data DOMDocumentGetFormsMethodInfo instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetFormsMethodInfo a signature where overloadedMethod _ = dOMDocumentGetForms -- method DOMDocument::get_head -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMHTMLHeadElement" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_document_get_head" webkit_dom_document_get_head :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO (Ptr DOMHTMLHeadElement) dOMDocumentGetHead :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m DOMHTMLHeadElement -- result dOMDocumentGetHead _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_head _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_head" result result' <- (newObject DOMHTMLHeadElement) result touchManagedPtr _obj return result' data DOMDocumentGetHeadMethodInfo instance (signature ~ (m DOMHTMLHeadElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetHeadMethodInfo a signature where overloadedMethod _ = dOMDocumentGetHead -- method DOMDocument::get_images -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_images" webkit_dom_document_get_images :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO (Ptr DOMHTMLCollection) dOMDocumentGetImages :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m DOMHTMLCollection -- result dOMDocumentGetImages _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_images _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_images" result result' <- (wrapObject DOMHTMLCollection) result touchManagedPtr _obj return result' data DOMDocumentGetImagesMethodInfo instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetImagesMethodInfo a signature where overloadedMethod _ = dOMDocumentGetImages -- method DOMDocument::get_implementation -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMDOMImplementation" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_document_get_implementation" webkit_dom_document_get_implementation :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO (Ptr DOMDOMImplementation) dOMDocumentGetImplementation :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m DOMDOMImplementation -- result dOMDocumentGetImplementation _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_implementation _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_implementation" result result' <- (wrapObject DOMDOMImplementation) result touchManagedPtr _obj return result' data DOMDocumentGetImplementationMethodInfo instance (signature ~ (m DOMDOMImplementation), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetImplementationMethodInfo a signature where overloadedMethod _ = dOMDocumentGetImplementation -- method DOMDocument::get_input_encoding -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_input_encoding" webkit_dom_document_get_input_encoding :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CString dOMDocumentGetInputEncoding :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m T.Text -- result dOMDocumentGetInputEncoding _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_input_encoding _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_input_encoding" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMDocumentGetInputEncodingMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetInputEncodingMethodInfo a signature where overloadedMethod _ = dOMDocumentGetInputEncoding -- method DOMDocument::get_last_modified -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_last_modified" webkit_dom_document_get_last_modified :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CString dOMDocumentGetLastModified :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m T.Text -- result dOMDocumentGetLastModified _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_last_modified _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_last_modified" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMDocumentGetLastModifiedMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetLastModifiedMethodInfo a signature where overloadedMethod _ = dOMDocumentGetLastModified -- method DOMDocument::get_links -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_links" webkit_dom_document_get_links :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO (Ptr DOMHTMLCollection) dOMDocumentGetLinks :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m DOMHTMLCollection -- result dOMDocumentGetLinks _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_links _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_links" result result' <- (wrapObject DOMHTMLCollection) result touchManagedPtr _obj return result' data DOMDocumentGetLinksMethodInfo instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetLinksMethodInfo a signature where overloadedMethod _ = dOMDocumentGetLinks -- method DOMDocument::get_override_style -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "element", argType = TInterface "WebKit2WebExtension" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "pseudoElement", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, 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_document_get_override_style" webkit_dom_document_get_override_style :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" Ptr DOMElement -> -- element : TInterface "WebKit2WebExtension" "DOMElement" CString -> -- pseudoElement : TBasicType TUTF8 IO (Ptr DOMCSSStyleDeclaration) dOMDocumentGetOverrideStyle :: (MonadIO m, DOMDocumentK a, DOMElementK b) => a -- _obj -> b -- element -> Maybe (T.Text) -- pseudoElement -> m DOMCSSStyleDeclaration -- result dOMDocumentGetOverrideStyle _obj element pseudoElement = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let element' = unsafeManagedPtrCastPtr element maybePseudoElement <- case pseudoElement of Nothing -> return nullPtr Just jPseudoElement -> do jPseudoElement' <- textToCString jPseudoElement return jPseudoElement' result <- webkit_dom_document_get_override_style _obj' element' maybePseudoElement checkUnexpectedReturnNULL "webkit_dom_document_get_override_style" result result' <- (wrapObject DOMCSSStyleDeclaration) result touchManagedPtr _obj touchManagedPtr element freeMem maybePseudoElement return result' data DOMDocumentGetOverrideStyleMethodInfo instance (signature ~ (b -> Maybe (T.Text) -> m DOMCSSStyleDeclaration), MonadIO m, DOMDocumentK a, DOMElementK b) => MethodInfo DOMDocumentGetOverrideStyleMethodInfo a signature where overloadedMethod _ = dOMDocumentGetOverrideStyle -- method DOMDocument::get_preferred_stylesheet_set -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_preferred_stylesheet_set" webkit_dom_document_get_preferred_stylesheet_set :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CString dOMDocumentGetPreferredStylesheetSet :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m T.Text -- result dOMDocumentGetPreferredStylesheetSet _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_preferred_stylesheet_set _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_preferred_stylesheet_set" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMDocumentGetPreferredStylesheetSetMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetPreferredStylesheetSetMethodInfo a signature where overloadedMethod _ = dOMDocumentGetPreferredStylesheetSet -- method DOMDocument::get_ready_state -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_ready_state" webkit_dom_document_get_ready_state :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CString dOMDocumentGetReadyState :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m T.Text -- result dOMDocumentGetReadyState _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_ready_state _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_ready_state" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMDocumentGetReadyStateMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetReadyStateMethodInfo a signature where overloadedMethod _ = dOMDocumentGetReadyState -- method DOMDocument::get_referrer -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_referrer" webkit_dom_document_get_referrer :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CString dOMDocumentGetReferrer :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m T.Text -- result dOMDocumentGetReferrer _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_referrer _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_referrer" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMDocumentGetReferrerMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetReferrerMethodInfo a signature where overloadedMethod _ = dOMDocumentGetReferrer -- method DOMDocument::get_selected_stylesheet_set -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_selected_stylesheet_set" webkit_dom_document_get_selected_stylesheet_set :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CString dOMDocumentGetSelectedStylesheetSet :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m T.Text -- result dOMDocumentGetSelectedStylesheetSet _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_selected_stylesheet_set _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_selected_stylesheet_set" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMDocumentGetSelectedStylesheetSetMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetSelectedStylesheetSetMethodInfo a signature where overloadedMethod _ = dOMDocumentGetSelectedStylesheetSet -- method DOMDocument::get_style_sheets -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMStyleSheetList" -- throws : False -- Skip return : False foreign import ccall "webkit_dom_document_get_style_sheets" webkit_dom_document_get_style_sheets :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO (Ptr DOMStyleSheetList) dOMDocumentGetStyleSheets :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m DOMStyleSheetList -- result dOMDocumentGetStyleSheets _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_style_sheets _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_style_sheets" result result' <- (newObject DOMStyleSheetList) result touchManagedPtr _obj return result' data DOMDocumentGetStyleSheetsMethodInfo instance (signature ~ (m DOMStyleSheetList), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetStyleSheetsMethodInfo a signature where overloadedMethod _ = dOMDocumentGetStyleSheets -- method DOMDocument::get_title -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_title" webkit_dom_document_get_title :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CString dOMDocumentGetTitle :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m T.Text -- result dOMDocumentGetTitle _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_title _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_title" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMDocumentGetTitleMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetTitleMethodInfo a signature where overloadedMethod _ = dOMDocumentGetTitle -- method DOMDocument::get_url -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_url" webkit_dom_document_get_url :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CString dOMDocumentGetUrl :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m T.Text -- result dOMDocumentGetUrl _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_url _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_url" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMDocumentGetUrlMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetUrlMethodInfo a signature where overloadedMethod _ = dOMDocumentGetUrl -- method DOMDocument::get_xml_encoding -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_xml_encoding" webkit_dom_document_get_xml_encoding :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CString dOMDocumentGetXmlEncoding :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m T.Text -- result dOMDocumentGetXmlEncoding _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_xml_encoding _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_xml_encoding" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMDocumentGetXmlEncodingMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetXmlEncodingMethodInfo a signature where overloadedMethod _ = dOMDocumentGetXmlEncoding -- method DOMDocument::get_xml_standalone -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_xml_standalone" webkit_dom_document_get_xml_standalone :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CInt dOMDocumentGetXmlStandalone :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m Bool -- result dOMDocumentGetXmlStandalone _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_xml_standalone _obj' let result' = (/= 0) result touchManagedPtr _obj return result' data DOMDocumentGetXmlStandaloneMethodInfo instance (signature ~ (m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetXmlStandaloneMethodInfo a signature where overloadedMethod _ = dOMDocumentGetXmlStandalone -- method DOMDocument::get_xml_version -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_get_xml_version" webkit_dom_document_get_xml_version :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CString dOMDocumentGetXmlVersion :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m T.Text -- result dOMDocumentGetXmlVersion _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_get_xml_version _obj' checkUnexpectedReturnNULL "webkit_dom_document_get_xml_version" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' data DOMDocumentGetXmlVersionMethodInfo instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetXmlVersionMethodInfo a signature where overloadedMethod _ = dOMDocumentGetXmlVersion -- method DOMDocument::has_focus -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_has_focus" webkit_dom_document_has_focus :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" IO CInt dOMDocumentHasFocus :: (MonadIO m, DOMDocumentK a) => a -- _obj -> m Bool -- result dOMDocumentHasFocus _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_has_focus _obj' let result' = (/= 0) result touchManagedPtr _obj return result' data DOMDocumentHasFocusMethodInfo instance (signature ~ (m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentHasFocusMethodInfo a signature where overloadedMethod _ = dOMDocumentHasFocus -- method DOMDocument::import_node -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "importedNode", argType = TInterface "WebKit2WebExtension" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "deep", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : TInterface "WebKit2WebExtension" "DOMNode" -- throws : True -- Skip return : False foreign import ccall "webkit_dom_document_import_node" webkit_dom_document_import_node :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" Ptr DOMNode -> -- importedNode : TInterface "WebKit2WebExtension" "DOMNode" CInt -> -- deep : TBasicType TBoolean Ptr (Ptr GError) -> -- error IO (Ptr DOMNode) dOMDocumentImportNode :: (MonadIO m, DOMDocumentK a, DOMNodeK b) => a -- _obj -> b -- importedNode -> Bool -- deep -> m DOMNode -- result dOMDocumentImportNode _obj importedNode deep = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let importedNode' = unsafeManagedPtrCastPtr importedNode let deep' = (fromIntegral . fromEnum) deep onException (do result <- propagateGError $ webkit_dom_document_import_node _obj' importedNode' deep' checkUnexpectedReturnNULL "webkit_dom_document_import_node" result result' <- (newObject DOMNode) result touchManagedPtr _obj touchManagedPtr importedNode return result' ) (do return () ) data DOMDocumentImportNodeMethodInfo instance (signature ~ (b -> Bool -> m DOMNode), MonadIO m, DOMDocumentK a, DOMNodeK b) => MethodInfo DOMDocumentImportNodeMethodInfo a signature where overloadedMethod _ = dOMDocumentImportNode -- method DOMDocument::query_command_enabled -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "command", 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_document_query_command_enabled" webkit_dom_document_query_command_enabled :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- command : TBasicType TUTF8 IO CInt dOMDocumentQueryCommandEnabled :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- command -> m Bool -- result dOMDocumentQueryCommandEnabled _obj command = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj command' <- textToCString command result <- webkit_dom_document_query_command_enabled _obj' command' let result' = (/= 0) result touchManagedPtr _obj freeMem command' return result' data DOMDocumentQueryCommandEnabledMethodInfo instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentQueryCommandEnabledMethodInfo a signature where overloadedMethod _ = dOMDocumentQueryCommandEnabled -- method DOMDocument::query_command_indeterm -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "command", 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_document_query_command_indeterm" webkit_dom_document_query_command_indeterm :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- command : TBasicType TUTF8 IO CInt dOMDocumentQueryCommandIndeterm :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- command -> m Bool -- result dOMDocumentQueryCommandIndeterm _obj command = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj command' <- textToCString command result <- webkit_dom_document_query_command_indeterm _obj' command' let result' = (/= 0) result touchManagedPtr _obj freeMem command' return result' data DOMDocumentQueryCommandIndetermMethodInfo instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentQueryCommandIndetermMethodInfo a signature where overloadedMethod _ = dOMDocumentQueryCommandIndeterm -- method DOMDocument::query_command_state -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "command", 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_document_query_command_state" webkit_dom_document_query_command_state :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- command : TBasicType TUTF8 IO CInt dOMDocumentQueryCommandState :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- command -> m Bool -- result dOMDocumentQueryCommandState _obj command = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj command' <- textToCString command result <- webkit_dom_document_query_command_state _obj' command' let result' = (/= 0) result touchManagedPtr _obj freeMem command' return result' data DOMDocumentQueryCommandStateMethodInfo instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentQueryCommandStateMethodInfo a signature where overloadedMethod _ = dOMDocumentQueryCommandState -- method DOMDocument::query_command_supported -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "command", 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_document_query_command_supported" webkit_dom_document_query_command_supported :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- command : TBasicType TUTF8 IO CInt dOMDocumentQueryCommandSupported :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- command -> m Bool -- result dOMDocumentQueryCommandSupported _obj command = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj command' <- textToCString command result <- webkit_dom_document_query_command_supported _obj' command' let result' = (/= 0) result touchManagedPtr _obj freeMem command' return result' data DOMDocumentQueryCommandSupportedMethodInfo instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentQueryCommandSupportedMethodInfo a signature where overloadedMethod _ = dOMDocumentQueryCommandSupported -- method DOMDocument::query_command_value -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "command", 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_document_query_command_value" webkit_dom_document_query_command_value :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- command : TBasicType TUTF8 IO CString dOMDocumentQueryCommandValue :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- command -> m T.Text -- result dOMDocumentQueryCommandValue _obj command = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj command' <- textToCString command result <- webkit_dom_document_query_command_value _obj' command' checkUnexpectedReturnNULL "webkit_dom_document_query_command_value" result result' <- cstringToText result freeMem result touchManagedPtr _obj freeMem command' return result' data DOMDocumentQueryCommandValueMethodInfo instance (signature ~ (T.Text -> m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentQueryCommandValueMethodInfo a signature where overloadedMethod _ = dOMDocumentQueryCommandValue -- method DOMDocument::query_selector -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_query_selector" webkit_dom_document_query_selector :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- selectors : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO (Ptr DOMElement) dOMDocumentQuerySelector :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- selectors -> m DOMElement -- result dOMDocumentQuerySelector _obj selectors = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj selectors' <- textToCString selectors onException (do result <- propagateGError $ webkit_dom_document_query_selector _obj' selectors' checkUnexpectedReturnNULL "webkit_dom_document_query_selector" result result' <- (newObject DOMElement) result touchManagedPtr _obj freeMem selectors' return result' ) (do freeMem selectors' ) data DOMDocumentQuerySelectorMethodInfo instance (signature ~ (T.Text -> m DOMElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentQuerySelectorMethodInfo a signature where overloadedMethod _ = dOMDocumentQuerySelector -- method DOMDocument::query_selector_all -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_query_selector_all" webkit_dom_document_query_selector_all :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- selectors : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO (Ptr DOMNodeList) dOMDocumentQuerySelectorAll :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- selectors -> m DOMNodeList -- result dOMDocumentQuerySelectorAll _obj selectors = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj selectors' <- textToCString selectors onException (do result <- propagateGError $ webkit_dom_document_query_selector_all _obj' selectors' checkUnexpectedReturnNULL "webkit_dom_document_query_selector_all" result result' <- (wrapObject DOMNodeList) result touchManagedPtr _obj freeMem selectors' return result' ) (do freeMem selectors' ) data DOMDocumentQuerySelectorAllMethodInfo instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentQuerySelectorAllMethodInfo a signature where overloadedMethod _ = dOMDocumentQuerySelectorAll -- method DOMDocument::set_body -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TInterface "WebKit2WebExtension" "DOMHTMLElement", 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_document_set_body" webkit_dom_document_set_body :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" Ptr DOMHTMLElement -> -- value : TInterface "WebKit2WebExtension" "DOMHTMLElement" Ptr (Ptr GError) -> -- error IO () dOMDocumentSetBody :: (MonadIO m, DOMDocumentK a, DOMHTMLElementK b) => a -- _obj -> b -- value -> m () -- result dOMDocumentSetBody _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = unsafeManagedPtrCastPtr value onException (do propagateGError $ webkit_dom_document_set_body _obj' value' touchManagedPtr _obj touchManagedPtr value return () ) (do return () ) data DOMDocumentSetBodyMethodInfo instance (signature ~ (b -> m ()), MonadIO m, DOMDocumentK a, DOMHTMLElementK b) => MethodInfo DOMDocumentSetBodyMethodInfo a signature where overloadedMethod _ = dOMDocumentSetBody -- method DOMDocument::set_charset -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_set_charset" webkit_dom_document_set_charset :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- value : TBasicType TUTF8 IO () dOMDocumentSetCharset :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- value -> m () -- result dOMDocumentSetCharset _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value webkit_dom_document_set_charset _obj' value' touchManagedPtr _obj freeMem value' return () data DOMDocumentSetCharsetMethodInfo instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentSetCharsetMethodInfo a signature where overloadedMethod _ = dOMDocumentSetCharset -- method DOMDocument::set_cookie -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_set_cookie" webkit_dom_document_set_cookie :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- value : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO () dOMDocumentSetCookie :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- value -> m () -- result dOMDocumentSetCookie _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value onException (do propagateGError $ webkit_dom_document_set_cookie _obj' value' touchManagedPtr _obj freeMem value' return () ) (do freeMem value' ) data DOMDocumentSetCookieMethodInfo instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentSetCookieMethodInfo a signature where overloadedMethod _ = dOMDocumentSetCookie -- method DOMDocument::set_document_uri -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_set_document_uri" webkit_dom_document_set_document_uri :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- value : TBasicType TUTF8 IO () dOMDocumentSetDocumentUri :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- value -> m () -- result dOMDocumentSetDocumentUri _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value webkit_dom_document_set_document_uri _obj' value' touchManagedPtr _obj freeMem value' return () data DOMDocumentSetDocumentUriMethodInfo instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentSetDocumentUriMethodInfo a signature where overloadedMethod _ = dOMDocumentSetDocumentUri -- method DOMDocument::set_selected_stylesheet_set -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_set_selected_stylesheet_set" webkit_dom_document_set_selected_stylesheet_set :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- value : TBasicType TUTF8 IO () dOMDocumentSetSelectedStylesheetSet :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- value -> m () -- result dOMDocumentSetSelectedStylesheetSet _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value webkit_dom_document_set_selected_stylesheet_set _obj' value' touchManagedPtr _obj freeMem value' return () data DOMDocumentSetSelectedStylesheetSetMethodInfo instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentSetSelectedStylesheetSetMethodInfo a signature where overloadedMethod _ = dOMDocumentSetSelectedStylesheetSet -- method DOMDocument::set_title -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_set_title" webkit_dom_document_set_title :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- value : TBasicType TUTF8 IO () dOMDocumentSetTitle :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- value -> m () -- result dOMDocumentSetTitle _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value webkit_dom_document_set_title _obj' value' touchManagedPtr _obj freeMem value' return () data DOMDocumentSetTitleMethodInfo instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentSetTitleMethodInfo a signature where overloadedMethod _ = dOMDocumentSetTitle -- method DOMDocument::set_xml_standalone -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, 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_document_set_xml_standalone" webkit_dom_document_set_xml_standalone :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CInt -> -- value : TBasicType TBoolean Ptr (Ptr GError) -> -- error IO () dOMDocumentSetXmlStandalone :: (MonadIO m, DOMDocumentK a) => a -- _obj -> Bool -- value -> m () -- result dOMDocumentSetXmlStandalone _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value onException (do propagateGError $ webkit_dom_document_set_xml_standalone _obj' value' touchManagedPtr _obj return () ) (do return () ) data DOMDocumentSetXmlStandaloneMethodInfo instance (signature ~ (Bool -> m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentSetXmlStandaloneMethodInfo a signature where overloadedMethod _ = dOMDocumentSetXmlStandalone -- method DOMDocument::set_xml_version -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMDocument", 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_document_set_xml_version" webkit_dom_document_set_xml_version :: Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument" CString -> -- value : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO () dOMDocumentSetXmlVersion :: (MonadIO m, DOMDocumentK a) => a -- _obj -> T.Text -- value -> m () -- result dOMDocumentSetXmlVersion _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value onException (do propagateGError $ webkit_dom_document_set_xml_version _obj' value' touchManagedPtr _obj freeMem value' return () ) (do freeMem value' ) data DOMDocumentSetXmlVersionMethodInfo instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentSetXmlVersionMethodInfo a signature where overloadedMethod _ = dOMDocumentSetXmlVersion