gi-webkit-0.2.4.12: GI/WebKit/Objects/DOMDOMWindow.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.WebKit.Objects.DOMDOMWindow
(
-- * Exported types
DOMDOMWindow(..) ,
DOMDOMWindowK ,
toDOMDOMWindow ,
noDOMDOMWindow ,
-- * Methods
-- ** dOMDOMWindowAlert
dOMDOMWindowAlert ,
-- ** dOMDOMWindowAtob
dOMDOMWindowAtob ,
-- ** dOMDOMWindowBlur
dOMDOMWindowBlur ,
-- ** dOMDOMWindowBtoa
dOMDOMWindowBtoa ,
-- ** dOMDOMWindowCancelAnimationFrame
dOMDOMWindowCancelAnimationFrame ,
-- ** dOMDOMWindowCaptureEvents
dOMDOMWindowCaptureEvents ,
-- ** dOMDOMWindowClearInterval
dOMDOMWindowClearInterval ,
-- ** dOMDOMWindowClearTimeout
dOMDOMWindowClearTimeout ,
-- ** dOMDOMWindowClose
dOMDOMWindowClose ,
-- ** dOMDOMWindowConfirm
dOMDOMWindowConfirm ,
-- ** dOMDOMWindowDispatchEvent
dOMDOMWindowDispatchEvent ,
-- ** dOMDOMWindowFind
dOMDOMWindowFind ,
-- ** dOMDOMWindowFocus
dOMDOMWindowFocus ,
-- ** dOMDOMWindowGetApplicationCache
dOMDOMWindowGetApplicationCache ,
-- ** dOMDOMWindowGetClientInformation
dOMDOMWindowGetClientInformation ,
-- ** dOMDOMWindowGetClosed
dOMDOMWindowGetClosed ,
-- ** dOMDOMWindowGetComputedStyle
dOMDOMWindowGetComputedStyle ,
-- ** dOMDOMWindowGetConsole
dOMDOMWindowGetConsole ,
-- ** dOMDOMWindowGetCss
dOMDOMWindowGetCss ,
-- ** dOMDOMWindowGetDefaultStatus
dOMDOMWindowGetDefaultStatus ,
-- ** dOMDOMWindowGetDevicePixelRatio
dOMDOMWindowGetDevicePixelRatio ,
-- ** dOMDOMWindowGetDocument
dOMDOMWindowGetDocument ,
-- ** dOMDOMWindowGetFrameElement
dOMDOMWindowGetFrameElement ,
-- ** dOMDOMWindowGetFrames
dOMDOMWindowGetFrames ,
-- ** dOMDOMWindowGetHistory
dOMDOMWindowGetHistory ,
-- ** dOMDOMWindowGetInnerHeight
dOMDOMWindowGetInnerHeight ,
-- ** dOMDOMWindowGetInnerWidth
dOMDOMWindowGetInnerWidth ,
-- ** dOMDOMWindowGetLength
dOMDOMWindowGetLength ,
-- ** dOMDOMWindowGetLocalStorage
dOMDOMWindowGetLocalStorage ,
-- ** dOMDOMWindowGetLocationbar
dOMDOMWindowGetLocationbar ,
-- ** dOMDOMWindowGetMenubar
dOMDOMWindowGetMenubar ,
-- ** dOMDOMWindowGetName
dOMDOMWindowGetName ,
-- ** dOMDOMWindowGetNavigator
dOMDOMWindowGetNavigator ,
-- ** dOMDOMWindowGetOffscreenBuffering
dOMDOMWindowGetOffscreenBuffering ,
-- ** dOMDOMWindowGetOpener
dOMDOMWindowGetOpener ,
-- ** dOMDOMWindowGetOuterHeight
dOMDOMWindowGetOuterHeight ,
-- ** dOMDOMWindowGetOuterWidth
dOMDOMWindowGetOuterWidth ,
-- ** dOMDOMWindowGetPageXOffset
dOMDOMWindowGetPageXOffset ,
-- ** dOMDOMWindowGetPageYOffset
dOMDOMWindowGetPageYOffset ,
-- ** dOMDOMWindowGetParent
dOMDOMWindowGetParent ,
-- ** dOMDOMWindowGetPerformance
dOMDOMWindowGetPerformance ,
-- ** dOMDOMWindowGetPersonalbar
dOMDOMWindowGetPersonalbar ,
-- ** dOMDOMWindowGetScreen
dOMDOMWindowGetScreen ,
-- ** dOMDOMWindowGetScreenLeft
dOMDOMWindowGetScreenLeft ,
-- ** dOMDOMWindowGetScreenTop
dOMDOMWindowGetScreenTop ,
-- ** dOMDOMWindowGetScreenX
dOMDOMWindowGetScreenX ,
-- ** dOMDOMWindowGetScreenY
dOMDOMWindowGetScreenY ,
-- ** dOMDOMWindowGetScrollX
dOMDOMWindowGetScrollX ,
-- ** dOMDOMWindowGetScrollY
dOMDOMWindowGetScrollY ,
-- ** dOMDOMWindowGetScrollbars
dOMDOMWindowGetScrollbars ,
-- ** dOMDOMWindowGetSelection
dOMDOMWindowGetSelection ,
-- ** dOMDOMWindowGetSelf
dOMDOMWindowGetSelf ,
-- ** dOMDOMWindowGetSessionStorage
dOMDOMWindowGetSessionStorage ,
-- ** dOMDOMWindowGetStatus
dOMDOMWindowGetStatus ,
-- ** dOMDOMWindowGetStatusbar
dOMDOMWindowGetStatusbar ,
-- ** dOMDOMWindowGetStyleMedia
dOMDOMWindowGetStyleMedia ,
-- ** dOMDOMWindowGetToolbar
dOMDOMWindowGetToolbar ,
-- ** dOMDOMWindowGetTop
dOMDOMWindowGetTop ,
-- ** dOMDOMWindowGetWebkitStorageInfo
dOMDOMWindowGetWebkitStorageInfo ,
-- ** dOMDOMWindowGetWindow
dOMDOMWindowGetWindow ,
-- ** dOMDOMWindowMatchMedia
dOMDOMWindowMatchMedia ,
-- ** dOMDOMWindowMoveBy
dOMDOMWindowMoveBy ,
-- ** dOMDOMWindowMoveTo
dOMDOMWindowMoveTo ,
-- ** dOMDOMWindowPrint
dOMDOMWindowPrint ,
-- ** dOMDOMWindowPrompt
dOMDOMWindowPrompt ,
-- ** dOMDOMWindowReleaseEvents
dOMDOMWindowReleaseEvents ,
-- ** dOMDOMWindowResizeBy
dOMDOMWindowResizeBy ,
-- ** dOMDOMWindowResizeTo
dOMDOMWindowResizeTo ,
-- ** dOMDOMWindowScroll
dOMDOMWindowScroll ,
-- ** dOMDOMWindowScrollBy
dOMDOMWindowScrollBy ,
-- ** dOMDOMWindowScrollTo
dOMDOMWindowScrollTo ,
-- ** dOMDOMWindowSetDefaultStatus
dOMDOMWindowSetDefaultStatus ,
-- ** dOMDOMWindowSetName
dOMDOMWindowSetName ,
-- ** dOMDOMWindowSetStatus
dOMDOMWindowSetStatus ,
-- ** dOMDOMWindowStop
dOMDOMWindowStop ,
-- ** dOMDOMWindowWebkitCancelAnimationFrame
dOMDOMWindowWebkitCancelAnimationFrame ,
-- ** dOMDOMWindowWebkitCancelRequestAnimationFrame
dOMDOMWindowWebkitCancelRequestAnimationFrame,
-- ** dOMDOMWindowWebkitConvertPointFromNodeToPage
dOMDOMWindowWebkitConvertPointFromNodeToPage,
-- ** dOMDOMWindowWebkitConvertPointFromPageToNode
dOMDOMWindowWebkitConvertPointFromPageToNode,
-- * Properties
-- ** ApplicationCache
DOMDOMWindowApplicationCachePropertyInfo,
getDOMDOMWindowApplicationCache ,
-- ** ClientInformation
DOMDOMWindowClientInformationPropertyInfo,
getDOMDOMWindowClientInformation ,
-- ** Closed
DOMDOMWindowClosedPropertyInfo ,
getDOMDOMWindowClosed ,
-- ** Console
DOMDOMWindowConsolePropertyInfo ,
getDOMDOMWindowConsole ,
-- ** Css
DOMDOMWindowCssPropertyInfo ,
getDOMDOMWindowCss ,
-- ** DefaultStatus
DOMDOMWindowDefaultStatusPropertyInfo ,
constructDOMDOMWindowDefaultStatus ,
getDOMDOMWindowDefaultStatus ,
setDOMDOMWindowDefaultStatus ,
-- ** DevicePixelRatio
DOMDOMWindowDevicePixelRatioPropertyInfo,
getDOMDOMWindowDevicePixelRatio ,
-- ** Document
DOMDOMWindowDocumentPropertyInfo ,
getDOMDOMWindowDocument ,
-- ** FrameElement
DOMDOMWindowFrameElementPropertyInfo ,
getDOMDOMWindowFrameElement ,
-- ** Frames
DOMDOMWindowFramesPropertyInfo ,
getDOMDOMWindowFrames ,
-- ** History
DOMDOMWindowHistoryPropertyInfo ,
getDOMDOMWindowHistory ,
-- ** InnerHeight
DOMDOMWindowInnerHeightPropertyInfo ,
getDOMDOMWindowInnerHeight ,
-- ** InnerWidth
DOMDOMWindowInnerWidthPropertyInfo ,
getDOMDOMWindowInnerWidth ,
-- ** Length
DOMDOMWindowLengthPropertyInfo ,
getDOMDOMWindowLength ,
-- ** LocalStorage
DOMDOMWindowLocalStoragePropertyInfo ,
getDOMDOMWindowLocalStorage ,
-- ** Locationbar
DOMDOMWindowLocationbarPropertyInfo ,
getDOMDOMWindowLocationbar ,
-- ** Menubar
DOMDOMWindowMenubarPropertyInfo ,
getDOMDOMWindowMenubar ,
-- ** Name
DOMDOMWindowNamePropertyInfo ,
constructDOMDOMWindowName ,
getDOMDOMWindowName ,
setDOMDOMWindowName ,
-- ** Navigator
DOMDOMWindowNavigatorPropertyInfo ,
getDOMDOMWindowNavigator ,
-- ** OffscreenBuffering
DOMDOMWindowOffscreenBufferingPropertyInfo,
getDOMDOMWindowOffscreenBuffering ,
-- ** Opener
DOMDOMWindowOpenerPropertyInfo ,
getDOMDOMWindowOpener ,
-- ** OuterHeight
DOMDOMWindowOuterHeightPropertyInfo ,
getDOMDOMWindowOuterHeight ,
-- ** OuterWidth
DOMDOMWindowOuterWidthPropertyInfo ,
getDOMDOMWindowOuterWidth ,
-- ** PageXOffset
DOMDOMWindowPageXOffsetPropertyInfo ,
getDOMDOMWindowPageXOffset ,
-- ** PageYOffset
DOMDOMWindowPageYOffsetPropertyInfo ,
getDOMDOMWindowPageYOffset ,
-- ** Parent
DOMDOMWindowParentPropertyInfo ,
getDOMDOMWindowParent ,
-- ** Performance
DOMDOMWindowPerformancePropertyInfo ,
getDOMDOMWindowPerformance ,
-- ** Personalbar
DOMDOMWindowPersonalbarPropertyInfo ,
getDOMDOMWindowPersonalbar ,
-- ** Screen
DOMDOMWindowScreenPropertyInfo ,
getDOMDOMWindowScreen ,
-- ** ScreenLeft
DOMDOMWindowScreenLeftPropertyInfo ,
getDOMDOMWindowScreenLeft ,
-- ** ScreenTop
DOMDOMWindowScreenTopPropertyInfo ,
getDOMDOMWindowScreenTop ,
-- ** ScreenX
DOMDOMWindowScreenXPropertyInfo ,
getDOMDOMWindowScreenX ,
-- ** ScreenY
DOMDOMWindowScreenYPropertyInfo ,
getDOMDOMWindowScreenY ,
-- ** ScrollX
DOMDOMWindowScrollXPropertyInfo ,
getDOMDOMWindowScrollX ,
-- ** ScrollY
DOMDOMWindowScrollYPropertyInfo ,
getDOMDOMWindowScrollY ,
-- ** Scrollbars
DOMDOMWindowScrollbarsPropertyInfo ,
getDOMDOMWindowScrollbars ,
-- ** Self
DOMDOMWindowSelfPropertyInfo ,
getDOMDOMWindowSelf ,
-- ** SessionStorage
DOMDOMWindowSessionStoragePropertyInfo ,
getDOMDOMWindowSessionStorage ,
-- ** Status
DOMDOMWindowStatusPropertyInfo ,
constructDOMDOMWindowStatus ,
getDOMDOMWindowStatus ,
setDOMDOMWindowStatus ,
-- ** Statusbar
DOMDOMWindowStatusbarPropertyInfo ,
getDOMDOMWindowStatusbar ,
-- ** StyleMedia
DOMDOMWindowStyleMediaPropertyInfo ,
getDOMDOMWindowStyleMedia ,
-- ** Toolbar
DOMDOMWindowToolbarPropertyInfo ,
getDOMDOMWindowToolbar ,
-- ** Top
DOMDOMWindowTopPropertyInfo ,
getDOMDOMWindowTop ,
-- ** WebkitStorageInfo
DOMDOMWindowWebkitStorageInfoPropertyInfo,
getDOMDOMWindowWebkitStorageInfo ,
-- ** Window
DOMDOMWindowWindowPropertyInfo ,
getDOMDOMWindowWindow ,
) where
import Prelude ()
import Data.GI.Base.ShortPrelude
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import GI.WebKit.Types
import GI.WebKit.Callbacks
import qualified GI.GObject as GObject
newtype DOMDOMWindow = DOMDOMWindow (ForeignPtr DOMDOMWindow)
foreign import ccall "webkit_dom_dom_window_get_type"
c_webkit_dom_dom_window_get_type :: IO GType
type instance ParentTypes DOMDOMWindow = DOMDOMWindowParentTypes
type DOMDOMWindowParentTypes = '[DOMObject, GObject.Object, DOMEventTarget]
instance GObject DOMDOMWindow where
gobjectIsInitiallyUnowned _ = False
gobjectType _ = c_webkit_dom_dom_window_get_type
class GObject o => DOMDOMWindowK o
instance (GObject o, IsDescendantOf DOMDOMWindow o) => DOMDOMWindowK o
toDOMDOMWindow :: DOMDOMWindowK o => o -> IO DOMDOMWindow
toDOMDOMWindow = unsafeCastTo DOMDOMWindow
noDOMDOMWindow :: Maybe DOMDOMWindow
noDOMDOMWindow = Nothing
-- VVV Prop "application-cache"
-- Type: TInterface "WebKit" "DOMDOMApplicationCache"
-- Flags: [PropertyReadable]
getDOMDOMWindowApplicationCache :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMApplicationCache
getDOMDOMWindowApplicationCache obj = liftIO $ getObjectPropertyObject obj "application-cache" DOMDOMApplicationCache
data DOMDOMWindowApplicationCachePropertyInfo
instance AttrInfo DOMDOMWindowApplicationCachePropertyInfo where
type AttrAllowedOps DOMDOMWindowApplicationCachePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowApplicationCachePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowApplicationCachePropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowApplicationCachePropertyInfo = DOMDOMApplicationCache
type AttrLabel DOMDOMWindowApplicationCachePropertyInfo = "DOMDOMWindow::application-cache"
attrGet _ = getDOMDOMWindowApplicationCache
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "client-information"
-- Type: TInterface "WebKit" "DOMNavigator"
-- Flags: [PropertyReadable]
getDOMDOMWindowClientInformation :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMNavigator
getDOMDOMWindowClientInformation obj = liftIO $ getObjectPropertyObject obj "client-information" DOMNavigator
data DOMDOMWindowClientInformationPropertyInfo
instance AttrInfo DOMDOMWindowClientInformationPropertyInfo where
type AttrAllowedOps DOMDOMWindowClientInformationPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowClientInformationPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowClientInformationPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowClientInformationPropertyInfo = DOMNavigator
type AttrLabel DOMDOMWindowClientInformationPropertyInfo = "DOMDOMWindow::client-information"
attrGet _ = getDOMDOMWindowClientInformation
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "closed"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable]
getDOMDOMWindowClosed :: (MonadIO m, DOMDOMWindowK o) => o -> m Bool
getDOMDOMWindowClosed obj = liftIO $ getObjectPropertyBool obj "closed"
data DOMDOMWindowClosedPropertyInfo
instance AttrInfo DOMDOMWindowClosedPropertyInfo where
type AttrAllowedOps DOMDOMWindowClosedPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowClosedPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowClosedPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowClosedPropertyInfo = Bool
type AttrLabel DOMDOMWindowClosedPropertyInfo = "DOMDOMWindow::closed"
attrGet _ = getDOMDOMWindowClosed
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "console"
-- Type: TInterface "WebKit" "DOMConsole"
-- Flags: [PropertyReadable]
getDOMDOMWindowConsole :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMConsole
getDOMDOMWindowConsole obj = liftIO $ getObjectPropertyObject obj "console" DOMConsole
data DOMDOMWindowConsolePropertyInfo
instance AttrInfo DOMDOMWindowConsolePropertyInfo where
type AttrAllowedOps DOMDOMWindowConsolePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowConsolePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowConsolePropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowConsolePropertyInfo = DOMConsole
type AttrLabel DOMDOMWindowConsolePropertyInfo = "DOMDOMWindow::console"
attrGet _ = getDOMDOMWindowConsole
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "css"
-- Type: TInterface "WebKit" "DOMDOMWindowCSS"
-- Flags: [PropertyReadable]
getDOMDOMWindowCss :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindowCSS
getDOMDOMWindowCss obj = liftIO $ getObjectPropertyObject obj "css" DOMDOMWindowCSS
data DOMDOMWindowCssPropertyInfo
instance AttrInfo DOMDOMWindowCssPropertyInfo where
type AttrAllowedOps DOMDOMWindowCssPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowCssPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowCssPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowCssPropertyInfo = DOMDOMWindowCSS
type AttrLabel DOMDOMWindowCssPropertyInfo = "DOMDOMWindow::css"
attrGet _ = getDOMDOMWindowCss
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "default-status"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
getDOMDOMWindowDefaultStatus :: (MonadIO m, DOMDOMWindowK o) => o -> m T.Text
getDOMDOMWindowDefaultStatus obj = liftIO $ getObjectPropertyString obj "default-status"
setDOMDOMWindowDefaultStatus :: (MonadIO m, DOMDOMWindowK o) => o -> T.Text -> m ()
setDOMDOMWindowDefaultStatus obj val = liftIO $ setObjectPropertyString obj "default-status" val
constructDOMDOMWindowDefaultStatus :: T.Text -> IO ([Char], GValue)
constructDOMDOMWindowDefaultStatus val = constructObjectPropertyString "default-status" val
data DOMDOMWindowDefaultStatusPropertyInfo
instance AttrInfo DOMDOMWindowDefaultStatusPropertyInfo where
type AttrAllowedOps DOMDOMWindowDefaultStatusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowDefaultStatusPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMDOMWindowDefaultStatusPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowDefaultStatusPropertyInfo = T.Text
type AttrLabel DOMDOMWindowDefaultStatusPropertyInfo = "DOMDOMWindow::default-status"
attrGet _ = getDOMDOMWindowDefaultStatus
attrSet _ = setDOMDOMWindowDefaultStatus
attrConstruct _ = constructDOMDOMWindowDefaultStatus
-- VVV Prop "device-pixel-ratio"
-- Type: TBasicType TDouble
-- Flags: [PropertyReadable]
getDOMDOMWindowDevicePixelRatio :: (MonadIO m, DOMDOMWindowK o) => o -> m Double
getDOMDOMWindowDevicePixelRatio obj = liftIO $ getObjectPropertyDouble obj "device-pixel-ratio"
data DOMDOMWindowDevicePixelRatioPropertyInfo
instance AttrInfo DOMDOMWindowDevicePixelRatioPropertyInfo where
type AttrAllowedOps DOMDOMWindowDevicePixelRatioPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowDevicePixelRatioPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowDevicePixelRatioPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowDevicePixelRatioPropertyInfo = Double
type AttrLabel DOMDOMWindowDevicePixelRatioPropertyInfo = "DOMDOMWindow::device-pixel-ratio"
attrGet _ = getDOMDOMWindowDevicePixelRatio
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "document"
-- Type: TInterface "WebKit" "DOMDocument"
-- Flags: [PropertyReadable]
getDOMDOMWindowDocument :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDocument
getDOMDOMWindowDocument obj = liftIO $ getObjectPropertyObject obj "document" DOMDocument
data DOMDOMWindowDocumentPropertyInfo
instance AttrInfo DOMDOMWindowDocumentPropertyInfo where
type AttrAllowedOps DOMDOMWindowDocumentPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowDocumentPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowDocumentPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowDocumentPropertyInfo = DOMDocument
type AttrLabel DOMDOMWindowDocumentPropertyInfo = "DOMDOMWindow::document"
attrGet _ = getDOMDOMWindowDocument
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "frame-element"
-- Type: TInterface "WebKit" "DOMElement"
-- Flags: [PropertyReadable]
getDOMDOMWindowFrameElement :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMElement
getDOMDOMWindowFrameElement obj = liftIO $ getObjectPropertyObject obj "frame-element" DOMElement
data DOMDOMWindowFrameElementPropertyInfo
instance AttrInfo DOMDOMWindowFrameElementPropertyInfo where
type AttrAllowedOps DOMDOMWindowFrameElementPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowFrameElementPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowFrameElementPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowFrameElementPropertyInfo = DOMElement
type AttrLabel DOMDOMWindowFrameElementPropertyInfo = "DOMDOMWindow::frame-element"
attrGet _ = getDOMDOMWindowFrameElement
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "frames"
-- Type: TInterface "WebKit" "DOMDOMWindow"
-- Flags: [PropertyReadable]
getDOMDOMWindowFrames :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow
getDOMDOMWindowFrames obj = liftIO $ getObjectPropertyObject obj "frames" DOMDOMWindow
data DOMDOMWindowFramesPropertyInfo
instance AttrInfo DOMDOMWindowFramesPropertyInfo where
type AttrAllowedOps DOMDOMWindowFramesPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowFramesPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowFramesPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowFramesPropertyInfo = DOMDOMWindow
type AttrLabel DOMDOMWindowFramesPropertyInfo = "DOMDOMWindow::frames"
attrGet _ = getDOMDOMWindowFrames
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "history"
-- Type: TInterface "WebKit" "DOMHistory"
-- Flags: [PropertyReadable]
getDOMDOMWindowHistory :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMHistory
getDOMDOMWindowHistory obj = liftIO $ getObjectPropertyObject obj "history" DOMHistory
data DOMDOMWindowHistoryPropertyInfo
instance AttrInfo DOMDOMWindowHistoryPropertyInfo where
type AttrAllowedOps DOMDOMWindowHistoryPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowHistoryPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowHistoryPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowHistoryPropertyInfo = DOMHistory
type AttrLabel DOMDOMWindowHistoryPropertyInfo = "DOMDOMWindow::history"
attrGet _ = getDOMDOMWindowHistory
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "inner-height"
-- Type: TBasicType TInt64
-- Flags: [PropertyReadable]
getDOMDOMWindowInnerHeight :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64
getDOMDOMWindowInnerHeight obj = liftIO $ getObjectPropertyInt64 obj "inner-height"
data DOMDOMWindowInnerHeightPropertyInfo
instance AttrInfo DOMDOMWindowInnerHeightPropertyInfo where
type AttrAllowedOps DOMDOMWindowInnerHeightPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowInnerHeightPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowInnerHeightPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowInnerHeightPropertyInfo = Int64
type AttrLabel DOMDOMWindowInnerHeightPropertyInfo = "DOMDOMWindow::inner-height"
attrGet _ = getDOMDOMWindowInnerHeight
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "inner-width"
-- Type: TBasicType TInt64
-- Flags: [PropertyReadable]
getDOMDOMWindowInnerWidth :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64
getDOMDOMWindowInnerWidth obj = liftIO $ getObjectPropertyInt64 obj "inner-width"
data DOMDOMWindowInnerWidthPropertyInfo
instance AttrInfo DOMDOMWindowInnerWidthPropertyInfo where
type AttrAllowedOps DOMDOMWindowInnerWidthPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowInnerWidthPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowInnerWidthPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowInnerWidthPropertyInfo = Int64
type AttrLabel DOMDOMWindowInnerWidthPropertyInfo = "DOMDOMWindow::inner-width"
attrGet _ = getDOMDOMWindowInnerWidth
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "length"
-- Type: TBasicType TUInt64
-- Flags: [PropertyReadable]
getDOMDOMWindowLength :: (MonadIO m, DOMDOMWindowK o) => o -> m Word64
getDOMDOMWindowLength obj = liftIO $ getObjectPropertyUInt64 obj "length"
data DOMDOMWindowLengthPropertyInfo
instance AttrInfo DOMDOMWindowLengthPropertyInfo where
type AttrAllowedOps DOMDOMWindowLengthPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowLengthPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowLengthPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowLengthPropertyInfo = Word64
type AttrLabel DOMDOMWindowLengthPropertyInfo = "DOMDOMWindow::length"
attrGet _ = getDOMDOMWindowLength
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "local-storage"
-- Type: TInterface "WebKit" "DOMStorage"
-- Flags: [PropertyReadable]
getDOMDOMWindowLocalStorage :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMStorage
getDOMDOMWindowLocalStorage obj = liftIO $ getObjectPropertyObject obj "local-storage" DOMStorage
data DOMDOMWindowLocalStoragePropertyInfo
instance AttrInfo DOMDOMWindowLocalStoragePropertyInfo where
type AttrAllowedOps DOMDOMWindowLocalStoragePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowLocalStoragePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowLocalStoragePropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowLocalStoragePropertyInfo = DOMStorage
type AttrLabel DOMDOMWindowLocalStoragePropertyInfo = "DOMDOMWindow::local-storage"
attrGet _ = getDOMDOMWindowLocalStorage
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "locationbar"
-- Type: TInterface "WebKit" "DOMBarProp"
-- Flags: [PropertyReadable]
getDOMDOMWindowLocationbar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp
getDOMDOMWindowLocationbar obj = liftIO $ getObjectPropertyObject obj "locationbar" DOMBarProp
data DOMDOMWindowLocationbarPropertyInfo
instance AttrInfo DOMDOMWindowLocationbarPropertyInfo where
type AttrAllowedOps DOMDOMWindowLocationbarPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowLocationbarPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowLocationbarPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowLocationbarPropertyInfo = DOMBarProp
type AttrLabel DOMDOMWindowLocationbarPropertyInfo = "DOMDOMWindow::locationbar"
attrGet _ = getDOMDOMWindowLocationbar
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "menubar"
-- Type: TInterface "WebKit" "DOMBarProp"
-- Flags: [PropertyReadable]
getDOMDOMWindowMenubar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp
getDOMDOMWindowMenubar obj = liftIO $ getObjectPropertyObject obj "menubar" DOMBarProp
data DOMDOMWindowMenubarPropertyInfo
instance AttrInfo DOMDOMWindowMenubarPropertyInfo where
type AttrAllowedOps DOMDOMWindowMenubarPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowMenubarPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowMenubarPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowMenubarPropertyInfo = DOMBarProp
type AttrLabel DOMDOMWindowMenubarPropertyInfo = "DOMDOMWindow::menubar"
attrGet _ = getDOMDOMWindowMenubar
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "name"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
getDOMDOMWindowName :: (MonadIO m, DOMDOMWindowK o) => o -> m T.Text
getDOMDOMWindowName obj = liftIO $ getObjectPropertyString obj "name"
setDOMDOMWindowName :: (MonadIO m, DOMDOMWindowK o) => o -> T.Text -> m ()
setDOMDOMWindowName obj val = liftIO $ setObjectPropertyString obj "name" val
constructDOMDOMWindowName :: T.Text -> IO ([Char], GValue)
constructDOMDOMWindowName val = constructObjectPropertyString "name" val
data DOMDOMWindowNamePropertyInfo
instance AttrInfo DOMDOMWindowNamePropertyInfo where
type AttrAllowedOps DOMDOMWindowNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowNamePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMDOMWindowNamePropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowNamePropertyInfo = T.Text
type AttrLabel DOMDOMWindowNamePropertyInfo = "DOMDOMWindow::name"
attrGet _ = getDOMDOMWindowName
attrSet _ = setDOMDOMWindowName
attrConstruct _ = constructDOMDOMWindowName
-- VVV Prop "navigator"
-- Type: TInterface "WebKit" "DOMNavigator"
-- Flags: [PropertyReadable]
getDOMDOMWindowNavigator :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMNavigator
getDOMDOMWindowNavigator obj = liftIO $ getObjectPropertyObject obj "navigator" DOMNavigator
data DOMDOMWindowNavigatorPropertyInfo
instance AttrInfo DOMDOMWindowNavigatorPropertyInfo where
type AttrAllowedOps DOMDOMWindowNavigatorPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowNavigatorPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowNavigatorPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowNavigatorPropertyInfo = DOMNavigator
type AttrLabel DOMDOMWindowNavigatorPropertyInfo = "DOMDOMWindow::navigator"
attrGet _ = getDOMDOMWindowNavigator
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "offscreen-buffering"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable]
getDOMDOMWindowOffscreenBuffering :: (MonadIO m, DOMDOMWindowK o) => o -> m Bool
getDOMDOMWindowOffscreenBuffering obj = liftIO $ getObjectPropertyBool obj "offscreen-buffering"
data DOMDOMWindowOffscreenBufferingPropertyInfo
instance AttrInfo DOMDOMWindowOffscreenBufferingPropertyInfo where
type AttrAllowedOps DOMDOMWindowOffscreenBufferingPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowOffscreenBufferingPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowOffscreenBufferingPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowOffscreenBufferingPropertyInfo = Bool
type AttrLabel DOMDOMWindowOffscreenBufferingPropertyInfo = "DOMDOMWindow::offscreen-buffering"
attrGet _ = getDOMDOMWindowOffscreenBuffering
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "opener"
-- Type: TInterface "WebKit" "DOMDOMWindow"
-- Flags: [PropertyReadable]
getDOMDOMWindowOpener :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow
getDOMDOMWindowOpener obj = liftIO $ getObjectPropertyObject obj "opener" DOMDOMWindow
data DOMDOMWindowOpenerPropertyInfo
instance AttrInfo DOMDOMWindowOpenerPropertyInfo where
type AttrAllowedOps DOMDOMWindowOpenerPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowOpenerPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowOpenerPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowOpenerPropertyInfo = DOMDOMWindow
type AttrLabel DOMDOMWindowOpenerPropertyInfo = "DOMDOMWindow::opener"
attrGet _ = getDOMDOMWindowOpener
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "outer-height"
-- Type: TBasicType TInt64
-- Flags: [PropertyReadable]
getDOMDOMWindowOuterHeight :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64
getDOMDOMWindowOuterHeight obj = liftIO $ getObjectPropertyInt64 obj "outer-height"
data DOMDOMWindowOuterHeightPropertyInfo
instance AttrInfo DOMDOMWindowOuterHeightPropertyInfo where
type AttrAllowedOps DOMDOMWindowOuterHeightPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowOuterHeightPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowOuterHeightPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowOuterHeightPropertyInfo = Int64
type AttrLabel DOMDOMWindowOuterHeightPropertyInfo = "DOMDOMWindow::outer-height"
attrGet _ = getDOMDOMWindowOuterHeight
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "outer-width"
-- Type: TBasicType TInt64
-- Flags: [PropertyReadable]
getDOMDOMWindowOuterWidth :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64
getDOMDOMWindowOuterWidth obj = liftIO $ getObjectPropertyInt64 obj "outer-width"
data DOMDOMWindowOuterWidthPropertyInfo
instance AttrInfo DOMDOMWindowOuterWidthPropertyInfo where
type AttrAllowedOps DOMDOMWindowOuterWidthPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowOuterWidthPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowOuterWidthPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowOuterWidthPropertyInfo = Int64
type AttrLabel DOMDOMWindowOuterWidthPropertyInfo = "DOMDOMWindow::outer-width"
attrGet _ = getDOMDOMWindowOuterWidth
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "page-x-offset"
-- Type: TBasicType TInt64
-- Flags: [PropertyReadable]
getDOMDOMWindowPageXOffset :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64
getDOMDOMWindowPageXOffset obj = liftIO $ getObjectPropertyInt64 obj "page-x-offset"
data DOMDOMWindowPageXOffsetPropertyInfo
instance AttrInfo DOMDOMWindowPageXOffsetPropertyInfo where
type AttrAllowedOps DOMDOMWindowPageXOffsetPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowPageXOffsetPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowPageXOffsetPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowPageXOffsetPropertyInfo = Int64
type AttrLabel DOMDOMWindowPageXOffsetPropertyInfo = "DOMDOMWindow::page-x-offset"
attrGet _ = getDOMDOMWindowPageXOffset
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "page-y-offset"
-- Type: TBasicType TInt64
-- Flags: [PropertyReadable]
getDOMDOMWindowPageYOffset :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64
getDOMDOMWindowPageYOffset obj = liftIO $ getObjectPropertyInt64 obj "page-y-offset"
data DOMDOMWindowPageYOffsetPropertyInfo
instance AttrInfo DOMDOMWindowPageYOffsetPropertyInfo where
type AttrAllowedOps DOMDOMWindowPageYOffsetPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowPageYOffsetPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowPageYOffsetPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowPageYOffsetPropertyInfo = Int64
type AttrLabel DOMDOMWindowPageYOffsetPropertyInfo = "DOMDOMWindow::page-y-offset"
attrGet _ = getDOMDOMWindowPageYOffset
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "parent"
-- Type: TInterface "WebKit" "DOMDOMWindow"
-- Flags: [PropertyReadable]
getDOMDOMWindowParent :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow
getDOMDOMWindowParent obj = liftIO $ getObjectPropertyObject obj "parent" DOMDOMWindow
data DOMDOMWindowParentPropertyInfo
instance AttrInfo DOMDOMWindowParentPropertyInfo where
type AttrAllowedOps DOMDOMWindowParentPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowParentPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowParentPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowParentPropertyInfo = DOMDOMWindow
type AttrLabel DOMDOMWindowParentPropertyInfo = "DOMDOMWindow::parent"
attrGet _ = getDOMDOMWindowParent
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "performance"
-- Type: TInterface "WebKit" "DOMPerformance"
-- Flags: [PropertyReadable]
getDOMDOMWindowPerformance :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMPerformance
getDOMDOMWindowPerformance obj = liftIO $ getObjectPropertyObject obj "performance" DOMPerformance
data DOMDOMWindowPerformancePropertyInfo
instance AttrInfo DOMDOMWindowPerformancePropertyInfo where
type AttrAllowedOps DOMDOMWindowPerformancePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowPerformancePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowPerformancePropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowPerformancePropertyInfo = DOMPerformance
type AttrLabel DOMDOMWindowPerformancePropertyInfo = "DOMDOMWindow::performance"
attrGet _ = getDOMDOMWindowPerformance
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "personalbar"
-- Type: TInterface "WebKit" "DOMBarProp"
-- Flags: [PropertyReadable]
getDOMDOMWindowPersonalbar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp
getDOMDOMWindowPersonalbar obj = liftIO $ getObjectPropertyObject obj "personalbar" DOMBarProp
data DOMDOMWindowPersonalbarPropertyInfo
instance AttrInfo DOMDOMWindowPersonalbarPropertyInfo where
type AttrAllowedOps DOMDOMWindowPersonalbarPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowPersonalbarPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowPersonalbarPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowPersonalbarPropertyInfo = DOMBarProp
type AttrLabel DOMDOMWindowPersonalbarPropertyInfo = "DOMDOMWindow::personalbar"
attrGet _ = getDOMDOMWindowPersonalbar
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "screen"
-- Type: TInterface "WebKit" "DOMScreen"
-- Flags: [PropertyReadable]
getDOMDOMWindowScreen :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMScreen
getDOMDOMWindowScreen obj = liftIO $ getObjectPropertyObject obj "screen" DOMScreen
data DOMDOMWindowScreenPropertyInfo
instance AttrInfo DOMDOMWindowScreenPropertyInfo where
type AttrAllowedOps DOMDOMWindowScreenPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowScreenPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowScreenPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowScreenPropertyInfo = DOMScreen
type AttrLabel DOMDOMWindowScreenPropertyInfo = "DOMDOMWindow::screen"
attrGet _ = getDOMDOMWindowScreen
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "screen-left"
-- Type: TBasicType TInt64
-- Flags: [PropertyReadable]
getDOMDOMWindowScreenLeft :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64
getDOMDOMWindowScreenLeft obj = liftIO $ getObjectPropertyInt64 obj "screen-left"
data DOMDOMWindowScreenLeftPropertyInfo
instance AttrInfo DOMDOMWindowScreenLeftPropertyInfo where
type AttrAllowedOps DOMDOMWindowScreenLeftPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowScreenLeftPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowScreenLeftPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowScreenLeftPropertyInfo = Int64
type AttrLabel DOMDOMWindowScreenLeftPropertyInfo = "DOMDOMWindow::screen-left"
attrGet _ = getDOMDOMWindowScreenLeft
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "screen-top"
-- Type: TBasicType TInt64
-- Flags: [PropertyReadable]
getDOMDOMWindowScreenTop :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64
getDOMDOMWindowScreenTop obj = liftIO $ getObjectPropertyInt64 obj "screen-top"
data DOMDOMWindowScreenTopPropertyInfo
instance AttrInfo DOMDOMWindowScreenTopPropertyInfo where
type AttrAllowedOps DOMDOMWindowScreenTopPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowScreenTopPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowScreenTopPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowScreenTopPropertyInfo = Int64
type AttrLabel DOMDOMWindowScreenTopPropertyInfo = "DOMDOMWindow::screen-top"
attrGet _ = getDOMDOMWindowScreenTop
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "screen-x"
-- Type: TBasicType TInt64
-- Flags: [PropertyReadable]
getDOMDOMWindowScreenX :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64
getDOMDOMWindowScreenX obj = liftIO $ getObjectPropertyInt64 obj "screen-x"
data DOMDOMWindowScreenXPropertyInfo
instance AttrInfo DOMDOMWindowScreenXPropertyInfo where
type AttrAllowedOps DOMDOMWindowScreenXPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowScreenXPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowScreenXPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowScreenXPropertyInfo = Int64
type AttrLabel DOMDOMWindowScreenXPropertyInfo = "DOMDOMWindow::screen-x"
attrGet _ = getDOMDOMWindowScreenX
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "screen-y"
-- Type: TBasicType TInt64
-- Flags: [PropertyReadable]
getDOMDOMWindowScreenY :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64
getDOMDOMWindowScreenY obj = liftIO $ getObjectPropertyInt64 obj "screen-y"
data DOMDOMWindowScreenYPropertyInfo
instance AttrInfo DOMDOMWindowScreenYPropertyInfo where
type AttrAllowedOps DOMDOMWindowScreenYPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowScreenYPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowScreenYPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowScreenYPropertyInfo = Int64
type AttrLabel DOMDOMWindowScreenYPropertyInfo = "DOMDOMWindow::screen-y"
attrGet _ = getDOMDOMWindowScreenY
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "scroll-x"
-- Type: TBasicType TInt64
-- Flags: [PropertyReadable]
getDOMDOMWindowScrollX :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64
getDOMDOMWindowScrollX obj = liftIO $ getObjectPropertyInt64 obj "scroll-x"
data DOMDOMWindowScrollXPropertyInfo
instance AttrInfo DOMDOMWindowScrollXPropertyInfo where
type AttrAllowedOps DOMDOMWindowScrollXPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowScrollXPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowScrollXPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowScrollXPropertyInfo = Int64
type AttrLabel DOMDOMWindowScrollXPropertyInfo = "DOMDOMWindow::scroll-x"
attrGet _ = getDOMDOMWindowScrollX
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "scroll-y"
-- Type: TBasicType TInt64
-- Flags: [PropertyReadable]
getDOMDOMWindowScrollY :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64
getDOMDOMWindowScrollY obj = liftIO $ getObjectPropertyInt64 obj "scroll-y"
data DOMDOMWindowScrollYPropertyInfo
instance AttrInfo DOMDOMWindowScrollYPropertyInfo where
type AttrAllowedOps DOMDOMWindowScrollYPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowScrollYPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowScrollYPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowScrollYPropertyInfo = Int64
type AttrLabel DOMDOMWindowScrollYPropertyInfo = "DOMDOMWindow::scroll-y"
attrGet _ = getDOMDOMWindowScrollY
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "scrollbars"
-- Type: TInterface "WebKit" "DOMBarProp"
-- Flags: [PropertyReadable]
getDOMDOMWindowScrollbars :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp
getDOMDOMWindowScrollbars obj = liftIO $ getObjectPropertyObject obj "scrollbars" DOMBarProp
data DOMDOMWindowScrollbarsPropertyInfo
instance AttrInfo DOMDOMWindowScrollbarsPropertyInfo where
type AttrAllowedOps DOMDOMWindowScrollbarsPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowScrollbarsPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowScrollbarsPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowScrollbarsPropertyInfo = DOMBarProp
type AttrLabel DOMDOMWindowScrollbarsPropertyInfo = "DOMDOMWindow::scrollbars"
attrGet _ = getDOMDOMWindowScrollbars
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "self"
-- Type: TInterface "WebKit" "DOMDOMWindow"
-- Flags: [PropertyReadable]
getDOMDOMWindowSelf :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow
getDOMDOMWindowSelf obj = liftIO $ getObjectPropertyObject obj "self" DOMDOMWindow
data DOMDOMWindowSelfPropertyInfo
instance AttrInfo DOMDOMWindowSelfPropertyInfo where
type AttrAllowedOps DOMDOMWindowSelfPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowSelfPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowSelfPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowSelfPropertyInfo = DOMDOMWindow
type AttrLabel DOMDOMWindowSelfPropertyInfo = "DOMDOMWindow::self"
attrGet _ = getDOMDOMWindowSelf
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "session-storage"
-- Type: TInterface "WebKit" "DOMStorage"
-- Flags: [PropertyReadable]
getDOMDOMWindowSessionStorage :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMStorage
getDOMDOMWindowSessionStorage obj = liftIO $ getObjectPropertyObject obj "session-storage" DOMStorage
data DOMDOMWindowSessionStoragePropertyInfo
instance AttrInfo DOMDOMWindowSessionStoragePropertyInfo where
type AttrAllowedOps DOMDOMWindowSessionStoragePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowSessionStoragePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowSessionStoragePropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowSessionStoragePropertyInfo = DOMStorage
type AttrLabel DOMDOMWindowSessionStoragePropertyInfo = "DOMDOMWindow::session-storage"
attrGet _ = getDOMDOMWindowSessionStorage
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "status"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
getDOMDOMWindowStatus :: (MonadIO m, DOMDOMWindowK o) => o -> m T.Text
getDOMDOMWindowStatus obj = liftIO $ getObjectPropertyString obj "status"
setDOMDOMWindowStatus :: (MonadIO m, DOMDOMWindowK o) => o -> T.Text -> m ()
setDOMDOMWindowStatus obj val = liftIO $ setObjectPropertyString obj "status" val
constructDOMDOMWindowStatus :: T.Text -> IO ([Char], GValue)
constructDOMDOMWindowStatus val = constructObjectPropertyString "status" val
data DOMDOMWindowStatusPropertyInfo
instance AttrInfo DOMDOMWindowStatusPropertyInfo where
type AttrAllowedOps DOMDOMWindowStatusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowStatusPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMDOMWindowStatusPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowStatusPropertyInfo = T.Text
type AttrLabel DOMDOMWindowStatusPropertyInfo = "DOMDOMWindow::status"
attrGet _ = getDOMDOMWindowStatus
attrSet _ = setDOMDOMWindowStatus
attrConstruct _ = constructDOMDOMWindowStatus
-- VVV Prop "statusbar"
-- Type: TInterface "WebKit" "DOMBarProp"
-- Flags: [PropertyReadable]
getDOMDOMWindowStatusbar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp
getDOMDOMWindowStatusbar obj = liftIO $ getObjectPropertyObject obj "statusbar" DOMBarProp
data DOMDOMWindowStatusbarPropertyInfo
instance AttrInfo DOMDOMWindowStatusbarPropertyInfo where
type AttrAllowedOps DOMDOMWindowStatusbarPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowStatusbarPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowStatusbarPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowStatusbarPropertyInfo = DOMBarProp
type AttrLabel DOMDOMWindowStatusbarPropertyInfo = "DOMDOMWindow::statusbar"
attrGet _ = getDOMDOMWindowStatusbar
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "style-media"
-- Type: TInterface "WebKit" "DOMStyleMedia"
-- Flags: [PropertyReadable]
getDOMDOMWindowStyleMedia :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMStyleMedia
getDOMDOMWindowStyleMedia obj = liftIO $ getObjectPropertyObject obj "style-media" DOMStyleMedia
data DOMDOMWindowStyleMediaPropertyInfo
instance AttrInfo DOMDOMWindowStyleMediaPropertyInfo where
type AttrAllowedOps DOMDOMWindowStyleMediaPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowStyleMediaPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowStyleMediaPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowStyleMediaPropertyInfo = DOMStyleMedia
type AttrLabel DOMDOMWindowStyleMediaPropertyInfo = "DOMDOMWindow::style-media"
attrGet _ = getDOMDOMWindowStyleMedia
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "toolbar"
-- Type: TInterface "WebKit" "DOMBarProp"
-- Flags: [PropertyReadable]
getDOMDOMWindowToolbar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp
getDOMDOMWindowToolbar obj = liftIO $ getObjectPropertyObject obj "toolbar" DOMBarProp
data DOMDOMWindowToolbarPropertyInfo
instance AttrInfo DOMDOMWindowToolbarPropertyInfo where
type AttrAllowedOps DOMDOMWindowToolbarPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowToolbarPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowToolbarPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowToolbarPropertyInfo = DOMBarProp
type AttrLabel DOMDOMWindowToolbarPropertyInfo = "DOMDOMWindow::toolbar"
attrGet _ = getDOMDOMWindowToolbar
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "top"
-- Type: TInterface "WebKit" "DOMDOMWindow"
-- Flags: [PropertyReadable]
getDOMDOMWindowTop :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow
getDOMDOMWindowTop obj = liftIO $ getObjectPropertyObject obj "top" DOMDOMWindow
data DOMDOMWindowTopPropertyInfo
instance AttrInfo DOMDOMWindowTopPropertyInfo where
type AttrAllowedOps DOMDOMWindowTopPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowTopPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowTopPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowTopPropertyInfo = DOMDOMWindow
type AttrLabel DOMDOMWindowTopPropertyInfo = "DOMDOMWindow::top"
attrGet _ = getDOMDOMWindowTop
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "webkit-storage-info"
-- Type: TInterface "WebKit" "DOMStorageInfo"
-- Flags: [PropertyReadable]
getDOMDOMWindowWebkitStorageInfo :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMStorageInfo
getDOMDOMWindowWebkitStorageInfo obj = liftIO $ getObjectPropertyObject obj "webkit-storage-info" DOMStorageInfo
data DOMDOMWindowWebkitStorageInfoPropertyInfo
instance AttrInfo DOMDOMWindowWebkitStorageInfoPropertyInfo where
type AttrAllowedOps DOMDOMWindowWebkitStorageInfoPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowWebkitStorageInfoPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowWebkitStorageInfoPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowWebkitStorageInfoPropertyInfo = DOMStorageInfo
type AttrLabel DOMDOMWindowWebkitStorageInfoPropertyInfo = "DOMDOMWindow::webkit-storage-info"
attrGet _ = getDOMDOMWindowWebkitStorageInfo
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "window"
-- Type: TInterface "WebKit" "DOMDOMWindow"
-- Flags: [PropertyReadable]
getDOMDOMWindowWindow :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow
getDOMDOMWindowWindow obj = liftIO $ getObjectPropertyObject obj "window" DOMDOMWindow
data DOMDOMWindowWindowPropertyInfo
instance AttrInfo DOMDOMWindowWindowPropertyInfo where
type AttrAllowedOps DOMDOMWindowWindowPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMDOMWindowWindowPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMDOMWindowWindowPropertyInfo = DOMDOMWindowK
type AttrGetType DOMDOMWindowWindowPropertyInfo = DOMDOMWindow
type AttrLabel DOMDOMWindowWindowPropertyInfo = "DOMDOMWindow::window"
attrGet _ = getDOMDOMWindowWindow
attrSet _ = undefined
attrConstruct _ = undefined
type instance AttributeList DOMDOMWindow = DOMDOMWindowAttributeList
type DOMDOMWindowAttributeList = ('[ '("application-cache", DOMDOMWindowApplicationCachePropertyInfo), '("client-information", DOMDOMWindowClientInformationPropertyInfo), '("closed", DOMDOMWindowClosedPropertyInfo), '("console", DOMDOMWindowConsolePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("css", DOMDOMWindowCssPropertyInfo), '("default-status", DOMDOMWindowDefaultStatusPropertyInfo), '("device-pixel-ratio", DOMDOMWindowDevicePixelRatioPropertyInfo), '("document", DOMDOMWindowDocumentPropertyInfo), '("frame-element", DOMDOMWindowFrameElementPropertyInfo), '("frames", DOMDOMWindowFramesPropertyInfo), '("history", DOMDOMWindowHistoryPropertyInfo), '("inner-height", DOMDOMWindowInnerHeightPropertyInfo), '("inner-width", DOMDOMWindowInnerWidthPropertyInfo), '("length", DOMDOMWindowLengthPropertyInfo), '("local-storage", DOMDOMWindowLocalStoragePropertyInfo), '("locationbar", DOMDOMWindowLocationbarPropertyInfo), '("menubar", DOMDOMWindowMenubarPropertyInfo), '("name", DOMDOMWindowNamePropertyInfo), '("navigator", DOMDOMWindowNavigatorPropertyInfo), '("offscreen-buffering", DOMDOMWindowOffscreenBufferingPropertyInfo), '("opener", DOMDOMWindowOpenerPropertyInfo), '("outer-height", DOMDOMWindowOuterHeightPropertyInfo), '("outer-width", DOMDOMWindowOuterWidthPropertyInfo), '("page-x-offset", DOMDOMWindowPageXOffsetPropertyInfo), '("page-y-offset", DOMDOMWindowPageYOffsetPropertyInfo), '("parent", DOMDOMWindowParentPropertyInfo), '("performance", DOMDOMWindowPerformancePropertyInfo), '("personalbar", DOMDOMWindowPersonalbarPropertyInfo), '("screen", DOMDOMWindowScreenPropertyInfo), '("screen-left", DOMDOMWindowScreenLeftPropertyInfo), '("screen-top", DOMDOMWindowScreenTopPropertyInfo), '("screen-x", DOMDOMWindowScreenXPropertyInfo), '("screen-y", DOMDOMWindowScreenYPropertyInfo), '("scroll-x", DOMDOMWindowScrollXPropertyInfo), '("scroll-y", DOMDOMWindowScrollYPropertyInfo), '("scrollbars", DOMDOMWindowScrollbarsPropertyInfo), '("self", DOMDOMWindowSelfPropertyInfo), '("session-storage", DOMDOMWindowSessionStoragePropertyInfo), '("status", DOMDOMWindowStatusPropertyInfo), '("statusbar", DOMDOMWindowStatusbarPropertyInfo), '("style-media", DOMDOMWindowStyleMediaPropertyInfo), '("toolbar", DOMDOMWindowToolbarPropertyInfo), '("top", DOMDOMWindowTopPropertyInfo), '("webkit-storage-info", DOMDOMWindowWebkitStorageInfoPropertyInfo), '("window", DOMDOMWindowWindowPropertyInfo)] :: [(Symbol, *)])
type instance SignalList DOMDOMWindow = DOMDOMWindowSignalList
type DOMDOMWindowSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)])
-- method DOMDOMWindow::alert
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "message", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "message", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_alert" webkit_dom_dom_window_alert ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
CString -> -- message : TBasicType TUTF8
IO ()
dOMDOMWindowAlert ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
T.Text -> -- message
m ()
dOMDOMWindowAlert _obj message = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
message' <- textToCString message
webkit_dom_dom_window_alert _obj' message'
touchManagedPtr _obj
freeMem message'
return ()
-- method DOMDOMWindow::atob
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TUTF8
-- throws : True
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_atob" webkit_dom_dom_window_atob ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
CString -> -- string : TBasicType TUTF8
Ptr (Ptr GError) -> -- error
IO CString
dOMDOMWindowAtob ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
T.Text -> -- string
m T.Text
dOMDOMWindowAtob _obj string = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
string' <- textToCString string
onException (do
result <- propagateGError $ webkit_dom_dom_window_atob _obj' string'
checkUnexpectedReturnNULL "webkit_dom_dom_window_atob" result
result' <- cstringToText result
freeMem result
touchManagedPtr _obj
freeMem string'
return result'
) (do
freeMem string'
)
-- method DOMDOMWindow::blur
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_blur" webkit_dom_dom_window_blur ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO ()
dOMDOMWindowBlur ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m ()
dOMDOMWindowBlur _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_dom_window_blur _obj'
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::btoa
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TUTF8
-- throws : True
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_btoa" webkit_dom_dom_window_btoa ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
CString -> -- string : TBasicType TUTF8
Ptr (Ptr GError) -> -- error
IO CString
dOMDOMWindowBtoa ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
T.Text -> -- string
m T.Text
dOMDOMWindowBtoa _obj string = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
string' <- textToCString string
onException (do
result <- propagateGError $ webkit_dom_dom_window_btoa _obj' string'
checkUnexpectedReturnNULL "webkit_dom_dom_window_btoa" result
result' <- cstringToText result
freeMem result
touchManagedPtr _obj
freeMem string'
return result'
) (do
freeMem string'
)
-- method DOMDOMWindow::cancel_animation_frame
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_cancel_animation_frame" webkit_dom_dom_window_cancel_animation_frame ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
Int64 -> -- id : TBasicType TInt64
IO ()
dOMDOMWindowCancelAnimationFrame ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
Int64 -> -- id
m ()
dOMDOMWindowCancelAnimationFrame _obj id = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_dom_window_cancel_animation_frame _obj' id
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::capture_events
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_capture_events" webkit_dom_dom_window_capture_events ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO ()
dOMDOMWindowCaptureEvents ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m ()
dOMDOMWindowCaptureEvents _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_dom_window_capture_events _obj'
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::clear_interval
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "handle", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "handle", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_clear_interval" webkit_dom_dom_window_clear_interval ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
Int64 -> -- handle : TBasicType TInt64
IO ()
dOMDOMWindowClearInterval ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
Int64 -> -- handle
m ()
dOMDOMWindowClearInterval _obj handle = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_dom_window_clear_interval _obj' handle
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::clear_timeout
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "handle", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "handle", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_clear_timeout" webkit_dom_dom_window_clear_timeout ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
Int64 -> -- handle : TBasicType TInt64
IO ()
dOMDOMWindowClearTimeout ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
Int64 -> -- handle
m ()
dOMDOMWindowClearTimeout _obj handle = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_dom_window_clear_timeout _obj' handle
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::close
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_close" webkit_dom_dom_window_close ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO ()
dOMDOMWindowClose ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m ()
dOMDOMWindowClose _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_dom_window_close _obj'
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::confirm
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "message", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "message", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TBoolean
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_confirm" webkit_dom_dom_window_confirm ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
CString -> -- message : TBasicType TUTF8
IO CInt
dOMDOMWindowConfirm ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
T.Text -> -- message
m Bool
dOMDOMWindowConfirm _obj message = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
message' <- textToCString message
result <- webkit_dom_dom_window_confirm _obj' message'
let result' = (/= 0) result
touchManagedPtr _obj
freeMem message'
return result'
-- method DOMDOMWindow::dispatch_event
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TBoolean
-- throws : True
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_dispatch_event" webkit_dom_dom_window_dispatch_event ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
Ptr DOMEvent -> -- evt : TInterface "WebKit" "DOMEvent"
Ptr (Ptr GError) -> -- error
IO CInt
{-# DEPRECATED dOMDOMWindowDispatchEvent ["(Since version 2.4)","Use webkit_dom_event_target_dispatch_event() instead."]#-}
dOMDOMWindowDispatchEvent ::
(MonadIO m, DOMDOMWindowK a, DOMEventK b) =>
a -> -- _obj
b -> -- evt
m ()
dOMDOMWindowDispatchEvent _obj evt = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let evt' = unsafeManagedPtrCastPtr evt
onException (do
_ <- propagateGError $ webkit_dom_dom_window_dispatch_event _obj' evt'
touchManagedPtr _obj
touchManagedPtr evt
return ()
) (do
return ()
)
-- method DOMDOMWindow::find
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "caseSensitive", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "backwards", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "wrap", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "wholeWord", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "searchInFrames", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "showDialog", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "caseSensitive", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "backwards", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "wrap", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "wholeWord", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "searchInFrames", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "showDialog", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TBoolean
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_find" webkit_dom_dom_window_find ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
CString -> -- string : TBasicType TUTF8
CInt -> -- caseSensitive : TBasicType TBoolean
CInt -> -- backwards : TBasicType TBoolean
CInt -> -- wrap : TBasicType TBoolean
CInt -> -- wholeWord : TBasicType TBoolean
CInt -> -- searchInFrames : TBasicType TBoolean
CInt -> -- showDialog : TBasicType TBoolean
IO CInt
dOMDOMWindowFind ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
T.Text -> -- string
Bool -> -- caseSensitive
Bool -> -- backwards
Bool -> -- wrap
Bool -> -- wholeWord
Bool -> -- searchInFrames
Bool -> -- showDialog
m Bool
dOMDOMWindowFind _obj string caseSensitive backwards wrap wholeWord searchInFrames showDialog = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
string' <- textToCString string
let caseSensitive' = (fromIntegral . fromEnum) caseSensitive
let backwards' = (fromIntegral . fromEnum) backwards
let wrap' = (fromIntegral . fromEnum) wrap
let wholeWord' = (fromIntegral . fromEnum) wholeWord
let searchInFrames' = (fromIntegral . fromEnum) searchInFrames
let showDialog' = (fromIntegral . fromEnum) showDialog
result <- webkit_dom_dom_window_find _obj' string' caseSensitive' backwards' wrap' wholeWord' searchInFrames' showDialog'
let result' = (/= 0) result
touchManagedPtr _obj
freeMem string'
return result'
-- method DOMDOMWindow::focus
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_focus" webkit_dom_dom_window_focus ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO ()
dOMDOMWindowFocus ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m ()
dOMDOMWindowFocus _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_dom_window_focus _obj'
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::get_application_cache
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMDOMApplicationCache"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_application_cache" webkit_dom_dom_window_get_application_cache ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMDOMApplicationCache)
dOMDOMWindowGetApplicationCache ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMDOMApplicationCache
dOMDOMWindowGetApplicationCache _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_application_cache _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_application_cache" result
result' <- (wrapObject DOMDOMApplicationCache) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_client_information
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMNavigator"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_client_information" webkit_dom_dom_window_get_client_information ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMNavigator)
dOMDOMWindowGetClientInformation ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMNavigator
dOMDOMWindowGetClientInformation _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_client_information _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_client_information" result
result' <- (wrapObject DOMNavigator) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_closed
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TBoolean
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_closed" webkit_dom_dom_window_get_closed ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO CInt
dOMDOMWindowGetClosed ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m Bool
dOMDOMWindowGetClosed _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_closed _obj'
let result' = (/= 0) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_computed_style
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "element", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "pseudoElement", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "element", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "pseudoElement", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMCSSStyleDeclaration"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_computed_style" webkit_dom_dom_window_get_computed_style ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
Ptr DOMElement -> -- element : TInterface "WebKit" "DOMElement"
CString -> -- pseudoElement : TBasicType TUTF8
IO (Ptr DOMCSSStyleDeclaration)
dOMDOMWindowGetComputedStyle ::
(MonadIO m, DOMDOMWindowK a, DOMElementK b) =>
a -> -- _obj
b -> -- element
Maybe (T.Text) -> -- pseudoElement
m DOMCSSStyleDeclaration
dOMDOMWindowGetComputedStyle _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_dom_window_get_computed_style _obj' element' maybePseudoElement
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_computed_style" result
result' <- (wrapObject DOMCSSStyleDeclaration) result
touchManagedPtr _obj
touchManagedPtr element
freeMem maybePseudoElement
return result'
-- method DOMDOMWindow::get_console
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMConsole"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_console" webkit_dom_dom_window_get_console ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMConsole)
dOMDOMWindowGetConsole ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMConsole
dOMDOMWindowGetConsole _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_console _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_console" result
result' <- (newObject DOMConsole) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_css
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMDOMWindowCSS"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_css" webkit_dom_dom_window_get_css ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMDOMWindowCSS)
dOMDOMWindowGetCss ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMDOMWindowCSS
dOMDOMWindowGetCss _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_css _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_css" result
result' <- (wrapObject DOMDOMWindowCSS) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_default_status
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TUTF8
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_default_status" webkit_dom_dom_window_get_default_status ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO CString
dOMDOMWindowGetDefaultStatus ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m T.Text
dOMDOMWindowGetDefaultStatus _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_default_status _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_default_status" result
result' <- cstringToText result
freeMem result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_device_pixel_ratio
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TDouble
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_device_pixel_ratio" webkit_dom_dom_window_get_device_pixel_ratio ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO CDouble
dOMDOMWindowGetDevicePixelRatio ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m Double
dOMDOMWindowGetDevicePixelRatio _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_device_pixel_ratio _obj'
let result' = realToFrac result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_document
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMDocument"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_document" webkit_dom_dom_window_get_document ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMDocument)
dOMDOMWindowGetDocument ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMDocument
dOMDOMWindowGetDocument _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_document _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_document" result
result' <- (newObject DOMDocument) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_frame_element
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMElement"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_frame_element" webkit_dom_dom_window_get_frame_element ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMElement)
dOMDOMWindowGetFrameElement ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMElement
dOMDOMWindowGetFrameElement _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_frame_element _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_frame_element" result
result' <- (newObject DOMElement) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_frames
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMDOMWindow"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_frames" webkit_dom_dom_window_get_frames ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMDOMWindow)
dOMDOMWindowGetFrames ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMDOMWindow
dOMDOMWindowGetFrames _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_frames _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_frames" result
result' <- (wrapObject DOMDOMWindow) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_history
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMHistory"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_history" webkit_dom_dom_window_get_history ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMHistory)
dOMDOMWindowGetHistory ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMHistory
dOMDOMWindowGetHistory _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_history _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_history" result
result' <- (wrapObject DOMHistory) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_inner_height
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TInt64
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_inner_height" webkit_dom_dom_window_get_inner_height ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO Int64
dOMDOMWindowGetInnerHeight ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m Int64
dOMDOMWindowGetInnerHeight _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_inner_height _obj'
touchManagedPtr _obj
return result
-- method DOMDOMWindow::get_inner_width
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TInt64
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_inner_width" webkit_dom_dom_window_get_inner_width ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO Int64
dOMDOMWindowGetInnerWidth ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m Int64
dOMDOMWindowGetInnerWidth _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_inner_width _obj'
touchManagedPtr _obj
return result
-- method DOMDOMWindow::get_length
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TUInt64
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_length" webkit_dom_dom_window_get_length ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO Word64
dOMDOMWindowGetLength ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m Word64
dOMDOMWindowGetLength _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_length _obj'
touchManagedPtr _obj
return result
-- method DOMDOMWindow::get_local_storage
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMStorage"
-- throws : True
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_local_storage" webkit_dom_dom_window_get_local_storage ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
Ptr (Ptr GError) -> -- error
IO (Ptr DOMStorage)
dOMDOMWindowGetLocalStorage ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMStorage
dOMDOMWindowGetLocalStorage _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
onException (do
result <- propagateGError $ webkit_dom_dom_window_get_local_storage _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_local_storage" result
result' <- (wrapObject DOMStorage) result
touchManagedPtr _obj
return result'
) (do
return ()
)
-- method DOMDOMWindow::get_locationbar
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMBarProp"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_locationbar" webkit_dom_dom_window_get_locationbar ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMBarProp)
dOMDOMWindowGetLocationbar ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMBarProp
dOMDOMWindowGetLocationbar _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_locationbar _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_locationbar" result
result' <- (wrapObject DOMBarProp) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_menubar
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMBarProp"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_menubar" webkit_dom_dom_window_get_menubar ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMBarProp)
dOMDOMWindowGetMenubar ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMBarProp
dOMDOMWindowGetMenubar _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_menubar _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_menubar" result
result' <- (wrapObject DOMBarProp) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_name
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TUTF8
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_name" webkit_dom_dom_window_get_name ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO CString
dOMDOMWindowGetName ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m T.Text
dOMDOMWindowGetName _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_name _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_name" result
result' <- cstringToText result
freeMem result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_navigator
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMNavigator"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_navigator" webkit_dom_dom_window_get_navigator ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMNavigator)
dOMDOMWindowGetNavigator ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMNavigator
dOMDOMWindowGetNavigator _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_navigator _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_navigator" result
result' <- (wrapObject DOMNavigator) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_offscreen_buffering
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TBoolean
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_offscreen_buffering" webkit_dom_dom_window_get_offscreen_buffering ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO CInt
dOMDOMWindowGetOffscreenBuffering ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m Bool
dOMDOMWindowGetOffscreenBuffering _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_offscreen_buffering _obj'
let result' = (/= 0) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_opener
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMDOMWindow"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_opener" webkit_dom_dom_window_get_opener ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMDOMWindow)
dOMDOMWindowGetOpener ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMDOMWindow
dOMDOMWindowGetOpener _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_opener _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_opener" result
result' <- (wrapObject DOMDOMWindow) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_outer_height
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TInt64
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_outer_height" webkit_dom_dom_window_get_outer_height ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO Int64
dOMDOMWindowGetOuterHeight ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m Int64
dOMDOMWindowGetOuterHeight _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_outer_height _obj'
touchManagedPtr _obj
return result
-- method DOMDOMWindow::get_outer_width
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TInt64
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_outer_width" webkit_dom_dom_window_get_outer_width ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO Int64
dOMDOMWindowGetOuterWidth ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m Int64
dOMDOMWindowGetOuterWidth _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_outer_width _obj'
touchManagedPtr _obj
return result
-- method DOMDOMWindow::get_page_x_offset
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TInt64
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_page_x_offset" webkit_dom_dom_window_get_page_x_offset ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO Int64
dOMDOMWindowGetPageXOffset ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m Int64
dOMDOMWindowGetPageXOffset _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_page_x_offset _obj'
touchManagedPtr _obj
return result
-- method DOMDOMWindow::get_page_y_offset
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TInt64
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_page_y_offset" webkit_dom_dom_window_get_page_y_offset ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO Int64
dOMDOMWindowGetPageYOffset ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m Int64
dOMDOMWindowGetPageYOffset _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_page_y_offset _obj'
touchManagedPtr _obj
return result
-- method DOMDOMWindow::get_parent
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMDOMWindow"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_parent" webkit_dom_dom_window_get_parent ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMDOMWindow)
dOMDOMWindowGetParent ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMDOMWindow
dOMDOMWindowGetParent _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_parent _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_parent" result
result' <- (wrapObject DOMDOMWindow) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_performance
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMPerformance"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_performance" webkit_dom_dom_window_get_performance ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMPerformance)
dOMDOMWindowGetPerformance ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMPerformance
dOMDOMWindowGetPerformance _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_performance _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_performance" result
result' <- (wrapObject DOMPerformance) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_personalbar
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMBarProp"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_personalbar" webkit_dom_dom_window_get_personalbar ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMBarProp)
dOMDOMWindowGetPersonalbar ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMBarProp
dOMDOMWindowGetPersonalbar _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_personalbar _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_personalbar" result
result' <- (wrapObject DOMBarProp) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_screen
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMScreen"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_screen" webkit_dom_dom_window_get_screen ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMScreen)
dOMDOMWindowGetScreen ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMScreen
dOMDOMWindowGetScreen _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_screen _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_screen" result
result' <- (wrapObject DOMScreen) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_screen_left
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TInt64
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_screen_left" webkit_dom_dom_window_get_screen_left ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO Int64
dOMDOMWindowGetScreenLeft ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m Int64
dOMDOMWindowGetScreenLeft _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_screen_left _obj'
touchManagedPtr _obj
return result
-- method DOMDOMWindow::get_screen_top
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TInt64
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_screen_top" webkit_dom_dom_window_get_screen_top ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO Int64
dOMDOMWindowGetScreenTop ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m Int64
dOMDOMWindowGetScreenTop _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_screen_top _obj'
touchManagedPtr _obj
return result
-- method DOMDOMWindow::get_screen_x
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TInt64
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_screen_x" webkit_dom_dom_window_get_screen_x ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO Int64
dOMDOMWindowGetScreenX ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m Int64
dOMDOMWindowGetScreenX _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_screen_x _obj'
touchManagedPtr _obj
return result
-- method DOMDOMWindow::get_screen_y
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TInt64
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_screen_y" webkit_dom_dom_window_get_screen_y ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO Int64
dOMDOMWindowGetScreenY ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m Int64
dOMDOMWindowGetScreenY _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_screen_y _obj'
touchManagedPtr _obj
return result
-- method DOMDOMWindow::get_scroll_x
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TInt64
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_scroll_x" webkit_dom_dom_window_get_scroll_x ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO Int64
dOMDOMWindowGetScrollX ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m Int64
dOMDOMWindowGetScrollX _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_scroll_x _obj'
touchManagedPtr _obj
return result
-- method DOMDOMWindow::get_scroll_y
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TInt64
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_scroll_y" webkit_dom_dom_window_get_scroll_y ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO Int64
dOMDOMWindowGetScrollY ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m Int64
dOMDOMWindowGetScrollY _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_scroll_y _obj'
touchManagedPtr _obj
return result
-- method DOMDOMWindow::get_scrollbars
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMBarProp"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_scrollbars" webkit_dom_dom_window_get_scrollbars ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMBarProp)
dOMDOMWindowGetScrollbars ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMBarProp
dOMDOMWindowGetScrollbars _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_scrollbars _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_scrollbars" result
result' <- (wrapObject DOMBarProp) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_selection
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMDOMSelection"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_selection" webkit_dom_dom_window_get_selection ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMDOMSelection)
dOMDOMWindowGetSelection ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMDOMSelection
dOMDOMWindowGetSelection _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_selection _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_selection" result
result' <- (wrapObject DOMDOMSelection) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_self
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMDOMWindow"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_self" webkit_dom_dom_window_get_self ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMDOMWindow)
dOMDOMWindowGetSelf ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMDOMWindow
dOMDOMWindowGetSelf _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_self _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_self" result
result' <- (wrapObject DOMDOMWindow) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_session_storage
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMStorage"
-- throws : True
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_session_storage" webkit_dom_dom_window_get_session_storage ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
Ptr (Ptr GError) -> -- error
IO (Ptr DOMStorage)
dOMDOMWindowGetSessionStorage ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMStorage
dOMDOMWindowGetSessionStorage _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
onException (do
result <- propagateGError $ webkit_dom_dom_window_get_session_storage _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_session_storage" result
result' <- (wrapObject DOMStorage) result
touchManagedPtr _obj
return result'
) (do
return ()
)
-- method DOMDOMWindow::get_status
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TUTF8
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_status" webkit_dom_dom_window_get_status ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO CString
dOMDOMWindowGetStatus ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m T.Text
dOMDOMWindowGetStatus _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_status _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_status" result
result' <- cstringToText result
freeMem result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_statusbar
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMBarProp"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_statusbar" webkit_dom_dom_window_get_statusbar ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMBarProp)
dOMDOMWindowGetStatusbar ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMBarProp
dOMDOMWindowGetStatusbar _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_statusbar _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_statusbar" result
result' <- (wrapObject DOMBarProp) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_style_media
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMStyleMedia"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_style_media" webkit_dom_dom_window_get_style_media ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMStyleMedia)
dOMDOMWindowGetStyleMedia ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMStyleMedia
dOMDOMWindowGetStyleMedia _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_style_media _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_style_media" result
result' <- (wrapObject DOMStyleMedia) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_toolbar
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMBarProp"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_toolbar" webkit_dom_dom_window_get_toolbar ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMBarProp)
dOMDOMWindowGetToolbar ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMBarProp
dOMDOMWindowGetToolbar _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_toolbar _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_toolbar" result
result' <- (wrapObject DOMBarProp) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_top
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMDOMWindow"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_top" webkit_dom_dom_window_get_top ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMDOMWindow)
dOMDOMWindowGetTop ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMDOMWindow
dOMDOMWindowGetTop _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_top _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_top" result
result' <- (wrapObject DOMDOMWindow) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_webkit_storage_info
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMStorageInfo"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_webkit_storage_info" webkit_dom_dom_window_get_webkit_storage_info ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMStorageInfo)
dOMDOMWindowGetWebkitStorageInfo ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMStorageInfo
dOMDOMWindowGetWebkitStorageInfo _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_webkit_storage_info _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_webkit_storage_info" result
result' <- (newObject DOMStorageInfo) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::get_window
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMDOMWindow"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_get_window" webkit_dom_dom_window_get_window ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO (Ptr DOMDOMWindow)
dOMDOMWindowGetWindow ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m DOMDOMWindow
dOMDOMWindowGetWindow _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_dom_window_get_window _obj'
checkUnexpectedReturnNULL "webkit_dom_dom_window_get_window" result
result' <- (wrapObject DOMDOMWindow) result
touchManagedPtr _obj
return result'
-- method DOMDOMWindow::match_media
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "query", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "query", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMMediaQueryList"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_match_media" webkit_dom_dom_window_match_media ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
CString -> -- query : TBasicType TUTF8
IO (Ptr DOMMediaQueryList)
dOMDOMWindowMatchMedia ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
T.Text -> -- query
m DOMMediaQueryList
dOMDOMWindowMatchMedia _obj query = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
query' <- textToCString query
result <- webkit_dom_dom_window_match_media _obj' query'
checkUnexpectedReturnNULL "webkit_dom_dom_window_match_media" result
result' <- (wrapObject DOMMediaQueryList) result
touchManagedPtr _obj
freeMem query'
return result'
-- method DOMDOMWindow::move_by
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_move_by" webkit_dom_dom_window_move_by ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
CFloat -> -- x : TBasicType TFloat
CFloat -> -- y : TBasicType TFloat
IO ()
dOMDOMWindowMoveBy ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
Float -> -- x
Float -> -- y
m ()
dOMDOMWindowMoveBy _obj x y = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let x' = realToFrac x
let y' = realToFrac y
webkit_dom_dom_window_move_by _obj' x' y'
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::move_to
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_move_to" webkit_dom_dom_window_move_to ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
CFloat -> -- x : TBasicType TFloat
CFloat -> -- y : TBasicType TFloat
IO ()
dOMDOMWindowMoveTo ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
Float -> -- x
Float -> -- y
m ()
dOMDOMWindowMoveTo _obj x y = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let x' = realToFrac x
let y' = realToFrac y
webkit_dom_dom_window_move_to _obj' x' y'
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::print
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_print" webkit_dom_dom_window_print ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO ()
dOMDOMWindowPrint ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m ()
dOMDOMWindowPrint _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_dom_window_print _obj'
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::prompt
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "message", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "defaultValue", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "message", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "defaultValue", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TUTF8
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_prompt" webkit_dom_dom_window_prompt ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
CString -> -- message : TBasicType TUTF8
CString -> -- defaultValue : TBasicType TUTF8
IO CString
dOMDOMWindowPrompt ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
T.Text -> -- message
T.Text -> -- defaultValue
m T.Text
dOMDOMWindowPrompt _obj message defaultValue = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
message' <- textToCString message
defaultValue' <- textToCString defaultValue
result <- webkit_dom_dom_window_prompt _obj' message' defaultValue'
checkUnexpectedReturnNULL "webkit_dom_dom_window_prompt" result
result' <- cstringToText result
freeMem result
touchManagedPtr _obj
freeMem message'
freeMem defaultValue'
return result'
-- method DOMDOMWindow::release_events
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_release_events" webkit_dom_dom_window_release_events ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO ()
dOMDOMWindowReleaseEvents ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m ()
dOMDOMWindowReleaseEvents _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_dom_window_release_events _obj'
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::resize_by
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_resize_by" webkit_dom_dom_window_resize_by ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
CFloat -> -- x : TBasicType TFloat
CFloat -> -- y : TBasicType TFloat
IO ()
dOMDOMWindowResizeBy ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
Float -> -- x
Float -> -- y
m ()
dOMDOMWindowResizeBy _obj x y = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let x' = realToFrac x
let y' = realToFrac y
webkit_dom_dom_window_resize_by _obj' x' y'
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::resize_to
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "width", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "height", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "width", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "height", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_resize_to" webkit_dom_dom_window_resize_to ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
CFloat -> -- width : TBasicType TFloat
CFloat -> -- height : TBasicType TFloat
IO ()
dOMDOMWindowResizeTo ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
Float -> -- width
Float -> -- height
m ()
dOMDOMWindowResizeTo _obj width height = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let width' = realToFrac width
let height' = realToFrac height
webkit_dom_dom_window_resize_to _obj' width' height'
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::scroll
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_scroll" webkit_dom_dom_window_scroll ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
Int64 -> -- x : TBasicType TInt64
Int64 -> -- y : TBasicType TInt64
IO ()
dOMDOMWindowScroll ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
Int64 -> -- x
Int64 -> -- y
m ()
dOMDOMWindowScroll _obj x y = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_dom_window_scroll _obj' x y
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::scroll_by
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_scroll_by" webkit_dom_dom_window_scroll_by ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
Int64 -> -- x : TBasicType TInt64
Int64 -> -- y : TBasicType TInt64
IO ()
dOMDOMWindowScrollBy ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
Int64 -> -- x
Int64 -> -- y
m ()
dOMDOMWindowScrollBy _obj x y = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_dom_window_scroll_by _obj' x y
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::scroll_to
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_scroll_to" webkit_dom_dom_window_scroll_to ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
Int64 -> -- x : TBasicType TInt64
Int64 -> -- y : TBasicType TInt64
IO ()
dOMDOMWindowScrollTo ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
Int64 -> -- x
Int64 -> -- y
m ()
dOMDOMWindowScrollTo _obj x y = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_dom_window_scroll_to _obj' x y
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::set_default_status
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_set_default_status" webkit_dom_dom_window_set_default_status ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
CString -> -- value : TBasicType TUTF8
IO ()
dOMDOMWindowSetDefaultStatus ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
T.Text -> -- value
m ()
dOMDOMWindowSetDefaultStatus _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
value' <- textToCString value
webkit_dom_dom_window_set_default_status _obj' value'
touchManagedPtr _obj
freeMem value'
return ()
-- method DOMDOMWindow::set_name
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_set_name" webkit_dom_dom_window_set_name ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
CString -> -- value : TBasicType TUTF8
IO ()
dOMDOMWindowSetName ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
T.Text -> -- value
m ()
dOMDOMWindowSetName _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
value' <- textToCString value
webkit_dom_dom_window_set_name _obj' value'
touchManagedPtr _obj
freeMem value'
return ()
-- method DOMDOMWindow::set_status
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_set_status" webkit_dom_dom_window_set_status ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
CString -> -- value : TBasicType TUTF8
IO ()
dOMDOMWindowSetStatus ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
T.Text -> -- value
m ()
dOMDOMWindowSetStatus _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
value' <- textToCString value
webkit_dom_dom_window_set_status _obj' value'
touchManagedPtr _obj
freeMem value'
return ()
-- method DOMDOMWindow::stop
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_stop" webkit_dom_dom_window_stop ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
IO ()
dOMDOMWindowStop ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
m ()
dOMDOMWindowStop _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_dom_window_stop _obj'
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::webkit_cancel_animation_frame
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_webkit_cancel_animation_frame" webkit_dom_dom_window_webkit_cancel_animation_frame ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
Int64 -> -- id : TBasicType TInt64
IO ()
dOMDOMWindowWebkitCancelAnimationFrame ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
Int64 -> -- id
m ()
dOMDOMWindowWebkitCancelAnimationFrame _obj id = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_dom_window_webkit_cancel_animation_frame _obj' id
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::webkit_cancel_request_animation_frame
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_webkit_cancel_request_animation_frame" webkit_dom_dom_window_webkit_cancel_request_animation_frame ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
Int64 -> -- id : TBasicType TInt64
IO ()
dOMDOMWindowWebkitCancelRequestAnimationFrame ::
(MonadIO m, DOMDOMWindowK a) =>
a -> -- _obj
Int64 -> -- id
m ()
dOMDOMWindowWebkitCancelRequestAnimationFrame _obj id = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_dom_window_webkit_cancel_request_animation_frame _obj' id
touchManagedPtr _obj
return ()
-- method DOMDOMWindow::webkit_convert_point_from_node_to_page
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "p", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "p", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMWebKitPoint"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_webkit_convert_point_from_node_to_page" webkit_dom_dom_window_webkit_convert_point_from_node_to_page ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
Ptr DOMNode -> -- node : TInterface "WebKit" "DOMNode"
Ptr DOMWebKitPoint -> -- p : TInterface "WebKit" "DOMWebKitPoint"
IO (Ptr DOMWebKitPoint)
dOMDOMWindowWebkitConvertPointFromNodeToPage ::
(MonadIO m, DOMDOMWindowK a, DOMNodeK b, DOMWebKitPointK c) =>
a -> -- _obj
b -> -- node
c -> -- p
m DOMWebKitPoint
dOMDOMWindowWebkitConvertPointFromNodeToPage _obj node p = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let node' = unsafeManagedPtrCastPtr node
let p' = unsafeManagedPtrCastPtr p
result <- webkit_dom_dom_window_webkit_convert_point_from_node_to_page _obj' node' p'
checkUnexpectedReturnNULL "webkit_dom_dom_window_webkit_convert_point_from_node_to_page" result
result' <- (wrapObject DOMWebKitPoint) result
touchManagedPtr _obj
touchManagedPtr node
touchManagedPtr p
return result'
-- method DOMDOMWindow::webkit_convert_point_from_page_to_node
-- method type : OrdinaryMethod
-- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "p", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- Lengths : []
-- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "p", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}]
-- returnType : TInterface "WebKit" "DOMWebKitPoint"
-- throws : False
-- Skip return : False
foreign import ccall "webkit_dom_dom_window_webkit_convert_point_from_page_to_node" webkit_dom_dom_window_webkit_convert_point_from_page_to_node ::
Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow"
Ptr DOMNode -> -- node : TInterface "WebKit" "DOMNode"
Ptr DOMWebKitPoint -> -- p : TInterface "WebKit" "DOMWebKitPoint"
IO (Ptr DOMWebKitPoint)
dOMDOMWindowWebkitConvertPointFromPageToNode ::
(MonadIO m, DOMDOMWindowK a, DOMNodeK b, DOMWebKitPointK c) =>
a -> -- _obj
b -> -- node
c -> -- p
m DOMWebKitPoint
dOMDOMWindowWebkitConvertPointFromPageToNode _obj node p = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let node' = unsafeManagedPtrCastPtr node
let p' = unsafeManagedPtrCastPtr p
result <- webkit_dom_dom_window_webkit_convert_point_from_page_to_node _obj' node' p'
checkUnexpectedReturnNULL "webkit_dom_dom_window_webkit_convert_point_from_page_to_node" result
result' <- (wrapObject DOMWebKitPoint) result
touchManagedPtr _obj
touchManagedPtr node
touchManagedPtr p
return result'