gi-webkit2webextension-0.2.12.14: GI/WebKit2WebExtension/Objects/DOMDocument.hs
{- |
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 ,
-- ** dOMDocumentGetElementsByClassNameAsHtmlCollection
DOMDocumentGetElementsByClassNameAsHtmlCollectionMethodInfo,
dOMDocumentGetElementsByClassNameAsHtmlCollection,
-- ** dOMDocumentGetElementsByName
DOMDocumentGetElementsByNameMethodInfo ,
dOMDocumentGetElementsByName ,
-- ** dOMDocumentGetElementsByTagName
DOMDocumentGetElementsByTagNameMethodInfo,
dOMDocumentGetElementsByTagName ,
-- ** dOMDocumentGetElementsByTagNameAsHtmlCollection
DOMDocumentGetElementsByTagNameAsHtmlCollectionMethodInfo,
dOMDocumentGetElementsByTagNameAsHtmlCollection,
-- ** dOMDocumentGetElementsByTagNameNs
DOMDocumentGetElementsByTagNameNsMethodInfo,
dOMDocumentGetElementsByTagNameNs ,
-- ** dOMDocumentGetElementsByTagNameNsAsHtmlCollection
DOMDocumentGetElementsByTagNameNsAsHtmlCollectionMethodInfo,
dOMDocumentGetElementsByTagNameNsAsHtmlCollection,
-- ** 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 ,
dOMDocumentActiveElement ,
getDOMDocumentActiveElement ,
-- ** Anchors
DOMDocumentAnchorsPropertyInfo ,
dOMDocumentAnchors ,
getDOMDocumentAnchors ,
-- ** Applets
DOMDocumentAppletsPropertyInfo ,
dOMDocumentApplets ,
getDOMDocumentApplets ,
-- ** Body
DOMDocumentBodyPropertyInfo ,
dOMDocumentBody ,
getDOMDocumentBody ,
-- ** CharacterSet
DOMDocumentCharacterSetPropertyInfo ,
dOMDocumentCharacterSet ,
getDOMDocumentCharacterSet ,
-- ** Charset
DOMDocumentCharsetPropertyInfo ,
constructDOMDocumentCharset ,
dOMDocumentCharset ,
getDOMDocumentCharset ,
setDOMDocumentCharset ,
-- ** ChildElementCount
DOMDocumentChildElementCountPropertyInfo,
dOMDocumentChildElementCount ,
getDOMDocumentChildElementCount ,
-- ** Children
DOMDocumentChildrenPropertyInfo ,
dOMDocumentChildren ,
getDOMDocumentChildren ,
-- ** CompatMode
DOMDocumentCompatModePropertyInfo ,
dOMDocumentCompatMode ,
getDOMDocumentCompatMode ,
-- ** ContentType
DOMDocumentContentTypePropertyInfo ,
dOMDocumentContentType ,
getDOMDocumentContentType ,
-- ** Cookie
DOMDocumentCookiePropertyInfo ,
clearDOMDocumentCookie ,
constructDOMDocumentCookie ,
dOMDocumentCookie ,
getDOMDocumentCookie ,
setDOMDocumentCookie ,
-- ** CurrentScript
DOMDocumentCurrentScriptPropertyInfo ,
dOMDocumentCurrentScript ,
getDOMDocumentCurrentScript ,
-- ** DefaultCharset
DOMDocumentDefaultCharsetPropertyInfo ,
dOMDocumentDefaultCharset ,
getDOMDocumentDefaultCharset ,
-- ** DefaultView
DOMDocumentDefaultViewPropertyInfo ,
dOMDocumentDefaultView ,
getDOMDocumentDefaultView ,
-- ** Doctype
DOMDocumentDoctypePropertyInfo ,
dOMDocumentDoctype ,
getDOMDocumentDoctype ,
-- ** DocumentElement
DOMDocumentDocumentElementPropertyInfo ,
dOMDocumentDocumentElement ,
getDOMDocumentDocumentElement ,
-- ** DocumentUri
DOMDocumentDocumentUriPropertyInfo ,
constructDOMDocumentDocumentUri ,
dOMDocumentDocumentUri ,
getDOMDocumentDocumentUri ,
setDOMDocumentDocumentUri ,
-- ** Domain
DOMDocumentDomainPropertyInfo ,
dOMDocumentDomain ,
getDOMDocumentDomain ,
-- ** FirstElementChild
DOMDocumentFirstElementChildPropertyInfo,
dOMDocumentFirstElementChild ,
getDOMDocumentFirstElementChild ,
-- ** Forms
DOMDocumentFormsPropertyInfo ,
dOMDocumentForms ,
getDOMDocumentForms ,
-- ** Head
DOMDocumentHeadPropertyInfo ,
dOMDocumentHead ,
getDOMDocumentHead ,
-- ** Hidden
DOMDocumentHiddenPropertyInfo ,
dOMDocumentHidden ,
getDOMDocumentHidden ,
-- ** Images
DOMDocumentImagesPropertyInfo ,
dOMDocumentImages ,
getDOMDocumentImages ,
-- ** Implementation
DOMDocumentImplementationPropertyInfo ,
dOMDocumentImplementation ,
getDOMDocumentImplementation ,
-- ** InputEncoding
DOMDocumentInputEncodingPropertyInfo ,
dOMDocumentInputEncoding ,
getDOMDocumentInputEncoding ,
-- ** LastElementChild
DOMDocumentLastElementChildPropertyInfo ,
dOMDocumentLastElementChild ,
getDOMDocumentLastElementChild ,
-- ** LastModified
DOMDocumentLastModifiedPropertyInfo ,
dOMDocumentLastModified ,
getDOMDocumentLastModified ,
-- ** Links
DOMDocumentLinksPropertyInfo ,
dOMDocumentLinks ,
getDOMDocumentLinks ,
-- ** Origin
DOMDocumentOriginPropertyInfo ,
dOMDocumentOrigin ,
getDOMDocumentOrigin ,
-- ** PointerLockElement
DOMDocumentPointerLockElementPropertyInfo,
dOMDocumentPointerLockElement ,
getDOMDocumentPointerLockElement ,
-- ** PreferredStylesheetSet
DOMDocumentPreferredStylesheetSetPropertyInfo,
dOMDocumentPreferredStylesheetSet ,
getDOMDocumentPreferredStylesheetSet ,
-- ** ReadyState
DOMDocumentReadyStatePropertyInfo ,
dOMDocumentReadyState ,
getDOMDocumentReadyState ,
-- ** Referrer
DOMDocumentReferrerPropertyInfo ,
dOMDocumentReferrer ,
getDOMDocumentReferrer ,
-- ** ScrollingElement
DOMDocumentScrollingElementPropertyInfo ,
dOMDocumentScrollingElement ,
getDOMDocumentScrollingElement ,
-- ** SelectedStylesheetSet
DOMDocumentSelectedStylesheetSetPropertyInfo,
constructDOMDocumentSelectedStylesheetSet,
dOMDocumentSelectedStylesheetSet ,
getDOMDocumentSelectedStylesheetSet ,
setDOMDocumentSelectedStylesheetSet ,
-- ** StyleSheets
DOMDocumentStyleSheetsPropertyInfo ,
dOMDocumentStyleSheets ,
getDOMDocumentStyleSheets ,
-- ** Title
DOMDocumentTitlePropertyInfo ,
constructDOMDocumentTitle ,
dOMDocumentTitle ,
getDOMDocumentTitle ,
setDOMDocumentTitle ,
-- ** Url
DOMDocumentUrlPropertyInfo ,
dOMDocumentUrl ,
getDOMDocumentUrl ,
-- ** VisibilityState
DOMDocumentVisibilityStatePropertyInfo ,
dOMDocumentVisibilityState ,
getDOMDocumentVisibilityState ,
-- ** WebkitCurrentFullScreenElement
DOMDocumentWebkitCurrentFullScreenElementPropertyInfo,
dOMDocumentWebkitCurrentFullScreenElement,
getDOMDocumentWebkitCurrentFullScreenElement,
-- ** WebkitFullScreenKeyboardInputAllowed
DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo,
dOMDocumentWebkitFullScreenKeyboardInputAllowed,
getDOMDocumentWebkitFullScreenKeyboardInputAllowed,
-- ** WebkitFullscreenElement
DOMDocumentWebkitFullscreenElementPropertyInfo,
dOMDocumentWebkitFullscreenElement ,
getDOMDocumentWebkitFullscreenElement ,
-- ** WebkitFullscreenEnabled
DOMDocumentWebkitFullscreenEnabledPropertyInfo,
dOMDocumentWebkitFullscreenEnabled ,
getDOMDocumentWebkitFullscreenEnabled ,
-- ** WebkitIsFullScreen
DOMDocumentWebkitIsFullScreenPropertyInfo,
dOMDocumentWebkitIsFullScreen ,
getDOMDocumentWebkitIsFullScreen ,
-- ** XmlEncoding
DOMDocumentXmlEncodingPropertyInfo ,
dOMDocumentXmlEncoding ,
getDOMDocumentXmlEncoding ,
-- ** XmlStandalone
DOMDocumentXmlStandalonePropertyInfo ,
constructDOMDocumentXmlStandalone ,
dOMDocumentXmlStandalone ,
getDOMDocumentXmlStandalone ,
setDOMDocumentXmlStandalone ,
-- ** XmlVersion
DOMDocumentXmlVersionPropertyInfo ,
clearDOMDocumentXmlVersion ,
constructDOMDocumentXmlVersion ,
dOMDocumentXmlVersion ,
getDOMDocumentXmlVersion ,
setDOMDocumentXmlVersion ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.Attributes as GI.Attributes
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 "getElementsByClassNameAsHtmlCollection" o = DOMDocumentGetElementsByClassNameAsHtmlCollectionMethodInfo
ResolveDOMDocumentMethod "getElementsByName" o = DOMDocumentGetElementsByNameMethodInfo
ResolveDOMDocumentMethod "getElementsByTagName" o = DOMDocumentGetElementsByTagNameMethodInfo
ResolveDOMDocumentMethod "getElementsByTagNameAsHtmlCollection" o = DOMDocumentGetElementsByTagNameAsHtmlCollectionMethodInfo
ResolveDOMDocumentMethod "getElementsByTagNameNs" o = DOMDocumentGetElementsByTagNameNsMethodInfo
ResolveDOMDocumentMethod "getElementsByTagNameNsAsHtmlCollection" o = DOMDocumentGetElementsByTagNameNsAsHtmlCollectionMethodInfo
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]
-- Nullable: (Just False,Nothing)
getDOMDocumentActiveElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement
getDOMDocumentActiveElement obj = liftIO $ checkUnexpectedNothing "getDOMDocumentActiveElement" $ getObjectPropertyObject obj "active-element" DOMElement
data DOMDocumentActiveElementPropertyInfo
instance AttrInfo DOMDocumentActiveElementPropertyInfo where
type AttrAllowedOps DOMDocumentActiveElementPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentActiveElementPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentActiveElementPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentActiveElementPropertyInfo = DOMElement
type AttrLabel DOMDocumentActiveElementPropertyInfo = "active-element"
attrGet _ = getDOMDocumentActiveElement
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "anchors"
-- Type: TInterface "WebKit2WebExtension" "DOMHTMLCollection"
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentAnchors :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe DOMHTMLCollection)
getDOMDocumentAnchors obj = liftIO $ getObjectPropertyObject obj "anchors" DOMHTMLCollection
data DOMDocumentAnchorsPropertyInfo
instance AttrInfo DOMDocumentAnchorsPropertyInfo where
type AttrAllowedOps DOMDocumentAnchorsPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentAnchorsPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentAnchorsPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentAnchorsPropertyInfo = (Maybe DOMHTMLCollection)
type AttrLabel DOMDocumentAnchorsPropertyInfo = "anchors"
attrGet _ = getDOMDocumentAnchors
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "applets"
-- Type: TInterface "WebKit2WebExtension" "DOMHTMLCollection"
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentApplets :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe DOMHTMLCollection)
getDOMDocumentApplets obj = liftIO $ getObjectPropertyObject obj "applets" DOMHTMLCollection
data DOMDocumentAppletsPropertyInfo
instance AttrInfo DOMDocumentAppletsPropertyInfo where
type AttrAllowedOps DOMDocumentAppletsPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentAppletsPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentAppletsPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentAppletsPropertyInfo = (Maybe DOMHTMLCollection)
type AttrLabel DOMDocumentAppletsPropertyInfo = "applets"
attrGet _ = getDOMDocumentApplets
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "body"
-- Type: TInterface "WebKit2WebExtension" "DOMHTMLElement"
-- Flags: [PropertyReadable]
-- Nullable: (Just False,Nothing)
getDOMDocumentBody :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLElement
getDOMDocumentBody obj = liftIO $ checkUnexpectedNothing "getDOMDocumentBody" $ getObjectPropertyObject obj "body" DOMHTMLElement
data DOMDocumentBodyPropertyInfo
instance AttrInfo DOMDocumentBodyPropertyInfo where
type AttrAllowedOps DOMDocumentBodyPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentBodyPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentBodyPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentBodyPropertyInfo = DOMHTMLElement
type AttrLabel DOMDocumentBodyPropertyInfo = "body"
attrGet _ = getDOMDocumentBody
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "character-set"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentCharacterSet :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentCharacterSet obj = liftIO $ getObjectPropertyString obj "character-set"
data DOMDocumentCharacterSetPropertyInfo
instance AttrInfo DOMDocumentCharacterSetPropertyInfo where
type AttrAllowedOps DOMDocumentCharacterSetPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentCharacterSetPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentCharacterSetPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentCharacterSetPropertyInfo = (Maybe T.Text)
type AttrLabel DOMDocumentCharacterSetPropertyInfo = "character-set"
attrGet _ = getDOMDocumentCharacterSet
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "charset"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Just False)
getDOMDocumentCharset :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentCharset obj = liftIO $ getObjectPropertyString obj "charset"
setDOMDocumentCharset :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m ()
setDOMDocumentCharset obj val = liftIO $ setObjectPropertyString obj "charset" (Just val)
constructDOMDocumentCharset :: T.Text -> IO ([Char], GValue)
constructDOMDocumentCharset val = constructObjectPropertyString "charset" (Just 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 = (Maybe T.Text)
type AttrLabel DOMDocumentCharsetPropertyInfo = "charset"
attrGet _ = getDOMDocumentCharset
attrSet _ = setDOMDocumentCharset
attrConstruct _ = constructDOMDocumentCharset
attrClear _ = undefined
-- VVV Prop "child-element-count"
-- Type: TBasicType TULong
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentChildElementCount :: (MonadIO m, DOMDocumentK o) => o -> m CULong
getDOMDocumentChildElementCount obj = liftIO $ getObjectPropertyULong obj "child-element-count"
data DOMDocumentChildElementCountPropertyInfo
instance AttrInfo DOMDocumentChildElementCountPropertyInfo where
type AttrAllowedOps DOMDocumentChildElementCountPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDocumentChildElementCountPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentChildElementCountPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentChildElementCountPropertyInfo = CULong
type AttrLabel DOMDocumentChildElementCountPropertyInfo = "child-element-count"
attrGet _ = getDOMDocumentChildElementCount
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "children"
-- Type: TInterface "WebKit2WebExtension" "DOMHTMLCollection"
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentChildren :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe DOMHTMLCollection)
getDOMDocumentChildren obj = liftIO $ getObjectPropertyObject obj "children" DOMHTMLCollection
data DOMDocumentChildrenPropertyInfo
instance AttrInfo DOMDocumentChildrenPropertyInfo where
type AttrAllowedOps DOMDocumentChildrenPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentChildrenPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentChildrenPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentChildrenPropertyInfo = (Maybe DOMHTMLCollection)
type AttrLabel DOMDocumentChildrenPropertyInfo = "children"
attrGet _ = getDOMDocumentChildren
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "compat-mode"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentCompatMode :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentCompatMode obj = liftIO $ getObjectPropertyString obj "compat-mode"
data DOMDocumentCompatModePropertyInfo
instance AttrInfo DOMDocumentCompatModePropertyInfo where
type AttrAllowedOps DOMDocumentCompatModePropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentCompatModePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentCompatModePropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentCompatModePropertyInfo = (Maybe T.Text)
type AttrLabel DOMDocumentCompatModePropertyInfo = "compat-mode"
attrGet _ = getDOMDocumentCompatMode
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "content-type"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentContentType :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentContentType obj = liftIO $ getObjectPropertyString obj "content-type"
data DOMDocumentContentTypePropertyInfo
instance AttrInfo DOMDocumentContentTypePropertyInfo where
type AttrAllowedOps DOMDocumentContentTypePropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentContentTypePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentContentTypePropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentContentTypePropertyInfo = (Maybe T.Text)
type AttrLabel DOMDocumentContentTypePropertyInfo = "content-type"
attrGet _ = getDOMDocumentContentType
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "cookie"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentCookie :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentCookie obj = liftIO $ getObjectPropertyString obj "cookie"
setDOMDocumentCookie :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m ()
setDOMDocumentCookie obj val = liftIO $ setObjectPropertyString obj "cookie" (Just val)
constructDOMDocumentCookie :: T.Text -> IO ([Char], GValue)
constructDOMDocumentCookie val = constructObjectPropertyString "cookie" (Just val)
clearDOMDocumentCookie :: (MonadIO m, DOMDocumentK o) => o -> m ()
clearDOMDocumentCookie obj = liftIO $ setObjectPropertyString obj "cookie" (Nothing :: Maybe T.Text)
data DOMDocumentCookiePropertyInfo
instance AttrInfo DOMDocumentCookiePropertyInfo where
type AttrAllowedOps DOMDocumentCookiePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentCookiePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMDocumentCookiePropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentCookiePropertyInfo = (Maybe T.Text)
type AttrLabel DOMDocumentCookiePropertyInfo = "cookie"
attrGet _ = getDOMDocumentCookie
attrSet _ = setDOMDocumentCookie
attrConstruct _ = constructDOMDocumentCookie
attrClear _ = clearDOMDocumentCookie
-- VVV Prop "current-script"
-- Type: TInterface "WebKit2WebExtension" "DOMHTMLScriptElement"
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentCurrentScript :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe DOMHTMLScriptElement)
getDOMDocumentCurrentScript obj = liftIO $ getObjectPropertyObject obj "current-script" DOMHTMLScriptElement
data DOMDocumentCurrentScriptPropertyInfo
instance AttrInfo DOMDocumentCurrentScriptPropertyInfo where
type AttrAllowedOps DOMDocumentCurrentScriptPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentCurrentScriptPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentCurrentScriptPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentCurrentScriptPropertyInfo = (Maybe DOMHTMLScriptElement)
type AttrLabel DOMDocumentCurrentScriptPropertyInfo = "current-script"
attrGet _ = getDOMDocumentCurrentScript
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "default-charset"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentDefaultCharset :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentDefaultCharset obj = liftIO $ getObjectPropertyString obj "default-charset"
data DOMDocumentDefaultCharsetPropertyInfo
instance AttrInfo DOMDocumentDefaultCharsetPropertyInfo where
type AttrAllowedOps DOMDocumentDefaultCharsetPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentDefaultCharsetPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentDefaultCharsetPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentDefaultCharsetPropertyInfo = (Maybe T.Text)
type AttrLabel DOMDocumentDefaultCharsetPropertyInfo = "default-charset"
attrGet _ = getDOMDocumentDefaultCharset
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "default-view"
-- Type: TInterface "WebKit2WebExtension" "DOMDOMWindow"
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentDefaultView :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe DOMDOMWindow)
getDOMDocumentDefaultView obj = liftIO $ getObjectPropertyObject obj "default-view" DOMDOMWindow
data DOMDocumentDefaultViewPropertyInfo
instance AttrInfo DOMDocumentDefaultViewPropertyInfo where
type AttrAllowedOps DOMDocumentDefaultViewPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentDefaultViewPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentDefaultViewPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentDefaultViewPropertyInfo = (Maybe DOMDOMWindow)
type AttrLabel DOMDocumentDefaultViewPropertyInfo = "default-view"
attrGet _ = getDOMDocumentDefaultView
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "doctype"
-- Type: TInterface "WebKit2WebExtension" "DOMDocumentType"
-- Flags: [PropertyReadable]
-- Nullable: (Just False,Nothing)
getDOMDocumentDoctype :: (MonadIO m, DOMDocumentK o) => o -> m DOMDocumentType
getDOMDocumentDoctype obj = liftIO $ checkUnexpectedNothing "getDOMDocumentDoctype" $ getObjectPropertyObject obj "doctype" DOMDocumentType
data DOMDocumentDoctypePropertyInfo
instance AttrInfo DOMDocumentDoctypePropertyInfo where
type AttrAllowedOps DOMDocumentDoctypePropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentDoctypePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentDoctypePropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentDoctypePropertyInfo = DOMDocumentType
type AttrLabel DOMDocumentDoctypePropertyInfo = "doctype"
attrGet _ = getDOMDocumentDoctype
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "document-element"
-- Type: TInterface "WebKit2WebExtension" "DOMElement"
-- Flags: [PropertyReadable]
-- Nullable: (Just False,Nothing)
getDOMDocumentDocumentElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement
getDOMDocumentDocumentElement obj = liftIO $ checkUnexpectedNothing "getDOMDocumentDocumentElement" $ getObjectPropertyObject obj "document-element" DOMElement
data DOMDocumentDocumentElementPropertyInfo
instance AttrInfo DOMDocumentDocumentElementPropertyInfo where
type AttrAllowedOps DOMDocumentDocumentElementPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentDocumentElementPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentDocumentElementPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentDocumentElementPropertyInfo = DOMElement
type AttrLabel DOMDocumentDocumentElementPropertyInfo = "document-element"
attrGet _ = getDOMDocumentDocumentElement
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "document-uri"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Just False)
getDOMDocumentDocumentUri :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe 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" (Just val)
constructDOMDocumentDocumentUri :: T.Text -> IO ([Char], GValue)
constructDOMDocumentDocumentUri val = constructObjectPropertyString "document-uri" (Just 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 = (Maybe T.Text)
type AttrLabel DOMDocumentDocumentUriPropertyInfo = "document-uri"
attrGet _ = getDOMDocumentDocumentUri
attrSet _ = setDOMDocumentDocumentUri
attrConstruct _ = constructDOMDocumentDocumentUri
attrClear _ = undefined
-- VVV Prop "domain"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentDomain :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentDomain obj = liftIO $ getObjectPropertyString obj "domain"
data DOMDocumentDomainPropertyInfo
instance AttrInfo DOMDocumentDomainPropertyInfo where
type AttrAllowedOps DOMDocumentDomainPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentDomainPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentDomainPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentDomainPropertyInfo = (Maybe T.Text)
type AttrLabel DOMDocumentDomainPropertyInfo = "domain"
attrGet _ = getDOMDocumentDomain
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "first-element-child"
-- Type: TInterface "WebKit2WebExtension" "DOMElement"
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentFirstElementChild :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe DOMElement)
getDOMDocumentFirstElementChild obj = liftIO $ getObjectPropertyObject obj "first-element-child" DOMElement
data DOMDocumentFirstElementChildPropertyInfo
instance AttrInfo DOMDocumentFirstElementChildPropertyInfo where
type AttrAllowedOps DOMDocumentFirstElementChildPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentFirstElementChildPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentFirstElementChildPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentFirstElementChildPropertyInfo = (Maybe DOMElement)
type AttrLabel DOMDocumentFirstElementChildPropertyInfo = "first-element-child"
attrGet _ = getDOMDocumentFirstElementChild
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "forms"
-- Type: TInterface "WebKit2WebExtension" "DOMHTMLCollection"
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentForms :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe DOMHTMLCollection)
getDOMDocumentForms obj = liftIO $ getObjectPropertyObject obj "forms" DOMHTMLCollection
data DOMDocumentFormsPropertyInfo
instance AttrInfo DOMDocumentFormsPropertyInfo where
type AttrAllowedOps DOMDocumentFormsPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentFormsPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentFormsPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentFormsPropertyInfo = (Maybe DOMHTMLCollection)
type AttrLabel DOMDocumentFormsPropertyInfo = "forms"
attrGet _ = getDOMDocumentForms
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "head"
-- Type: TInterface "WebKit2WebExtension" "DOMHTMLHeadElement"
-- Flags: [PropertyReadable]
-- Nullable: (Just False,Nothing)
getDOMDocumentHead :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLHeadElement
getDOMDocumentHead obj = liftIO $ checkUnexpectedNothing "getDOMDocumentHead" $ getObjectPropertyObject obj "head" DOMHTMLHeadElement
data DOMDocumentHeadPropertyInfo
instance AttrInfo DOMDocumentHeadPropertyInfo where
type AttrAllowedOps DOMDocumentHeadPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentHeadPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentHeadPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentHeadPropertyInfo = DOMHTMLHeadElement
type AttrLabel DOMDocumentHeadPropertyInfo = "head"
attrGet _ = getDOMDocumentHead
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "hidden"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
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
attrClear _ = undefined
-- VVV Prop "images"
-- Type: TInterface "WebKit2WebExtension" "DOMHTMLCollection"
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentImages :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe DOMHTMLCollection)
getDOMDocumentImages obj = liftIO $ getObjectPropertyObject obj "images" DOMHTMLCollection
data DOMDocumentImagesPropertyInfo
instance AttrInfo DOMDocumentImagesPropertyInfo where
type AttrAllowedOps DOMDocumentImagesPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentImagesPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentImagesPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentImagesPropertyInfo = (Maybe DOMHTMLCollection)
type AttrLabel DOMDocumentImagesPropertyInfo = "images"
attrGet _ = getDOMDocumentImages
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "implementation"
-- Type: TInterface "WebKit2WebExtension" "DOMDOMImplementation"
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentImplementation :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe DOMDOMImplementation)
getDOMDocumentImplementation obj = liftIO $ getObjectPropertyObject obj "implementation" DOMDOMImplementation
data DOMDocumentImplementationPropertyInfo
instance AttrInfo DOMDocumentImplementationPropertyInfo where
type AttrAllowedOps DOMDocumentImplementationPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentImplementationPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentImplementationPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentImplementationPropertyInfo = (Maybe DOMDOMImplementation)
type AttrLabel DOMDocumentImplementationPropertyInfo = "implementation"
attrGet _ = getDOMDocumentImplementation
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "input-encoding"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentInputEncoding :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentInputEncoding obj = liftIO $ getObjectPropertyString obj "input-encoding"
data DOMDocumentInputEncodingPropertyInfo
instance AttrInfo DOMDocumentInputEncodingPropertyInfo where
type AttrAllowedOps DOMDocumentInputEncodingPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentInputEncodingPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentInputEncodingPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentInputEncodingPropertyInfo = (Maybe T.Text)
type AttrLabel DOMDocumentInputEncodingPropertyInfo = "input-encoding"
attrGet _ = getDOMDocumentInputEncoding
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "last-element-child"
-- Type: TInterface "WebKit2WebExtension" "DOMElement"
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentLastElementChild :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe DOMElement)
getDOMDocumentLastElementChild obj = liftIO $ getObjectPropertyObject obj "last-element-child" DOMElement
data DOMDocumentLastElementChildPropertyInfo
instance AttrInfo DOMDocumentLastElementChildPropertyInfo where
type AttrAllowedOps DOMDocumentLastElementChildPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentLastElementChildPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentLastElementChildPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentLastElementChildPropertyInfo = (Maybe DOMElement)
type AttrLabel DOMDocumentLastElementChildPropertyInfo = "last-element-child"
attrGet _ = getDOMDocumentLastElementChild
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "last-modified"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentLastModified :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentLastModified obj = liftIO $ getObjectPropertyString obj "last-modified"
data DOMDocumentLastModifiedPropertyInfo
instance AttrInfo DOMDocumentLastModifiedPropertyInfo where
type AttrAllowedOps DOMDocumentLastModifiedPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentLastModifiedPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentLastModifiedPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentLastModifiedPropertyInfo = (Maybe T.Text)
type AttrLabel DOMDocumentLastModifiedPropertyInfo = "last-modified"
attrGet _ = getDOMDocumentLastModified
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "links"
-- Type: TInterface "WebKit2WebExtension" "DOMHTMLCollection"
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentLinks :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe DOMHTMLCollection)
getDOMDocumentLinks obj = liftIO $ getObjectPropertyObject obj "links" DOMHTMLCollection
data DOMDocumentLinksPropertyInfo
instance AttrInfo DOMDocumentLinksPropertyInfo where
type AttrAllowedOps DOMDocumentLinksPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentLinksPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentLinksPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentLinksPropertyInfo = (Maybe DOMHTMLCollection)
type AttrLabel DOMDocumentLinksPropertyInfo = "links"
attrGet _ = getDOMDocumentLinks
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "origin"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentOrigin :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentOrigin obj = liftIO $ getObjectPropertyString obj "origin"
data DOMDocumentOriginPropertyInfo
instance AttrInfo DOMDocumentOriginPropertyInfo where
type AttrAllowedOps DOMDocumentOriginPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentOriginPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentOriginPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentOriginPropertyInfo = (Maybe T.Text)
type AttrLabel DOMDocumentOriginPropertyInfo = "origin"
attrGet _ = getDOMDocumentOrigin
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "pointer-lock-element"
-- Type: TInterface "WebKit2WebExtension" "DOMElement"
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentPointerLockElement :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe DOMElement)
getDOMDocumentPointerLockElement obj = liftIO $ getObjectPropertyObject obj "pointer-lock-element" DOMElement
data DOMDocumentPointerLockElementPropertyInfo
instance AttrInfo DOMDocumentPointerLockElementPropertyInfo where
type AttrAllowedOps DOMDocumentPointerLockElementPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentPointerLockElementPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentPointerLockElementPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentPointerLockElementPropertyInfo = (Maybe DOMElement)
type AttrLabel DOMDocumentPointerLockElementPropertyInfo = "pointer-lock-element"
attrGet _ = getDOMDocumentPointerLockElement
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "preferred-stylesheet-set"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentPreferredStylesheetSet :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentPreferredStylesheetSet obj = liftIO $ getObjectPropertyString obj "preferred-stylesheet-set"
data DOMDocumentPreferredStylesheetSetPropertyInfo
instance AttrInfo DOMDocumentPreferredStylesheetSetPropertyInfo where
type AttrAllowedOps DOMDocumentPreferredStylesheetSetPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentPreferredStylesheetSetPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentPreferredStylesheetSetPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentPreferredStylesheetSetPropertyInfo = (Maybe T.Text)
type AttrLabel DOMDocumentPreferredStylesheetSetPropertyInfo = "preferred-stylesheet-set"
attrGet _ = getDOMDocumentPreferredStylesheetSet
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "ready-state"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentReadyState :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentReadyState obj = liftIO $ getObjectPropertyString obj "ready-state"
data DOMDocumentReadyStatePropertyInfo
instance AttrInfo DOMDocumentReadyStatePropertyInfo where
type AttrAllowedOps DOMDocumentReadyStatePropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentReadyStatePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentReadyStatePropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentReadyStatePropertyInfo = (Maybe T.Text)
type AttrLabel DOMDocumentReadyStatePropertyInfo = "ready-state"
attrGet _ = getDOMDocumentReadyState
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "referrer"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentReferrer :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentReferrer obj = liftIO $ getObjectPropertyString obj "referrer"
data DOMDocumentReferrerPropertyInfo
instance AttrInfo DOMDocumentReferrerPropertyInfo where
type AttrAllowedOps DOMDocumentReferrerPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentReferrerPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentReferrerPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentReferrerPropertyInfo = (Maybe T.Text)
type AttrLabel DOMDocumentReferrerPropertyInfo = "referrer"
attrGet _ = getDOMDocumentReferrer
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "scrolling-element"
-- Type: TInterface "WebKit2WebExtension" "DOMElement"
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentScrollingElement :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe DOMElement)
getDOMDocumentScrollingElement obj = liftIO $ getObjectPropertyObject obj "scrolling-element" DOMElement
data DOMDocumentScrollingElementPropertyInfo
instance AttrInfo DOMDocumentScrollingElementPropertyInfo where
type AttrAllowedOps DOMDocumentScrollingElementPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentScrollingElementPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentScrollingElementPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentScrollingElementPropertyInfo = (Maybe DOMElement)
type AttrLabel DOMDocumentScrollingElementPropertyInfo = "scrolling-element"
attrGet _ = getDOMDocumentScrollingElement
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "selected-stylesheet-set"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Just False)
getDOMDocumentSelectedStylesheetSet :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe 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" (Just val)
constructDOMDocumentSelectedStylesheetSet :: T.Text -> IO ([Char], GValue)
constructDOMDocumentSelectedStylesheetSet val = constructObjectPropertyString "selected-stylesheet-set" (Just 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 = (Maybe T.Text)
type AttrLabel DOMDocumentSelectedStylesheetSetPropertyInfo = "selected-stylesheet-set"
attrGet _ = getDOMDocumentSelectedStylesheetSet
attrSet _ = setDOMDocumentSelectedStylesheetSet
attrConstruct _ = constructDOMDocumentSelectedStylesheetSet
attrClear _ = undefined
-- VVV Prop "style-sheets"
-- Type: TInterface "WebKit2WebExtension" "DOMStyleSheetList"
-- Flags: [PropertyReadable]
-- Nullable: (Just False,Nothing)
getDOMDocumentStyleSheets :: (MonadIO m, DOMDocumentK o) => o -> m DOMStyleSheetList
getDOMDocumentStyleSheets obj = liftIO $ checkUnexpectedNothing "getDOMDocumentStyleSheets" $ getObjectPropertyObject obj "style-sheets" DOMStyleSheetList
data DOMDocumentStyleSheetsPropertyInfo
instance AttrInfo DOMDocumentStyleSheetsPropertyInfo where
type AttrAllowedOps DOMDocumentStyleSheetsPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentStyleSheetsPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentStyleSheetsPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentStyleSheetsPropertyInfo = DOMStyleSheetList
type AttrLabel DOMDocumentStyleSheetsPropertyInfo = "style-sheets"
attrGet _ = getDOMDocumentStyleSheets
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "title"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Just False)
getDOMDocumentTitle :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentTitle obj = liftIO $ getObjectPropertyString obj "title"
setDOMDocumentTitle :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m ()
setDOMDocumentTitle obj val = liftIO $ setObjectPropertyString obj "title" (Just val)
constructDOMDocumentTitle :: T.Text -> IO ([Char], GValue)
constructDOMDocumentTitle val = constructObjectPropertyString "title" (Just 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 = (Maybe T.Text)
type AttrLabel DOMDocumentTitlePropertyInfo = "title"
attrGet _ = getDOMDocumentTitle
attrSet _ = setDOMDocumentTitle
attrConstruct _ = constructDOMDocumentTitle
attrClear _ = undefined
-- VVV Prop "url"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentUrl :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentUrl obj = liftIO $ getObjectPropertyString obj "url"
data DOMDocumentUrlPropertyInfo
instance AttrInfo DOMDocumentUrlPropertyInfo where
type AttrAllowedOps DOMDocumentUrlPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentUrlPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentUrlPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentUrlPropertyInfo = (Maybe T.Text)
type AttrLabel DOMDocumentUrlPropertyInfo = "url"
attrGet _ = getDOMDocumentUrl
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "visibility-state"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentVisibilityState :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentVisibilityState obj = liftIO $ getObjectPropertyString obj "visibility-state"
data DOMDocumentVisibilityStatePropertyInfo
instance AttrInfo DOMDocumentVisibilityStatePropertyInfo where
type AttrAllowedOps DOMDocumentVisibilityStatePropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentVisibilityStatePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentVisibilityStatePropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentVisibilityStatePropertyInfo = (Maybe T.Text)
type AttrLabel DOMDocumentVisibilityStatePropertyInfo = "visibility-state"
attrGet _ = getDOMDocumentVisibilityState
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "webkit-current-full-screen-element"
-- Type: TInterface "WebKit2WebExtension" "DOMElement"
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentWebkitCurrentFullScreenElement :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe DOMElement)
getDOMDocumentWebkitCurrentFullScreenElement obj = liftIO $ getObjectPropertyObject obj "webkit-current-full-screen-element" DOMElement
data DOMDocumentWebkitCurrentFullScreenElementPropertyInfo
instance AttrInfo DOMDocumentWebkitCurrentFullScreenElementPropertyInfo where
type AttrAllowedOps DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = (Maybe DOMElement)
type AttrLabel DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = "webkit-current-full-screen-element"
attrGet _ = getDOMDocumentWebkitCurrentFullScreenElement
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "webkit-full-screen-keyboard-input-allowed"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
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
attrClear _ = undefined
-- VVV Prop "webkit-fullscreen-element"
-- Type: TInterface "WebKit2WebExtension" "DOMElement"
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentWebkitFullscreenElement :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe DOMElement)
getDOMDocumentWebkitFullscreenElement obj = liftIO $ getObjectPropertyObject obj "webkit-fullscreen-element" DOMElement
data DOMDocumentWebkitFullscreenElementPropertyInfo
instance AttrInfo DOMDocumentWebkitFullscreenElementPropertyInfo where
type AttrAllowedOps DOMDocumentWebkitFullscreenElementPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentWebkitFullscreenElementPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentWebkitFullscreenElementPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentWebkitFullscreenElementPropertyInfo = (Maybe DOMElement)
type AttrLabel DOMDocumentWebkitFullscreenElementPropertyInfo = "webkit-fullscreen-element"
attrGet _ = getDOMDocumentWebkitFullscreenElement
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "webkit-fullscreen-enabled"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
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
attrClear _ = undefined
-- VVV Prop "webkit-is-full-screen"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
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
attrClear _ = undefined
-- VVV Prop "xml-encoding"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentXmlEncoding :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe T.Text)
getDOMDocumentXmlEncoding obj = liftIO $ getObjectPropertyString obj "xml-encoding"
data DOMDocumentXmlEncodingPropertyInfo
instance AttrInfo DOMDocumentXmlEncodingPropertyInfo where
type AttrAllowedOps DOMDocumentXmlEncodingPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentXmlEncodingPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDocumentXmlEncodingPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentXmlEncodingPropertyInfo = (Maybe T.Text)
type AttrLabel DOMDocumentXmlEncodingPropertyInfo = "xml-encoding"
attrGet _ = getDOMDocumentXmlEncoding
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
-- VVV Prop "xml-standalone"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Nothing)
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
attrClear _ = undefined
-- VVV Prop "xml-version"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
getDOMDocumentXmlVersion :: (MonadIO m, DOMDocumentK o) => o -> m (Maybe 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" (Just val)
constructDOMDocumentXmlVersion :: T.Text -> IO ([Char], GValue)
constructDOMDocumentXmlVersion val = constructObjectPropertyString "xml-version" (Just val)
clearDOMDocumentXmlVersion :: (MonadIO m, DOMDocumentK o) => o -> m ()
clearDOMDocumentXmlVersion obj = liftIO $ setObjectPropertyString obj "xml-version" (Nothing :: Maybe T.Text)
data DOMDocumentXmlVersionPropertyInfo
instance AttrInfo DOMDocumentXmlVersionPropertyInfo where
type AttrAllowedOps DOMDocumentXmlVersionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMDocumentXmlVersionPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMDocumentXmlVersionPropertyInfo = DOMDocumentK
type AttrGetType DOMDocumentXmlVersionPropertyInfo = (Maybe T.Text)
type AttrLabel DOMDocumentXmlVersionPropertyInfo = "xml-version"
attrGet _ = getDOMDocumentXmlVersion
attrSet _ = setDOMDocumentXmlVersion
attrConstruct _ = constructDOMDocumentXmlVersion
attrClear _ = clearDOMDocumentXmlVersion
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), '("treeRoot", DOMNodeTreeRootPropertyInfo), '("url", DOMDocumentUrlPropertyInfo), '("visibilityState", DOMDocumentVisibilityStatePropertyInfo), '("webkitCurrentFullScreenElement", DOMDocumentWebkitCurrentFullScreenElementPropertyInfo), '("webkitFullScreenKeyboardInputAllowed", DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo), '("webkitFullscreenElement", DOMDocumentWebkitFullscreenElementPropertyInfo), '("webkitFullscreenEnabled", DOMDocumentWebkitFullscreenEnabledPropertyInfo), '("webkitIsFullScreen", DOMDocumentWebkitIsFullScreenPropertyInfo), '("xmlEncoding", DOMDocumentXmlEncodingPropertyInfo), '("xmlStandalone", DOMDocumentXmlStandalonePropertyInfo), '("xmlVersion", DOMDocumentXmlVersionPropertyInfo)] :: [(Symbol, *)])
dOMDocumentActiveElement :: AttrLabelProxy "activeElement"
dOMDocumentActiveElement = AttrLabelProxy
dOMDocumentAnchors :: AttrLabelProxy "anchors"
dOMDocumentAnchors = AttrLabelProxy
dOMDocumentApplets :: AttrLabelProxy "applets"
dOMDocumentApplets = AttrLabelProxy
dOMDocumentBody :: AttrLabelProxy "body"
dOMDocumentBody = AttrLabelProxy
dOMDocumentCharacterSet :: AttrLabelProxy "characterSet"
dOMDocumentCharacterSet = AttrLabelProxy
dOMDocumentCharset :: AttrLabelProxy "charset"
dOMDocumentCharset = AttrLabelProxy
dOMDocumentChildElementCount :: AttrLabelProxy "childElementCount"
dOMDocumentChildElementCount = AttrLabelProxy
dOMDocumentChildren :: AttrLabelProxy "children"
dOMDocumentChildren = AttrLabelProxy
dOMDocumentCompatMode :: AttrLabelProxy "compatMode"
dOMDocumentCompatMode = AttrLabelProxy
dOMDocumentContentType :: AttrLabelProxy "contentType"
dOMDocumentContentType = AttrLabelProxy
dOMDocumentCookie :: AttrLabelProxy "cookie"
dOMDocumentCookie = AttrLabelProxy
dOMDocumentCurrentScript :: AttrLabelProxy "currentScript"
dOMDocumentCurrentScript = AttrLabelProxy
dOMDocumentDefaultCharset :: AttrLabelProxy "defaultCharset"
dOMDocumentDefaultCharset = AttrLabelProxy
dOMDocumentDefaultView :: AttrLabelProxy "defaultView"
dOMDocumentDefaultView = AttrLabelProxy
dOMDocumentDoctype :: AttrLabelProxy "doctype"
dOMDocumentDoctype = AttrLabelProxy
dOMDocumentDocumentElement :: AttrLabelProxy "documentElement"
dOMDocumentDocumentElement = AttrLabelProxy
dOMDocumentDocumentUri :: AttrLabelProxy "documentUri"
dOMDocumentDocumentUri = AttrLabelProxy
dOMDocumentDomain :: AttrLabelProxy "domain"
dOMDocumentDomain = AttrLabelProxy
dOMDocumentFirstElementChild :: AttrLabelProxy "firstElementChild"
dOMDocumentFirstElementChild = AttrLabelProxy
dOMDocumentForms :: AttrLabelProxy "forms"
dOMDocumentForms = AttrLabelProxy
dOMDocumentHead :: AttrLabelProxy "head"
dOMDocumentHead = AttrLabelProxy
dOMDocumentHidden :: AttrLabelProxy "hidden"
dOMDocumentHidden = AttrLabelProxy
dOMDocumentImages :: AttrLabelProxy "images"
dOMDocumentImages = AttrLabelProxy
dOMDocumentImplementation :: AttrLabelProxy "implementation"
dOMDocumentImplementation = AttrLabelProxy
dOMDocumentInputEncoding :: AttrLabelProxy "inputEncoding"
dOMDocumentInputEncoding = AttrLabelProxy
dOMDocumentLastElementChild :: AttrLabelProxy "lastElementChild"
dOMDocumentLastElementChild = AttrLabelProxy
dOMDocumentLastModified :: AttrLabelProxy "lastModified"
dOMDocumentLastModified = AttrLabelProxy
dOMDocumentLinks :: AttrLabelProxy "links"
dOMDocumentLinks = AttrLabelProxy
dOMDocumentOrigin :: AttrLabelProxy "origin"
dOMDocumentOrigin = AttrLabelProxy
dOMDocumentPointerLockElement :: AttrLabelProxy "pointerLockElement"
dOMDocumentPointerLockElement = AttrLabelProxy
dOMDocumentPreferredStylesheetSet :: AttrLabelProxy "preferredStylesheetSet"
dOMDocumentPreferredStylesheetSet = AttrLabelProxy
dOMDocumentReadyState :: AttrLabelProxy "readyState"
dOMDocumentReadyState = AttrLabelProxy
dOMDocumentReferrer :: AttrLabelProxy "referrer"
dOMDocumentReferrer = AttrLabelProxy
dOMDocumentScrollingElement :: AttrLabelProxy "scrollingElement"
dOMDocumentScrollingElement = AttrLabelProxy
dOMDocumentSelectedStylesheetSet :: AttrLabelProxy "selectedStylesheetSet"
dOMDocumentSelectedStylesheetSet = AttrLabelProxy
dOMDocumentStyleSheets :: AttrLabelProxy "styleSheets"
dOMDocumentStyleSheets = AttrLabelProxy
dOMDocumentTitle :: AttrLabelProxy "title"
dOMDocumentTitle = AttrLabelProxy
dOMDocumentUrl :: AttrLabelProxy "url"
dOMDocumentUrl = AttrLabelProxy
dOMDocumentVisibilityState :: AttrLabelProxy "visibilityState"
dOMDocumentVisibilityState = AttrLabelProxy
dOMDocumentWebkitCurrentFullScreenElement :: AttrLabelProxy "webkitCurrentFullScreenElement"
dOMDocumentWebkitCurrentFullScreenElement = AttrLabelProxy
dOMDocumentWebkitFullScreenKeyboardInputAllowed :: AttrLabelProxy "webkitFullScreenKeyboardInputAllowed"
dOMDocumentWebkitFullScreenKeyboardInputAllowed = AttrLabelProxy
dOMDocumentWebkitFullscreenElement :: AttrLabelProxy "webkitFullscreenElement"
dOMDocumentWebkitFullscreenElement = AttrLabelProxy
dOMDocumentWebkitFullscreenEnabled :: AttrLabelProxy "webkitFullscreenEnabled"
dOMDocumentWebkitFullscreenEnabled = AttrLabelProxy
dOMDocumentWebkitIsFullScreen :: AttrLabelProxy "webkitIsFullScreen"
dOMDocumentWebkitIsFullScreen = AttrLabelProxy
dOMDocumentXmlEncoding :: AttrLabelProxy "xmlEncoding"
dOMDocumentXmlEncoding = AttrLabelProxy
dOMDocumentXmlStandalone :: AttrLabelProxy "xmlStandalone"
dOMDocumentXmlStandalone = AttrLabelProxy
dOMDocumentXmlVersion :: AttrLabelProxy "xmlVersion"
dOMDocumentXmlVersion = AttrLabelProxy
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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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)
{-# DEPRECATED dOMDocumentCreateEntityReference ["(Since version 2.12)"]#-}
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 : Just (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 : Just (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 TULong, 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 : Just (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"
CULong -> -- whatToShow : TBasicType TULong
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
-> CULong -- 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 -> CULong -> 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 : Just (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 : Just (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 : Just (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 : Just (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 TULong, 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 : Just (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"
CULong -> -- whatToShow : TBasicType TULong
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
-> CULong -- 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 -> CULong -> 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 TLong, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "y", argType = TBasicType TLong, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (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"
CLong -> -- x : TBasicType TLong
CLong -> -- y : TBasicType TLong
IO (Ptr DOMElement)
dOMDocumentElementFromPoint ::
(MonadIO m, DOMDocumentK a) =>
a -- _obj
-> CLong -- x
-> CLong -- 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 ~ (CLong -> CLong -> 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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 = "class_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (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 -> -- class_name : TBasicType TUTF8
IO (Ptr DOMNodeList)
{-# DEPRECATED dOMDocumentGetElementsByClassName ["(Since version 2.12)","Use webkit_dom_document_get_elements_by_class_name_as_html_collection() instead."]#-}
dOMDocumentGetElementsByClassName ::
(MonadIO m, DOMDocumentK a) =>
a -- _obj
-> T.Text -- className
-> m DOMNodeList -- result
dOMDocumentGetElementsByClassName _obj className = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
className' <- textToCString className
result <- webkit_dom_document_get_elements_by_class_name _obj' className'
checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_class_name" result
result' <- (wrapObject DOMNodeList) result
touchManagedPtr _obj
freeMem className'
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_class_name_as_html_collection
-- 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 : Just (TInterface "WebKit2WebExtension" "DOMHTMLCollection")
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_document_get_elements_by_class_name_as_html_collection" webkit_dom_document_get_elements_by_class_name_as_html_collection ::
Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument"
CString -> -- classNames : TBasicType TUTF8
IO (Ptr DOMHTMLCollection)
dOMDocumentGetElementsByClassNameAsHtmlCollection ::
(MonadIO m, DOMDocumentK a) =>
a -- _obj
-> T.Text -- classNames
-> m DOMHTMLCollection -- result
dOMDocumentGetElementsByClassNameAsHtmlCollection _obj classNames = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
classNames' <- textToCString classNames
result <- webkit_dom_document_get_elements_by_class_name_as_html_collection _obj' classNames'
checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_class_name_as_html_collection" result
result' <- (wrapObject DOMHTMLCollection) result
touchManagedPtr _obj
freeMem classNames'
return result'
data DOMDocumentGetElementsByClassNameAsHtmlCollectionMethodInfo
instance (signature ~ (T.Text -> m DOMHTMLCollection), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetElementsByClassNameAsHtmlCollectionMethodInfo a signature where
overloadedMethod _ = dOMDocumentGetElementsByClassNameAsHtmlCollection
-- 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 : Just (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 = "tag_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (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 -> -- tag_name : TBasicType TUTF8
IO (Ptr DOMNodeList)
{-# DEPRECATED dOMDocumentGetElementsByTagName ["(Since version 2.12)","Use webkit_dom_document_get_elements_by_tag_name_as_html_collection() instead."]#-}
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_as_html_collection
-- 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 : Just (TInterface "WebKit2WebExtension" "DOMHTMLCollection")
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_document_get_elements_by_tag_name_as_html_collection" webkit_dom_document_get_elements_by_tag_name_as_html_collection ::
Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument"
CString -> -- tagname : TBasicType TUTF8
IO (Ptr DOMHTMLCollection)
dOMDocumentGetElementsByTagNameAsHtmlCollection ::
(MonadIO m, DOMDocumentK a) =>
a -- _obj
-> T.Text -- tagname
-> m DOMHTMLCollection -- result
dOMDocumentGetElementsByTagNameAsHtmlCollection _obj tagname = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
tagname' <- textToCString tagname
result <- webkit_dom_document_get_elements_by_tag_name_as_html_collection _obj' tagname'
checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_tag_name_as_html_collection" result
result' <- (wrapObject DOMHTMLCollection) result
touchManagedPtr _obj
freeMem tagname'
return result'
data DOMDocumentGetElementsByTagNameAsHtmlCollectionMethodInfo
instance (signature ~ (T.Text -> m DOMHTMLCollection), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetElementsByTagNameAsHtmlCollectionMethodInfo a signature where
overloadedMethod _ = dOMDocumentGetElementsByTagNameAsHtmlCollection
-- 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 = "namespace_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tag_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (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 -> -- namespace_uri : TBasicType TUTF8
CString -> -- tag_name : TBasicType TUTF8
IO (Ptr DOMNodeList)
{-# DEPRECATED dOMDocumentGetElementsByTagNameNs ["(Since version 2.12)","Use webkit_dom_document_get_elements_by_tag_name_ns_as_html_collection() instead."]#-}
dOMDocumentGetElementsByTagNameNs ::
(MonadIO m, DOMDocumentK a) =>
a -- _obj
-> T.Text -- namespaceUri
-> T.Text -- tagName
-> m DOMNodeList -- result
dOMDocumentGetElementsByTagNameNs _obj namespaceUri tagName = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
namespaceUri' <- textToCString namespaceUri
tagName' <- textToCString tagName
result <- webkit_dom_document_get_elements_by_tag_name_ns _obj' namespaceUri' tagName'
checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_tag_name_ns" result
result' <- (wrapObject DOMNodeList) result
touchManagedPtr _obj
freeMem namespaceUri'
freeMem tagName'
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_elements_by_tag_name_ns_as_html_collection
-- 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 : Just (TInterface "WebKit2WebExtension" "DOMHTMLCollection")
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_document_get_elements_by_tag_name_ns_as_html_collection" webkit_dom_document_get_elements_by_tag_name_ns_as_html_collection ::
Ptr DOMDocument -> -- _obj : TInterface "WebKit2WebExtension" "DOMDocument"
CString -> -- namespaceURI : TBasicType TUTF8
CString -> -- localName : TBasicType TUTF8
IO (Ptr DOMHTMLCollection)
dOMDocumentGetElementsByTagNameNsAsHtmlCollection ::
(MonadIO m, DOMDocumentK a) =>
a -- _obj
-> T.Text -- namespaceURI
-> T.Text -- localName
-> m DOMHTMLCollection -- result
dOMDocumentGetElementsByTagNameNsAsHtmlCollection _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_as_html_collection _obj' namespaceURI' localName'
checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_tag_name_ns_as_html_collection" result
result' <- (wrapObject DOMHTMLCollection) result
touchManagedPtr _obj
freeMem namespaceURI'
freeMem localName'
return result'
data DOMDocumentGetElementsByTagNameNsAsHtmlCollectionMethodInfo
instance (signature ~ (T.Text -> T.Text -> m DOMHTMLCollection), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetElementsByTagNameNsAsHtmlCollectionMethodInfo a signature where
overloadedMethod _ = dOMDocumentGetElementsByTagNameNsAsHtmlCollection
-- 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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Just (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 : Nothing
-- 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 : Nothing
-- 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 : Nothing
-- 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 : Nothing
-- 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 : Nothing
-- 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 : Nothing
-- 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 : Nothing
-- 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 : Nothing
-- 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