{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.WebKit2WebExtension.Objects.DOMDOMWindow
(
DOMDOMWindow(..) ,
IsDOMDOMWindow ,
toDOMDOMWindow ,
noDOMDOMWindow ,
#if defined(ENABLE_OVERLOADING)
ResolveDOMDOMWindowMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowAlertMethodInfo ,
#endif
dOMDOMWindowAlert ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowBlurMethodInfo ,
#endif
dOMDOMWindowBlur ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowCaptureEventsMethodInfo ,
#endif
dOMDOMWindowCaptureEvents ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowCloseMethodInfo ,
#endif
dOMDOMWindowClose ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowConfirmMethodInfo ,
#endif
dOMDOMWindowConfirm ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowFindMethodInfo ,
#endif
dOMDOMWindowFind ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowFocusMethodInfo ,
#endif
dOMDOMWindowFocus ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetClosedMethodInfo ,
#endif
dOMDOMWindowGetClosed ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetComputedStyleMethodInfo ,
#endif
dOMDOMWindowGetComputedStyle ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetDefaultStatusMethodInfo ,
#endif
dOMDOMWindowGetDefaultStatus ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetDevicePixelRatioMethodInfo,
#endif
dOMDOMWindowGetDevicePixelRatio ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetDocumentMethodInfo ,
#endif
dOMDOMWindowGetDocument ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetFrameElementMethodInfo ,
#endif
dOMDOMWindowGetFrameElement ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetFramesMethodInfo ,
#endif
dOMDOMWindowGetFrames ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetInnerHeightMethodInfo ,
#endif
dOMDOMWindowGetInnerHeight ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetInnerWidthMethodInfo ,
#endif
dOMDOMWindowGetInnerWidth ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetLengthMethodInfo ,
#endif
dOMDOMWindowGetLength ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetNameMethodInfo ,
#endif
dOMDOMWindowGetName ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetOffscreenBufferingMethodInfo,
#endif
dOMDOMWindowGetOffscreenBuffering ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetOpenerMethodInfo ,
#endif
dOMDOMWindowGetOpener ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetOrientationMethodInfo ,
#endif
dOMDOMWindowGetOrientation ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetOuterHeightMethodInfo ,
#endif
dOMDOMWindowGetOuterHeight ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetOuterWidthMethodInfo ,
#endif
dOMDOMWindowGetOuterWidth ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetPageXOffsetMethodInfo ,
#endif
dOMDOMWindowGetPageXOffset ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetPageYOffsetMethodInfo ,
#endif
dOMDOMWindowGetPageYOffset ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetParentMethodInfo ,
#endif
dOMDOMWindowGetParent ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetScreenLeftMethodInfo ,
#endif
dOMDOMWindowGetScreenLeft ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetScreenTopMethodInfo ,
#endif
dOMDOMWindowGetScreenTop ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetScreenXMethodInfo ,
#endif
dOMDOMWindowGetScreenX ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetScreenYMethodInfo ,
#endif
dOMDOMWindowGetScreenY ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetScrollXMethodInfo ,
#endif
dOMDOMWindowGetScrollX ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetScrollYMethodInfo ,
#endif
dOMDOMWindowGetScrollY ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetSelectionMethodInfo ,
#endif
dOMDOMWindowGetSelection ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetSelfMethodInfo ,
#endif
dOMDOMWindowGetSelf ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetStatusMethodInfo ,
#endif
dOMDOMWindowGetStatus ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetTopMethodInfo ,
#endif
dOMDOMWindowGetTop ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowGetWindowMethodInfo ,
#endif
dOMDOMWindowGetWindow ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowMoveByMethodInfo ,
#endif
dOMDOMWindowMoveBy ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowMoveToMethodInfo ,
#endif
dOMDOMWindowMoveTo ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowPrintMethodInfo ,
#endif
dOMDOMWindowPrint ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowPromptMethodInfo ,
#endif
dOMDOMWindowPrompt ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowReleaseEventsMethodInfo ,
#endif
dOMDOMWindowReleaseEvents ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowResizeByMethodInfo ,
#endif
dOMDOMWindowResizeBy ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowResizeToMethodInfo ,
#endif
dOMDOMWindowResizeTo ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowScrollByMethodInfo ,
#endif
dOMDOMWindowScrollBy ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowScrollToMethodInfo ,
#endif
dOMDOMWindowScrollTo ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowSetDefaultStatusMethodInfo ,
#endif
dOMDOMWindowSetDefaultStatus ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowSetNameMethodInfo ,
#endif
dOMDOMWindowSetName ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowSetStatusMethodInfo ,
#endif
dOMDOMWindowSetStatus ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowStopMethodInfo ,
#endif
dOMDOMWindowStop ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowWebkitMessageHandlersPostMessageMethodInfo,
#endif
dOMDOMWindowWebkitMessageHandlersPostMessage,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowClosedPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowClosed ,
#endif
getDOMDOMWindowClosed ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowDefaultStatusPropertyInfo ,
#endif
constructDOMDOMWindowDefaultStatus ,
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowDefaultStatus ,
#endif
getDOMDOMWindowDefaultStatus ,
setDOMDOMWindowDefaultStatus ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowDevicePixelRatioPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowDevicePixelRatio ,
#endif
getDOMDOMWindowDevicePixelRatio ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowDocumentPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowDocument ,
#endif
getDOMDOMWindowDocument ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowFrameElementPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowFrameElement ,
#endif
getDOMDOMWindowFrameElement ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowFramesPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowFrames ,
#endif
getDOMDOMWindowFrames ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowInnerHeightPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowInnerHeight ,
#endif
getDOMDOMWindowInnerHeight ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowInnerWidthPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowInnerWidth ,
#endif
getDOMDOMWindowInnerWidth ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowLengthPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowLength ,
#endif
getDOMDOMWindowLength ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowNamePropertyInfo ,
#endif
constructDOMDOMWindowName ,
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowName ,
#endif
getDOMDOMWindowName ,
setDOMDOMWindowName ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowOffscreenBufferingPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowOffscreenBuffering ,
#endif
getDOMDOMWindowOffscreenBuffering ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowOpenerPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowOpener ,
#endif
getDOMDOMWindowOpener ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowOrientationPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowOrientation ,
#endif
getDOMDOMWindowOrientation ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowOuterHeightPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowOuterHeight ,
#endif
getDOMDOMWindowOuterHeight ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowOuterWidthPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowOuterWidth ,
#endif
getDOMDOMWindowOuterWidth ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowPageXOffsetPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowPageXOffset ,
#endif
getDOMDOMWindowPageXOffset ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowPageYOffsetPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowPageYOffset ,
#endif
getDOMDOMWindowPageYOffset ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowParentPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowParent ,
#endif
getDOMDOMWindowParent ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowScreenLeftPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowScreenLeft ,
#endif
getDOMDOMWindowScreenLeft ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowScreenTopPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowScreenTop ,
#endif
getDOMDOMWindowScreenTop ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowScreenXPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowScreenX ,
#endif
getDOMDOMWindowScreenX ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowScreenYPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowScreenY ,
#endif
getDOMDOMWindowScreenY ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowScrollXPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowScrollX ,
#endif
getDOMDOMWindowScrollX ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowScrollYPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowScrollY ,
#endif
getDOMDOMWindowScrollY ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowSelfPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowSelf ,
#endif
getDOMDOMWindowSelf ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowStatusPropertyInfo ,
#endif
constructDOMDOMWindowStatus ,
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowStatus ,
#endif
getDOMDOMWindowStatus ,
setDOMDOMWindowStatus ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowTopPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowTop ,
#endif
getDOMDOMWindowTop ,
#if defined(ENABLE_OVERLOADING)
DOMDOMWindowWindowPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowWindow ,
#endif
getDOMDOMWindowWindow ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GI.GObject.Objects.Object as GObject.Object
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Interfaces.DOMEventTarget as WebKit2WebExtension.DOMEventTarget
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMCSSStyleDeclaration as WebKit2WebExtension.DOMCSSStyleDeclaration
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMDOMSelection as WebKit2WebExtension.DOMDOMSelection
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMDocument as WebKit2WebExtension.DOMDocument
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMElement as WebKit2WebExtension.DOMElement
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMObject as WebKit2WebExtension.DOMObject
newtype DOMDOMWindow = DOMDOMWindow (ManagedPtr DOMDOMWindow)
deriving (DOMDOMWindow -> DOMDOMWindow -> Bool
(DOMDOMWindow -> DOMDOMWindow -> Bool)
-> (DOMDOMWindow -> DOMDOMWindow -> Bool) -> Eq DOMDOMWindow
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DOMDOMWindow -> DOMDOMWindow -> Bool
$c/= :: DOMDOMWindow -> DOMDOMWindow -> Bool
== :: DOMDOMWindow -> DOMDOMWindow -> Bool
$c== :: DOMDOMWindow -> DOMDOMWindow -> Bool
Eq)
foreign import ccall "webkit_dom_dom_window_get_type"
c_webkit_dom_dom_window_get_type :: IO GType
instance GObject DOMDOMWindow where
gobjectType :: IO GType
gobjectType = IO GType
c_webkit_dom_dom_window_get_type
instance B.GValue.IsGValue DOMDOMWindow where
toGValue :: DOMDOMWindow -> IO GValue
toGValue o :: DOMDOMWindow
o = do
GType
gtype <- IO GType
c_webkit_dom_dom_window_get_type
DOMDOMWindow -> (Ptr DOMDOMWindow -> IO GValue) -> IO GValue
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr DOMDOMWindow
o (GType
-> (GValue -> Ptr DOMDOMWindow -> IO ())
-> Ptr DOMDOMWindow
-> IO GValue
forall a. GType -> (GValue -> a -> IO ()) -> a -> IO GValue
B.GValue.buildGValue GType
gtype GValue -> Ptr DOMDOMWindow -> IO ()
forall a. GObject a => GValue -> Ptr a -> IO ()
B.GValue.set_object)
fromGValue :: GValue -> IO DOMDOMWindow
fromGValue gv :: GValue
gv = do
Ptr DOMDOMWindow
ptr <- GValue -> IO (Ptr DOMDOMWindow)
forall b. GObject b => GValue -> IO (Ptr b)
B.GValue.get_object GValue
gv :: IO (Ptr DOMDOMWindow)
(ManagedPtr DOMDOMWindow -> DOMDOMWindow)
-> Ptr DOMDOMWindow -> IO DOMDOMWindow
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr DOMDOMWindow -> DOMDOMWindow
DOMDOMWindow Ptr DOMDOMWindow
ptr
class (GObject o, O.IsDescendantOf DOMDOMWindow o) => IsDOMDOMWindow o
instance (GObject o, O.IsDescendantOf DOMDOMWindow o) => IsDOMDOMWindow o
instance O.HasParentTypes DOMDOMWindow
type instance O.ParentTypes DOMDOMWindow = '[WebKit2WebExtension.DOMObject.DOMObject, GObject.Object.Object, WebKit2WebExtension.DOMEventTarget.DOMEventTarget]
toDOMDOMWindow :: (MonadIO m, IsDOMDOMWindow o) => o -> m DOMDOMWindow
toDOMDOMWindow :: o -> m DOMDOMWindow
toDOMDOMWindow = IO DOMDOMWindow -> m DOMDOMWindow
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMDOMWindow -> m DOMDOMWindow)
-> (o -> IO DOMDOMWindow) -> o -> m DOMDOMWindow
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr DOMDOMWindow -> DOMDOMWindow) -> o -> IO DOMDOMWindow
forall o o'.
(HasCallStack, GObject o, GObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
unsafeCastTo ManagedPtr DOMDOMWindow -> DOMDOMWindow
DOMDOMWindow
noDOMDOMWindow :: Maybe DOMDOMWindow
noDOMDOMWindow :: Maybe DOMDOMWindow
noDOMDOMWindow = Maybe DOMDOMWindow
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveDOMDOMWindowMethod (t :: Symbol) (o :: *) :: * where
ResolveDOMDOMWindowMethod "addEventListener" o = WebKit2WebExtension.DOMEventTarget.DOMEventTargetAddEventListenerMethodInfo
ResolveDOMDOMWindowMethod "alert" o = DOMDOMWindowAlertMethodInfo
ResolveDOMDOMWindowMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveDOMDOMWindowMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveDOMDOMWindowMethod "blur" o = DOMDOMWindowBlurMethodInfo
ResolveDOMDOMWindowMethod "captureEvents" o = DOMDOMWindowCaptureEventsMethodInfo
ResolveDOMDOMWindowMethod "close" o = DOMDOMWindowCloseMethodInfo
ResolveDOMDOMWindowMethod "confirm" o = DOMDOMWindowConfirmMethodInfo
ResolveDOMDOMWindowMethod "dispatchEvent" o = WebKit2WebExtension.DOMEventTarget.DOMEventTargetDispatchEventMethodInfo
ResolveDOMDOMWindowMethod "find" o = DOMDOMWindowFindMethodInfo
ResolveDOMDOMWindowMethod "focus" o = DOMDOMWindowFocusMethodInfo
ResolveDOMDOMWindowMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveDOMDOMWindowMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveDOMDOMWindowMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveDOMDOMWindowMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveDOMDOMWindowMethod "moveBy" o = DOMDOMWindowMoveByMethodInfo
ResolveDOMDOMWindowMethod "moveTo" o = DOMDOMWindowMoveToMethodInfo
ResolveDOMDOMWindowMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveDOMDOMWindowMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveDOMDOMWindowMethod "print" o = DOMDOMWindowPrintMethodInfo
ResolveDOMDOMWindowMethod "prompt" o = DOMDOMWindowPromptMethodInfo
ResolveDOMDOMWindowMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveDOMDOMWindowMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveDOMDOMWindowMethod "releaseEvents" o = DOMDOMWindowReleaseEventsMethodInfo
ResolveDOMDOMWindowMethod "removeEventListener" o = WebKit2WebExtension.DOMEventTarget.DOMEventTargetRemoveEventListenerMethodInfo
ResolveDOMDOMWindowMethod "resizeBy" o = DOMDOMWindowResizeByMethodInfo
ResolveDOMDOMWindowMethod "resizeTo" o = DOMDOMWindowResizeToMethodInfo
ResolveDOMDOMWindowMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveDOMDOMWindowMethod "scrollBy" o = DOMDOMWindowScrollByMethodInfo
ResolveDOMDOMWindowMethod "scrollTo" o = DOMDOMWindowScrollToMethodInfo
ResolveDOMDOMWindowMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveDOMDOMWindowMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveDOMDOMWindowMethod "stop" o = DOMDOMWindowStopMethodInfo
ResolveDOMDOMWindowMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveDOMDOMWindowMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveDOMDOMWindowMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveDOMDOMWindowMethod "webkitMessageHandlersPostMessage" o = DOMDOMWindowWebkitMessageHandlersPostMessageMethodInfo
ResolveDOMDOMWindowMethod "getClosed" o = DOMDOMWindowGetClosedMethodInfo
ResolveDOMDOMWindowMethod "getComputedStyle" o = DOMDOMWindowGetComputedStyleMethodInfo
ResolveDOMDOMWindowMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveDOMDOMWindowMethod "getDefaultStatus" o = DOMDOMWindowGetDefaultStatusMethodInfo
ResolveDOMDOMWindowMethod "getDevicePixelRatio" o = DOMDOMWindowGetDevicePixelRatioMethodInfo
ResolveDOMDOMWindowMethod "getDocument" o = DOMDOMWindowGetDocumentMethodInfo
ResolveDOMDOMWindowMethod "getFrameElement" o = DOMDOMWindowGetFrameElementMethodInfo
ResolveDOMDOMWindowMethod "getFrames" o = DOMDOMWindowGetFramesMethodInfo
ResolveDOMDOMWindowMethod "getInnerHeight" o = DOMDOMWindowGetInnerHeightMethodInfo
ResolveDOMDOMWindowMethod "getInnerWidth" o = DOMDOMWindowGetInnerWidthMethodInfo
ResolveDOMDOMWindowMethod "getLength" o = DOMDOMWindowGetLengthMethodInfo
ResolveDOMDOMWindowMethod "getName" o = DOMDOMWindowGetNameMethodInfo
ResolveDOMDOMWindowMethod "getOffscreenBuffering" o = DOMDOMWindowGetOffscreenBufferingMethodInfo
ResolveDOMDOMWindowMethod "getOpener" o = DOMDOMWindowGetOpenerMethodInfo
ResolveDOMDOMWindowMethod "getOrientation" o = DOMDOMWindowGetOrientationMethodInfo
ResolveDOMDOMWindowMethod "getOuterHeight" o = DOMDOMWindowGetOuterHeightMethodInfo
ResolveDOMDOMWindowMethod "getOuterWidth" o = DOMDOMWindowGetOuterWidthMethodInfo
ResolveDOMDOMWindowMethod "getPageXOffset" o = DOMDOMWindowGetPageXOffsetMethodInfo
ResolveDOMDOMWindowMethod "getPageYOffset" o = DOMDOMWindowGetPageYOffsetMethodInfo
ResolveDOMDOMWindowMethod "getParent" o = DOMDOMWindowGetParentMethodInfo
ResolveDOMDOMWindowMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveDOMDOMWindowMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveDOMDOMWindowMethod "getScreenLeft" o = DOMDOMWindowGetScreenLeftMethodInfo
ResolveDOMDOMWindowMethod "getScreenTop" o = DOMDOMWindowGetScreenTopMethodInfo
ResolveDOMDOMWindowMethod "getScreenX" o = DOMDOMWindowGetScreenXMethodInfo
ResolveDOMDOMWindowMethod "getScreenY" o = DOMDOMWindowGetScreenYMethodInfo
ResolveDOMDOMWindowMethod "getScrollX" o = DOMDOMWindowGetScrollXMethodInfo
ResolveDOMDOMWindowMethod "getScrollY" o = DOMDOMWindowGetScrollYMethodInfo
ResolveDOMDOMWindowMethod "getSelection" o = DOMDOMWindowGetSelectionMethodInfo
ResolveDOMDOMWindowMethod "getSelf" o = DOMDOMWindowGetSelfMethodInfo
ResolveDOMDOMWindowMethod "getStatus" o = DOMDOMWindowGetStatusMethodInfo
ResolveDOMDOMWindowMethod "getTop" o = DOMDOMWindowGetTopMethodInfo
ResolveDOMDOMWindowMethod "getWindow" o = DOMDOMWindowGetWindowMethodInfo
ResolveDOMDOMWindowMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveDOMDOMWindowMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveDOMDOMWindowMethod "setDefaultStatus" o = DOMDOMWindowSetDefaultStatusMethodInfo
ResolveDOMDOMWindowMethod "setName" o = DOMDOMWindowSetNameMethodInfo
ResolveDOMDOMWindowMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveDOMDOMWindowMethod "setStatus" o = DOMDOMWindowSetStatusMethodInfo
ResolveDOMDOMWindowMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveDOMDOMWindowMethod t DOMDOMWindow, O.MethodInfo info DOMDOMWindow p) => OL.IsLabel t (DOMDOMWindow -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#endif
getDOMDOMWindowClosed :: (MonadIO m, IsDOMDOMWindow o) => o -> m Bool
getDOMDOMWindowClosed :: o -> m Bool
getDOMDOMWindowClosed obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "closed"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowClosedPropertyInfo
instance AttrInfo DOMDOMWindowClosedPropertyInfo where
type AttrAllowedOps DOMDOMWindowClosedPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowClosedPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowClosedPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowClosedPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowClosedPropertyInfo = ()
type AttrGetType DOMDOMWindowClosedPropertyInfo = Bool
type AttrLabel DOMDOMWindowClosedPropertyInfo = "closed"
type AttrOrigin DOMDOMWindowClosedPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowClosed
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowDefaultStatus :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe T.Text)
getDOMDOMWindowDefaultStatus :: o -> m (Maybe Text)
getDOMDOMWindowDefaultStatus obj :: o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "default-status"
setDOMDOMWindowDefaultStatus :: (MonadIO m, IsDOMDOMWindow o) => o -> T.Text -> m ()
setDOMDOMWindowDefaultStatus :: o -> Text -> m ()
setDOMDOMWindowDefaultStatus obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "default-status" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDOMDOMWindowDefaultStatus :: (IsDOMDOMWindow o) => T.Text -> IO (GValueConstruct o)
constructDOMDOMWindowDefaultStatus :: Text -> IO (GValueConstruct o)
constructDOMDOMWindowDefaultStatus val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "default-status" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowDefaultStatusPropertyInfo
instance AttrInfo DOMDOMWindowDefaultStatusPropertyInfo where
type AttrAllowedOps DOMDOMWindowDefaultStatusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowDefaultStatusPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowDefaultStatusPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint DOMDOMWindowDefaultStatusPropertyInfo = (~) T.Text
type AttrTransferType DOMDOMWindowDefaultStatusPropertyInfo = T.Text
type AttrGetType DOMDOMWindowDefaultStatusPropertyInfo = (Maybe T.Text)
type AttrLabel DOMDOMWindowDefaultStatusPropertyInfo = "default-status"
type AttrOrigin DOMDOMWindowDefaultStatusPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowDefaultStatus
attrSet = setDOMDOMWindowDefaultStatus
attrTransfer _ v = do
return v
attrConstruct = constructDOMDOMWindowDefaultStatus
attrClear = undefined
#endif
getDOMDOMWindowDevicePixelRatio :: (MonadIO m, IsDOMDOMWindow o) => o -> m Double
getDOMDOMWindowDevicePixelRatio :: o -> m Double
getDOMDOMWindowDevicePixelRatio obj :: o
obj = IO Double -> m Double
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Double -> m Double) -> IO Double -> m Double
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Double
forall a. GObject a => a -> String -> IO Double
B.Properties.getObjectPropertyDouble o
obj "device-pixel-ratio"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowDevicePixelRatioPropertyInfo
instance AttrInfo DOMDOMWindowDevicePixelRatioPropertyInfo where
type AttrAllowedOps DOMDOMWindowDevicePixelRatioPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowDevicePixelRatioPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowDevicePixelRatioPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowDevicePixelRatioPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowDevicePixelRatioPropertyInfo = ()
type AttrGetType DOMDOMWindowDevicePixelRatioPropertyInfo = Double
type AttrLabel DOMDOMWindowDevicePixelRatioPropertyInfo = "device-pixel-ratio"
type AttrOrigin DOMDOMWindowDevicePixelRatioPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowDevicePixelRatio
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowDocument :: (MonadIO m, IsDOMDOMWindow o) => o -> m WebKit2WebExtension.DOMDocument.DOMDocument
getDOMDOMWindowDocument :: o -> m DOMDocument
getDOMDOMWindowDocument obj :: o
obj = IO DOMDocument -> m DOMDocument
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMDocument -> m DOMDocument)
-> IO DOMDocument -> m DOMDocument
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe DOMDocument) -> IO DOMDocument
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing "getDOMDOMWindowDocument" (IO (Maybe DOMDocument) -> IO DOMDocument)
-> IO (Maybe DOMDocument) -> IO DOMDocument
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr DOMDocument -> DOMDocument)
-> IO (Maybe DOMDocument)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj "document" ManagedPtr DOMDocument -> DOMDocument
WebKit2WebExtension.DOMDocument.DOMDocument
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowDocumentPropertyInfo
instance AttrInfo DOMDOMWindowDocumentPropertyInfo where
type AttrAllowedOps DOMDOMWindowDocumentPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint DOMDOMWindowDocumentPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowDocumentPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowDocumentPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowDocumentPropertyInfo = ()
type AttrGetType DOMDOMWindowDocumentPropertyInfo = WebKit2WebExtension.DOMDocument.DOMDocument
type AttrLabel DOMDOMWindowDocumentPropertyInfo = "document"
type AttrOrigin DOMDOMWindowDocumentPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowDocument
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowFrameElement :: (MonadIO m, IsDOMDOMWindow o) => o -> m WebKit2WebExtension.DOMElement.DOMElement
getDOMDOMWindowFrameElement :: o -> m DOMElement
getDOMDOMWindowFrameElement obj :: o
obj = IO DOMElement -> m DOMElement
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMElement -> m DOMElement) -> IO DOMElement -> m DOMElement
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe DOMElement) -> IO DOMElement
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing "getDOMDOMWindowFrameElement" (IO (Maybe DOMElement) -> IO DOMElement)
-> IO (Maybe DOMElement) -> IO DOMElement
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr DOMElement -> DOMElement)
-> IO (Maybe DOMElement)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj "frame-element" ManagedPtr DOMElement -> DOMElement
WebKit2WebExtension.DOMElement.DOMElement
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowFrameElementPropertyInfo
instance AttrInfo DOMDOMWindowFrameElementPropertyInfo where
type AttrAllowedOps DOMDOMWindowFrameElementPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint DOMDOMWindowFrameElementPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowFrameElementPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowFrameElementPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowFrameElementPropertyInfo = ()
type AttrGetType DOMDOMWindowFrameElementPropertyInfo = WebKit2WebExtension.DOMElement.DOMElement
type AttrLabel DOMDOMWindowFrameElementPropertyInfo = "frame-element"
type AttrOrigin DOMDOMWindowFrameElementPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowFrameElement
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowFrames :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowFrames :: o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowFrames obj :: o
obj = IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow))
-> IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr DOMDOMWindow -> DOMDOMWindow)
-> IO (Maybe DOMDOMWindow)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj "frames" ManagedPtr DOMDOMWindow -> DOMDOMWindow
DOMDOMWindow
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowFramesPropertyInfo
instance AttrInfo DOMDOMWindowFramesPropertyInfo where
type AttrAllowedOps DOMDOMWindowFramesPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint DOMDOMWindowFramesPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowFramesPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowFramesPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowFramesPropertyInfo = ()
type AttrGetType DOMDOMWindowFramesPropertyInfo = (Maybe DOMDOMWindow)
type AttrLabel DOMDOMWindowFramesPropertyInfo = "frames"
type AttrOrigin DOMDOMWindowFramesPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowFrames
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowInnerHeight :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowInnerHeight :: o -> m CLong
getDOMDOMWindowInnerHeight obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "inner-height"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowInnerHeightPropertyInfo
instance AttrInfo DOMDOMWindowInnerHeightPropertyInfo where
type AttrAllowedOps DOMDOMWindowInnerHeightPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowInnerHeightPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowInnerHeightPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowInnerHeightPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowInnerHeightPropertyInfo = ()
type AttrGetType DOMDOMWindowInnerHeightPropertyInfo = CLong
type AttrLabel DOMDOMWindowInnerHeightPropertyInfo = "inner-height"
type AttrOrigin DOMDOMWindowInnerHeightPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowInnerHeight
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowInnerWidth :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowInnerWidth :: o -> m CLong
getDOMDOMWindowInnerWidth obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "inner-width"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowInnerWidthPropertyInfo
instance AttrInfo DOMDOMWindowInnerWidthPropertyInfo where
type AttrAllowedOps DOMDOMWindowInnerWidthPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowInnerWidthPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowInnerWidthPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowInnerWidthPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowInnerWidthPropertyInfo = ()
type AttrGetType DOMDOMWindowInnerWidthPropertyInfo = CLong
type AttrLabel DOMDOMWindowInnerWidthPropertyInfo = "inner-width"
type AttrOrigin DOMDOMWindowInnerWidthPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowInnerWidth
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowLength :: (MonadIO m, IsDOMDOMWindow o) => o -> m CULong
getDOMDOMWindowLength :: o -> m CULong
getDOMDOMWindowLength obj :: o
obj = IO CULong -> m CULong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CULong -> m CULong) -> IO CULong -> m CULong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CULong
forall a. GObject a => a -> String -> IO CULong
B.Properties.getObjectPropertyULong o
obj "length"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowLengthPropertyInfo
instance AttrInfo DOMDOMWindowLengthPropertyInfo where
type AttrAllowedOps DOMDOMWindowLengthPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowLengthPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowLengthPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowLengthPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowLengthPropertyInfo = ()
type AttrGetType DOMDOMWindowLengthPropertyInfo = CULong
type AttrLabel DOMDOMWindowLengthPropertyInfo = "length"
type AttrOrigin DOMDOMWindowLengthPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowLength
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowName :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe T.Text)
getDOMDOMWindowName :: o -> m (Maybe Text)
getDOMDOMWindowName obj :: o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "name"
setDOMDOMWindowName :: (MonadIO m, IsDOMDOMWindow o) => o -> T.Text -> m ()
setDOMDOMWindowName :: o -> Text -> m ()
setDOMDOMWindowName obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDOMDOMWindowName :: (IsDOMDOMWindow o) => T.Text -> IO (GValueConstruct o)
constructDOMDOMWindowName :: Text -> IO (GValueConstruct o)
constructDOMDOMWindowName val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowNamePropertyInfo
instance AttrInfo DOMDOMWindowNamePropertyInfo where
type AttrAllowedOps DOMDOMWindowNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowNamePropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowNamePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint DOMDOMWindowNamePropertyInfo = (~) T.Text
type AttrTransferType DOMDOMWindowNamePropertyInfo = T.Text
type AttrGetType DOMDOMWindowNamePropertyInfo = (Maybe T.Text)
type AttrLabel DOMDOMWindowNamePropertyInfo = "name"
type AttrOrigin DOMDOMWindowNamePropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowName
attrSet = setDOMDOMWindowName
attrTransfer _ v = do
return v
attrConstruct = constructDOMDOMWindowName
attrClear = undefined
#endif
getDOMDOMWindowOffscreenBuffering :: (MonadIO m, IsDOMDOMWindow o) => o -> m Bool
getDOMDOMWindowOffscreenBuffering :: o -> m Bool
getDOMDOMWindowOffscreenBuffering obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "offscreen-buffering"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowOffscreenBufferingPropertyInfo
instance AttrInfo DOMDOMWindowOffscreenBufferingPropertyInfo where
type AttrAllowedOps DOMDOMWindowOffscreenBufferingPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowOffscreenBufferingPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowOffscreenBufferingPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowOffscreenBufferingPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowOffscreenBufferingPropertyInfo = ()
type AttrGetType DOMDOMWindowOffscreenBufferingPropertyInfo = Bool
type AttrLabel DOMDOMWindowOffscreenBufferingPropertyInfo = "offscreen-buffering"
type AttrOrigin DOMDOMWindowOffscreenBufferingPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowOffscreenBuffering
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowOpener :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowOpener :: o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowOpener obj :: o
obj = IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow))
-> IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr DOMDOMWindow -> DOMDOMWindow)
-> IO (Maybe DOMDOMWindow)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj "opener" ManagedPtr DOMDOMWindow -> DOMDOMWindow
DOMDOMWindow
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowOpenerPropertyInfo
instance AttrInfo DOMDOMWindowOpenerPropertyInfo where
type AttrAllowedOps DOMDOMWindowOpenerPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint DOMDOMWindowOpenerPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowOpenerPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowOpenerPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowOpenerPropertyInfo = ()
type AttrGetType DOMDOMWindowOpenerPropertyInfo = (Maybe DOMDOMWindow)
type AttrLabel DOMDOMWindowOpenerPropertyInfo = "opener"
type AttrOrigin DOMDOMWindowOpenerPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowOpener
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowOrientation :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowOrientation :: o -> m CLong
getDOMDOMWindowOrientation obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "orientation"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowOrientationPropertyInfo
instance AttrInfo DOMDOMWindowOrientationPropertyInfo where
type AttrAllowedOps DOMDOMWindowOrientationPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowOrientationPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowOrientationPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowOrientationPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowOrientationPropertyInfo = ()
type AttrGetType DOMDOMWindowOrientationPropertyInfo = CLong
type AttrLabel DOMDOMWindowOrientationPropertyInfo = "orientation"
type AttrOrigin DOMDOMWindowOrientationPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowOrientation
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowOuterHeight :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowOuterHeight :: o -> m CLong
getDOMDOMWindowOuterHeight obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "outer-height"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowOuterHeightPropertyInfo
instance AttrInfo DOMDOMWindowOuterHeightPropertyInfo where
type AttrAllowedOps DOMDOMWindowOuterHeightPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowOuterHeightPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowOuterHeightPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowOuterHeightPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowOuterHeightPropertyInfo = ()
type AttrGetType DOMDOMWindowOuterHeightPropertyInfo = CLong
type AttrLabel DOMDOMWindowOuterHeightPropertyInfo = "outer-height"
type AttrOrigin DOMDOMWindowOuterHeightPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowOuterHeight
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowOuterWidth :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowOuterWidth :: o -> m CLong
getDOMDOMWindowOuterWidth obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "outer-width"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowOuterWidthPropertyInfo
instance AttrInfo DOMDOMWindowOuterWidthPropertyInfo where
type AttrAllowedOps DOMDOMWindowOuterWidthPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowOuterWidthPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowOuterWidthPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowOuterWidthPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowOuterWidthPropertyInfo = ()
type AttrGetType DOMDOMWindowOuterWidthPropertyInfo = CLong
type AttrLabel DOMDOMWindowOuterWidthPropertyInfo = "outer-width"
type AttrOrigin DOMDOMWindowOuterWidthPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowOuterWidth
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowPageXOffset :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowPageXOffset :: o -> m CLong
getDOMDOMWindowPageXOffset obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "page-x-offset"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowPageXOffsetPropertyInfo
instance AttrInfo DOMDOMWindowPageXOffsetPropertyInfo where
type AttrAllowedOps DOMDOMWindowPageXOffsetPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowPageXOffsetPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowPageXOffsetPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowPageXOffsetPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowPageXOffsetPropertyInfo = ()
type AttrGetType DOMDOMWindowPageXOffsetPropertyInfo = CLong
type AttrLabel DOMDOMWindowPageXOffsetPropertyInfo = "page-x-offset"
type AttrOrigin DOMDOMWindowPageXOffsetPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowPageXOffset
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowPageYOffset :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowPageYOffset :: o -> m CLong
getDOMDOMWindowPageYOffset obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "page-y-offset"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowPageYOffsetPropertyInfo
instance AttrInfo DOMDOMWindowPageYOffsetPropertyInfo where
type AttrAllowedOps DOMDOMWindowPageYOffsetPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowPageYOffsetPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowPageYOffsetPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowPageYOffsetPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowPageYOffsetPropertyInfo = ()
type AttrGetType DOMDOMWindowPageYOffsetPropertyInfo = CLong
type AttrLabel DOMDOMWindowPageYOffsetPropertyInfo = "page-y-offset"
type AttrOrigin DOMDOMWindowPageYOffsetPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowPageYOffset
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowParent :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowParent :: o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowParent obj :: o
obj = IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow))
-> IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr DOMDOMWindow -> DOMDOMWindow)
-> IO (Maybe DOMDOMWindow)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj "parent" ManagedPtr DOMDOMWindow -> DOMDOMWindow
DOMDOMWindow
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowParentPropertyInfo
instance AttrInfo DOMDOMWindowParentPropertyInfo where
type AttrAllowedOps DOMDOMWindowParentPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint DOMDOMWindowParentPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowParentPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowParentPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowParentPropertyInfo = ()
type AttrGetType DOMDOMWindowParentPropertyInfo = (Maybe DOMDOMWindow)
type AttrLabel DOMDOMWindowParentPropertyInfo = "parent"
type AttrOrigin DOMDOMWindowParentPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowParent
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowScreenLeft :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowScreenLeft :: o -> m CLong
getDOMDOMWindowScreenLeft obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "screen-left"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowScreenLeftPropertyInfo
instance AttrInfo DOMDOMWindowScreenLeftPropertyInfo where
type AttrAllowedOps DOMDOMWindowScreenLeftPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowScreenLeftPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowScreenLeftPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowScreenLeftPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowScreenLeftPropertyInfo = ()
type AttrGetType DOMDOMWindowScreenLeftPropertyInfo = CLong
type AttrLabel DOMDOMWindowScreenLeftPropertyInfo = "screen-left"
type AttrOrigin DOMDOMWindowScreenLeftPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowScreenLeft
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowScreenTop :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowScreenTop :: o -> m CLong
getDOMDOMWindowScreenTop obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "screen-top"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowScreenTopPropertyInfo
instance AttrInfo DOMDOMWindowScreenTopPropertyInfo where
type AttrAllowedOps DOMDOMWindowScreenTopPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowScreenTopPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowScreenTopPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowScreenTopPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowScreenTopPropertyInfo = ()
type AttrGetType DOMDOMWindowScreenTopPropertyInfo = CLong
type AttrLabel DOMDOMWindowScreenTopPropertyInfo = "screen-top"
type AttrOrigin DOMDOMWindowScreenTopPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowScreenTop
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowScreenX :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowScreenX :: o -> m CLong
getDOMDOMWindowScreenX obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "screen-x"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowScreenXPropertyInfo
instance AttrInfo DOMDOMWindowScreenXPropertyInfo where
type AttrAllowedOps DOMDOMWindowScreenXPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowScreenXPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowScreenXPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowScreenXPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowScreenXPropertyInfo = ()
type AttrGetType DOMDOMWindowScreenXPropertyInfo = CLong
type AttrLabel DOMDOMWindowScreenXPropertyInfo = "screen-x"
type AttrOrigin DOMDOMWindowScreenXPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowScreenX
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowScreenY :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowScreenY :: o -> m CLong
getDOMDOMWindowScreenY obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "screen-y"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowScreenYPropertyInfo
instance AttrInfo DOMDOMWindowScreenYPropertyInfo where
type AttrAllowedOps DOMDOMWindowScreenYPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowScreenYPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowScreenYPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowScreenYPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowScreenYPropertyInfo = ()
type AttrGetType DOMDOMWindowScreenYPropertyInfo = CLong
type AttrLabel DOMDOMWindowScreenYPropertyInfo = "screen-y"
type AttrOrigin DOMDOMWindowScreenYPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowScreenY
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowScrollX :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowScrollX :: o -> m CLong
getDOMDOMWindowScrollX obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "scroll-x"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowScrollXPropertyInfo
instance AttrInfo DOMDOMWindowScrollXPropertyInfo where
type AttrAllowedOps DOMDOMWindowScrollXPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowScrollXPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowScrollXPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowScrollXPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowScrollXPropertyInfo = ()
type AttrGetType DOMDOMWindowScrollXPropertyInfo = CLong
type AttrLabel DOMDOMWindowScrollXPropertyInfo = "scroll-x"
type AttrOrigin DOMDOMWindowScrollXPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowScrollX
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowScrollY :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowScrollY :: o -> m CLong
getDOMDOMWindowScrollY obj :: o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj "scroll-y"
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowScrollYPropertyInfo
instance AttrInfo DOMDOMWindowScrollYPropertyInfo where
type AttrAllowedOps DOMDOMWindowScrollYPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowScrollYPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowScrollYPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowScrollYPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowScrollYPropertyInfo = ()
type AttrGetType DOMDOMWindowScrollYPropertyInfo = CLong
type AttrLabel DOMDOMWindowScrollYPropertyInfo = "scroll-y"
type AttrOrigin DOMDOMWindowScrollYPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowScrollY
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowSelf :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowSelf :: o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowSelf obj :: o
obj = IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow))
-> IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr DOMDOMWindow -> DOMDOMWindow)
-> IO (Maybe DOMDOMWindow)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj "self" ManagedPtr DOMDOMWindow -> DOMDOMWindow
DOMDOMWindow
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowSelfPropertyInfo
instance AttrInfo DOMDOMWindowSelfPropertyInfo where
type AttrAllowedOps DOMDOMWindowSelfPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint DOMDOMWindowSelfPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowSelfPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowSelfPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowSelfPropertyInfo = ()
type AttrGetType DOMDOMWindowSelfPropertyInfo = (Maybe DOMDOMWindow)
type AttrLabel DOMDOMWindowSelfPropertyInfo = "self"
type AttrOrigin DOMDOMWindowSelfPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowSelf
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowStatus :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe T.Text)
getDOMDOMWindowStatus :: o -> m (Maybe Text)
getDOMDOMWindowStatus obj :: o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "status"
setDOMDOMWindowStatus :: (MonadIO m, IsDOMDOMWindow o) => o -> T.Text -> m ()
setDOMDOMWindowStatus :: o -> Text -> m ()
setDOMDOMWindowStatus obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "status" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDOMDOMWindowStatus :: (IsDOMDOMWindow o) => T.Text -> IO (GValueConstruct o)
constructDOMDOMWindowStatus :: Text -> IO (GValueConstruct o)
constructDOMDOMWindowStatus val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "status" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowStatusPropertyInfo
instance AttrInfo DOMDOMWindowStatusPropertyInfo where
type AttrAllowedOps DOMDOMWindowStatusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMDOMWindowStatusPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowStatusPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint DOMDOMWindowStatusPropertyInfo = (~) T.Text
type AttrTransferType DOMDOMWindowStatusPropertyInfo = T.Text
type AttrGetType DOMDOMWindowStatusPropertyInfo = (Maybe T.Text)
type AttrLabel DOMDOMWindowStatusPropertyInfo = "status"
type AttrOrigin DOMDOMWindowStatusPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowStatus
attrSet = setDOMDOMWindowStatus
attrTransfer _ v = do
return v
attrConstruct = constructDOMDOMWindowStatus
attrClear = undefined
#endif
getDOMDOMWindowTop :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowTop :: o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowTop obj :: o
obj = IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow))
-> IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr DOMDOMWindow -> DOMDOMWindow)
-> IO (Maybe DOMDOMWindow)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj "top" ManagedPtr DOMDOMWindow -> DOMDOMWindow
DOMDOMWindow
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowTopPropertyInfo
instance AttrInfo DOMDOMWindowTopPropertyInfo where
type AttrAllowedOps DOMDOMWindowTopPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint DOMDOMWindowTopPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowTopPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowTopPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowTopPropertyInfo = ()
type AttrGetType DOMDOMWindowTopPropertyInfo = (Maybe DOMDOMWindow)
type AttrLabel DOMDOMWindowTopPropertyInfo = "top"
type AttrOrigin DOMDOMWindowTopPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowTop
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getDOMDOMWindowWindow :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowWindow :: o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowWindow obj :: o
obj = IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow))
-> IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr DOMDOMWindow -> DOMDOMWindow)
-> IO (Maybe DOMDOMWindow)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj "window" ManagedPtr DOMDOMWindow -> DOMDOMWindow
DOMDOMWindow
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowWindowPropertyInfo
instance AttrInfo DOMDOMWindowWindowPropertyInfo where
type AttrAllowedOps DOMDOMWindowWindowPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint DOMDOMWindowWindowPropertyInfo = IsDOMDOMWindow
type AttrSetTypeConstraint DOMDOMWindowWindowPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMDOMWindowWindowPropertyInfo = (~) ()
type AttrTransferType DOMDOMWindowWindowPropertyInfo = ()
type AttrGetType DOMDOMWindowWindowPropertyInfo = (Maybe DOMDOMWindow)
type AttrLabel DOMDOMWindowWindowPropertyInfo = "window"
type AttrOrigin DOMDOMWindowWindowPropertyInfo = DOMDOMWindow
attrGet = getDOMDOMWindowWindow
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList DOMDOMWindow
type instance O.AttributeList DOMDOMWindow = DOMDOMWindowAttributeList
type DOMDOMWindowAttributeList = ('[ '("closed", DOMDOMWindowClosedPropertyInfo), '("coreObject", WebKit2WebExtension.DOMObject.DOMObjectCoreObjectPropertyInfo), '("defaultStatus", DOMDOMWindowDefaultStatusPropertyInfo), '("devicePixelRatio", DOMDOMWindowDevicePixelRatioPropertyInfo), '("document", DOMDOMWindowDocumentPropertyInfo), '("frameElement", DOMDOMWindowFrameElementPropertyInfo), '("frames", DOMDOMWindowFramesPropertyInfo), '("innerHeight", DOMDOMWindowInnerHeightPropertyInfo), '("innerWidth", DOMDOMWindowInnerWidthPropertyInfo), '("length", DOMDOMWindowLengthPropertyInfo), '("name", DOMDOMWindowNamePropertyInfo), '("offscreenBuffering", DOMDOMWindowOffscreenBufferingPropertyInfo), '("opener", DOMDOMWindowOpenerPropertyInfo), '("orientation", DOMDOMWindowOrientationPropertyInfo), '("outerHeight", DOMDOMWindowOuterHeightPropertyInfo), '("outerWidth", DOMDOMWindowOuterWidthPropertyInfo), '("pageXOffset", DOMDOMWindowPageXOffsetPropertyInfo), '("pageYOffset", DOMDOMWindowPageYOffsetPropertyInfo), '("parent", DOMDOMWindowParentPropertyInfo), '("screenLeft", DOMDOMWindowScreenLeftPropertyInfo), '("screenTop", DOMDOMWindowScreenTopPropertyInfo), '("screenX", DOMDOMWindowScreenXPropertyInfo), '("screenY", DOMDOMWindowScreenYPropertyInfo), '("scrollX", DOMDOMWindowScrollXPropertyInfo), '("scrollY", DOMDOMWindowScrollYPropertyInfo), '("self", DOMDOMWindowSelfPropertyInfo), '("status", DOMDOMWindowStatusPropertyInfo), '("top", DOMDOMWindowTopPropertyInfo), '("window", DOMDOMWindowWindowPropertyInfo)] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
dOMDOMWindowClosed :: AttrLabelProxy "closed"
dOMDOMWindowClosed = AttrLabelProxy
dOMDOMWindowDefaultStatus :: AttrLabelProxy "defaultStatus"
dOMDOMWindowDefaultStatus = AttrLabelProxy
dOMDOMWindowDevicePixelRatio :: AttrLabelProxy "devicePixelRatio"
dOMDOMWindowDevicePixelRatio = AttrLabelProxy
dOMDOMWindowDocument :: AttrLabelProxy "document"
dOMDOMWindowDocument = AttrLabelProxy
dOMDOMWindowFrameElement :: AttrLabelProxy "frameElement"
dOMDOMWindowFrameElement = AttrLabelProxy
dOMDOMWindowFrames :: AttrLabelProxy "frames"
dOMDOMWindowFrames = AttrLabelProxy
dOMDOMWindowInnerHeight :: AttrLabelProxy "innerHeight"
dOMDOMWindowInnerHeight = AttrLabelProxy
dOMDOMWindowInnerWidth :: AttrLabelProxy "innerWidth"
dOMDOMWindowInnerWidth = AttrLabelProxy
dOMDOMWindowLength :: AttrLabelProxy "length"
dOMDOMWindowLength = AttrLabelProxy
dOMDOMWindowName :: AttrLabelProxy "name"
dOMDOMWindowName = AttrLabelProxy
dOMDOMWindowOffscreenBuffering :: AttrLabelProxy "offscreenBuffering"
dOMDOMWindowOffscreenBuffering = AttrLabelProxy
dOMDOMWindowOpener :: AttrLabelProxy "opener"
dOMDOMWindowOpener = AttrLabelProxy
dOMDOMWindowOrientation :: AttrLabelProxy "orientation"
dOMDOMWindowOrientation = AttrLabelProxy
dOMDOMWindowOuterHeight :: AttrLabelProxy "outerHeight"
dOMDOMWindowOuterHeight = AttrLabelProxy
dOMDOMWindowOuterWidth :: AttrLabelProxy "outerWidth"
dOMDOMWindowOuterWidth = AttrLabelProxy
dOMDOMWindowPageXOffset :: AttrLabelProxy "pageXOffset"
dOMDOMWindowPageXOffset = AttrLabelProxy
dOMDOMWindowPageYOffset :: AttrLabelProxy "pageYOffset"
dOMDOMWindowPageYOffset = AttrLabelProxy
dOMDOMWindowParent :: AttrLabelProxy "parent"
dOMDOMWindowParent = AttrLabelProxy
dOMDOMWindowScreenLeft :: AttrLabelProxy "screenLeft"
dOMDOMWindowScreenLeft = AttrLabelProxy
dOMDOMWindowScreenTop :: AttrLabelProxy "screenTop"
dOMDOMWindowScreenTop = AttrLabelProxy
dOMDOMWindowScreenX :: AttrLabelProxy "screenX"
dOMDOMWindowScreenX = AttrLabelProxy
dOMDOMWindowScreenY :: AttrLabelProxy "screenY"
dOMDOMWindowScreenY = AttrLabelProxy
dOMDOMWindowScrollX :: AttrLabelProxy "scrollX"
dOMDOMWindowScrollX = AttrLabelProxy
dOMDOMWindowScrollY :: AttrLabelProxy "scrollY"
dOMDOMWindowScrollY = AttrLabelProxy
dOMDOMWindowSelf :: AttrLabelProxy "self"
dOMDOMWindowSelf = AttrLabelProxy
dOMDOMWindowStatus :: AttrLabelProxy "status"
dOMDOMWindowStatus = AttrLabelProxy
dOMDOMWindowTop :: AttrLabelProxy "top"
dOMDOMWindowTop = AttrLabelProxy
dOMDOMWindowWindow :: AttrLabelProxy "window"
dOMDOMWindowWindow = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList DOMDOMWindow = DOMDOMWindowSignalList
type DOMDOMWindowSignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "webkit_dom_dom_window_alert" webkit_dom_dom_window_alert ::
Ptr DOMDOMWindow ->
CString ->
IO ()
{-# DEPRECATED dOMDOMWindowAlert ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowAlert ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> T.Text
-> m ()
dOMDOMWindowAlert :: a -> Text -> m ()
dOMDOMWindowAlert self :: a
self message :: Text
message = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
message' <- Text -> IO CString
textToCString Text
message
Ptr DOMDOMWindow -> CString -> IO ()
webkit_dom_dom_window_alert Ptr DOMDOMWindow
self' CString
message'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
message'
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowAlertMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowAlertMethodInfo a signature where
overloadedMethod = dOMDOMWindowAlert
#endif
foreign import ccall "webkit_dom_dom_window_blur" webkit_dom_dom_window_blur ::
Ptr DOMDOMWindow ->
IO ()
{-# DEPRECATED dOMDOMWindowBlur ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowBlur ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m ()
dOMDOMWindowBlur :: a -> m ()
dOMDOMWindowBlur self :: a
self = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMDOMWindow -> IO ()
webkit_dom_dom_window_blur Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowBlurMethodInfo
instance (signature ~ (m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowBlurMethodInfo a signature where
overloadedMethod = dOMDOMWindowBlur
#endif
foreign import ccall "webkit_dom_dom_window_capture_events" webkit_dom_dom_window_capture_events ::
Ptr DOMDOMWindow ->
IO ()
{-# DEPRECATED dOMDOMWindowCaptureEvents ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowCaptureEvents ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m ()
dOMDOMWindowCaptureEvents :: a -> m ()
dOMDOMWindowCaptureEvents self :: a
self = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMDOMWindow -> IO ()
webkit_dom_dom_window_capture_events Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowCaptureEventsMethodInfo
instance (signature ~ (m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowCaptureEventsMethodInfo a signature where
overloadedMethod = dOMDOMWindowCaptureEvents
#endif
foreign import ccall "webkit_dom_dom_window_close" webkit_dom_dom_window_close ::
Ptr DOMDOMWindow ->
IO ()
{-# DEPRECATED dOMDOMWindowClose ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowClose ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m ()
dOMDOMWindowClose :: a -> m ()
dOMDOMWindowClose self :: a
self = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMDOMWindow -> IO ()
webkit_dom_dom_window_close Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowCloseMethodInfo
instance (signature ~ (m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowCloseMethodInfo a signature where
overloadedMethod = dOMDOMWindowClose
#endif
foreign import ccall "webkit_dom_dom_window_confirm" webkit_dom_dom_window_confirm ::
Ptr DOMDOMWindow ->
CString ->
IO CInt
{-# DEPRECATED dOMDOMWindowConfirm ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowConfirm ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> T.Text
-> m Bool
dOMDOMWindowConfirm :: a -> Text -> m Bool
dOMDOMWindowConfirm self :: a
self message :: Text
message = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
message' <- Text -> IO CString
textToCString Text
message
CInt
result <- Ptr DOMDOMWindow -> CString -> IO CInt
webkit_dom_dom_window_confirm Ptr DOMDOMWindow
self' CString
message'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= 0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
message'
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowConfirmMethodInfo
instance (signature ~ (T.Text -> m Bool), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowConfirmMethodInfo a signature where
overloadedMethod = dOMDOMWindowConfirm
#endif
foreign import ccall "webkit_dom_dom_window_find" webkit_dom_dom_window_find ::
Ptr DOMDOMWindow ->
CString ->
CInt ->
CInt ->
CInt ->
CInt ->
CInt ->
CInt ->
IO CInt
{-# DEPRECATED dOMDOMWindowFind ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowFind ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> T.Text
-> Bool
-> Bool
-> Bool
-> Bool
-> Bool
-> Bool
-> m Bool
dOMDOMWindowFind :: a -> Text -> Bool -> Bool -> Bool -> Bool -> Bool -> Bool -> m Bool
dOMDOMWindowFind self :: a
self string :: Text
string caseSensitive :: Bool
caseSensitive backwards :: Bool
backwards wrap :: Bool
wrap wholeWord :: Bool
wholeWord searchInFrames :: Bool
searchInFrames showDialog :: Bool
showDialog = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
string' <- Text -> IO CString
textToCString Text
string
let caseSensitive' :: CInt
caseSensitive' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
caseSensitive
let backwards' :: CInt
backwards' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
backwards
let wrap' :: CInt
wrap' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
wrap
let wholeWord' :: CInt
wholeWord' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
wholeWord
let searchInFrames' :: CInt
searchInFrames' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
searchInFrames
let showDialog' :: CInt
showDialog' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
showDialog
CInt
result <- Ptr DOMDOMWindow
-> CString
-> CInt
-> CInt
-> CInt
-> CInt
-> CInt
-> CInt
-> IO CInt
webkit_dom_dom_window_find Ptr DOMDOMWindow
self' CString
string' CInt
caseSensitive' CInt
backwards' CInt
wrap' CInt
wholeWord' CInt
searchInFrames' CInt
showDialog'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= 0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
string'
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowFindMethodInfo
instance (signature ~ (T.Text -> Bool -> Bool -> Bool -> Bool -> Bool -> Bool -> m Bool), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowFindMethodInfo a signature where
overloadedMethod = dOMDOMWindowFind
#endif
foreign import ccall "webkit_dom_dom_window_focus" webkit_dom_dom_window_focus ::
Ptr DOMDOMWindow ->
IO ()
{-# DEPRECATED dOMDOMWindowFocus ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowFocus ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m ()
dOMDOMWindowFocus :: a -> m ()
dOMDOMWindowFocus self :: a
self = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMDOMWindow -> IO ()
webkit_dom_dom_window_focus Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowFocusMethodInfo
instance (signature ~ (m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowFocusMethodInfo a signature where
overloadedMethod = dOMDOMWindowFocus
#endif
foreign import ccall "webkit_dom_dom_window_get_closed" webkit_dom_dom_window_get_closed ::
Ptr DOMDOMWindow ->
IO CInt
{-# DEPRECATED dOMDOMWindowGetClosed ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetClosed ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m Bool
dOMDOMWindowGetClosed :: a -> m Bool
dOMDOMWindowGetClosed self :: a
self = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr DOMDOMWindow -> IO CInt
webkit_dom_dom_window_get_closed Ptr DOMDOMWindow
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= 0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetClosedMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetClosedMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetClosed
#endif
foreign import ccall "webkit_dom_dom_window_get_computed_style" webkit_dom_dom_window_get_computed_style ::
Ptr DOMDOMWindow ->
Ptr WebKit2WebExtension.DOMElement.DOMElement ->
CString ->
IO (Ptr WebKit2WebExtension.DOMCSSStyleDeclaration.DOMCSSStyleDeclaration)
{-# DEPRECATED dOMDOMWindowGetComputedStyle ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetComputedStyle ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a, WebKit2WebExtension.DOMElement.IsDOMElement b) =>
a
-> b
-> Maybe (T.Text)
-> m WebKit2WebExtension.DOMCSSStyleDeclaration.DOMCSSStyleDeclaration
dOMDOMWindowGetComputedStyle :: a -> b -> Maybe Text -> m DOMCSSStyleDeclaration
dOMDOMWindowGetComputedStyle self :: a
self element :: b
element pseudoElement :: Maybe Text
pseudoElement = IO DOMCSSStyleDeclaration -> m DOMCSSStyleDeclaration
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMCSSStyleDeclaration -> m DOMCSSStyleDeclaration)
-> IO DOMCSSStyleDeclaration -> m DOMCSSStyleDeclaration
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMElement
element' <- b -> IO (Ptr DOMElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
element
CString
maybePseudoElement <- case Maybe Text
pseudoElement of
Nothing -> CString -> IO CString
forall (m :: * -> *) a. Monad m => a -> m a
return CString
forall a. Ptr a
nullPtr
Just jPseudoElement :: Text
jPseudoElement -> do
CString
jPseudoElement' <- Text -> IO CString
textToCString Text
jPseudoElement
CString -> IO CString
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jPseudoElement'
Ptr DOMCSSStyleDeclaration
result <- Ptr DOMDOMWindow
-> Ptr DOMElement -> CString -> IO (Ptr DOMCSSStyleDeclaration)
webkit_dom_dom_window_get_computed_style Ptr DOMDOMWindow
self' Ptr DOMElement
element' CString
maybePseudoElement
Text -> Ptr DOMCSSStyleDeclaration -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "dOMDOMWindowGetComputedStyle" Ptr DOMCSSStyleDeclaration
result
DOMCSSStyleDeclaration
result' <- ((ManagedPtr DOMCSSStyleDeclaration -> DOMCSSStyleDeclaration)
-> Ptr DOMCSSStyleDeclaration -> IO DOMCSSStyleDeclaration
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
wrapObject ManagedPtr DOMCSSStyleDeclaration -> DOMCSSStyleDeclaration
WebKit2WebExtension.DOMCSSStyleDeclaration.DOMCSSStyleDeclaration) Ptr DOMCSSStyleDeclaration
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
element
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
maybePseudoElement
DOMCSSStyleDeclaration -> IO DOMCSSStyleDeclaration
forall (m :: * -> *) a. Monad m => a -> m a
return DOMCSSStyleDeclaration
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetComputedStyleMethodInfo
instance (signature ~ (b -> Maybe (T.Text) -> m WebKit2WebExtension.DOMCSSStyleDeclaration.DOMCSSStyleDeclaration), MonadIO m, IsDOMDOMWindow a, WebKit2WebExtension.DOMElement.IsDOMElement b) => O.MethodInfo DOMDOMWindowGetComputedStyleMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetComputedStyle
#endif
foreign import ccall "webkit_dom_dom_window_get_default_status" webkit_dom_dom_window_get_default_status ::
Ptr DOMDOMWindow ->
IO CString
{-# DEPRECATED dOMDOMWindowGetDefaultStatus ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetDefaultStatus ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m T.Text
dOMDOMWindowGetDefaultStatus :: a -> m Text
dOMDOMWindowGetDefaultStatus self :: a
self = IO Text -> m Text
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr DOMDOMWindow -> IO CString
webkit_dom_dom_window_get_default_status Ptr DOMDOMWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "dOMDOMWindowGetDefaultStatus" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetDefaultStatusMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetDefaultStatusMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetDefaultStatus
#endif
foreign import ccall "webkit_dom_dom_window_get_device_pixel_ratio" webkit_dom_dom_window_get_device_pixel_ratio ::
Ptr DOMDOMWindow ->
IO CDouble
{-# DEPRECATED dOMDOMWindowGetDevicePixelRatio ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetDevicePixelRatio ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m Double
dOMDOMWindowGetDevicePixelRatio :: a -> m Double
dOMDOMWindowGetDevicePixelRatio self :: a
self = IO Double -> m Double
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Double -> m Double) -> IO Double -> m Double
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CDouble
result <- Ptr DOMDOMWindow -> IO CDouble
webkit_dom_dom_window_get_device_pixel_ratio Ptr DOMDOMWindow
self'
let result' :: Double
result' = CDouble -> Double
forall a b. (Real a, Fractional b) => a -> b
realToFrac CDouble
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Double -> IO Double
forall (m :: * -> *) a. Monad m => a -> m a
return Double
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetDevicePixelRatioMethodInfo
instance (signature ~ (m Double), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetDevicePixelRatioMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetDevicePixelRatio
#endif
foreign import ccall "webkit_dom_dom_window_get_document" webkit_dom_dom_window_get_document ::
Ptr DOMDOMWindow ->
IO (Ptr WebKit2WebExtension.DOMDocument.DOMDocument)
{-# DEPRECATED dOMDOMWindowGetDocument ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetDocument ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m WebKit2WebExtension.DOMDocument.DOMDocument
dOMDOMWindowGetDocument :: a -> m DOMDocument
dOMDOMWindowGetDocument self :: a
self = IO DOMDocument -> m DOMDocument
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMDocument -> m DOMDocument)
-> IO DOMDocument -> m DOMDocument
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMDocument
result <- Ptr DOMDOMWindow -> IO (Ptr DOMDocument)
webkit_dom_dom_window_get_document Ptr DOMDOMWindow
self'
Text -> Ptr DOMDocument -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "dOMDOMWindowGetDocument" Ptr DOMDocument
result
DOMDocument
result' <- ((ManagedPtr DOMDocument -> DOMDocument)
-> Ptr DOMDocument -> IO DOMDocument
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr DOMDocument -> DOMDocument
WebKit2WebExtension.DOMDocument.DOMDocument) Ptr DOMDocument
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
DOMDocument -> IO DOMDocument
forall (m :: * -> *) a. Monad m => a -> m a
return DOMDocument
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetDocumentMethodInfo
instance (signature ~ (m WebKit2WebExtension.DOMDocument.DOMDocument), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetDocumentMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetDocument
#endif
foreign import ccall "webkit_dom_dom_window_get_frame_element" webkit_dom_dom_window_get_frame_element ::
Ptr DOMDOMWindow ->
IO (Ptr WebKit2WebExtension.DOMElement.DOMElement)
{-# DEPRECATED dOMDOMWindowGetFrameElement ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetFrameElement ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m WebKit2WebExtension.DOMElement.DOMElement
dOMDOMWindowGetFrameElement :: a -> m DOMElement
dOMDOMWindowGetFrameElement self :: a
self = IO DOMElement -> m DOMElement
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMElement -> m DOMElement) -> IO DOMElement -> m DOMElement
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMElement
result <- Ptr DOMDOMWindow -> IO (Ptr DOMElement)
webkit_dom_dom_window_get_frame_element Ptr DOMDOMWindow
self'
Text -> Ptr DOMElement -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "dOMDOMWindowGetFrameElement" Ptr DOMElement
result
DOMElement
result' <- ((ManagedPtr DOMElement -> DOMElement)
-> Ptr DOMElement -> IO DOMElement
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr DOMElement -> DOMElement
WebKit2WebExtension.DOMElement.DOMElement) Ptr DOMElement
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
DOMElement -> IO DOMElement
forall (m :: * -> *) a. Monad m => a -> m a
return DOMElement
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetFrameElementMethodInfo
instance (signature ~ (m WebKit2WebExtension.DOMElement.DOMElement), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetFrameElementMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetFrameElement
#endif
foreign import ccall "webkit_dom_dom_window_get_frames" webkit_dom_dom_window_get_frames ::
Ptr DOMDOMWindow ->
IO (Ptr DOMDOMWindow)
{-# DEPRECATED dOMDOMWindowGetFrames ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetFrames ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m DOMDOMWindow
dOMDOMWindowGetFrames :: a -> m DOMDOMWindow
dOMDOMWindowGetFrames self :: a
self = IO DOMDOMWindow -> m DOMDOMWindow
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMDOMWindow -> m DOMDOMWindow)
-> IO DOMDOMWindow -> m DOMDOMWindow
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMDOMWindow
result <- Ptr DOMDOMWindow -> IO (Ptr DOMDOMWindow)
webkit_dom_dom_window_get_frames Ptr DOMDOMWindow
self'
Text -> Ptr DOMDOMWindow -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "dOMDOMWindowGetFrames" Ptr DOMDOMWindow
result
DOMDOMWindow
result' <- ((ManagedPtr DOMDOMWindow -> DOMDOMWindow)
-> Ptr DOMDOMWindow -> IO DOMDOMWindow
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
wrapObject ManagedPtr DOMDOMWindow -> DOMDOMWindow
DOMDOMWindow) Ptr DOMDOMWindow
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
DOMDOMWindow -> IO DOMDOMWindow
forall (m :: * -> *) a. Monad m => a -> m a
return DOMDOMWindow
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetFramesMethodInfo
instance (signature ~ (m DOMDOMWindow), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetFramesMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetFrames
#endif
foreign import ccall "webkit_dom_dom_window_get_inner_height" webkit_dom_dom_window_get_inner_height ::
Ptr DOMDOMWindow ->
IO CLong
{-# DEPRECATED dOMDOMWindowGetInnerHeight ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetInnerHeight ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m CLong
dOMDOMWindowGetInnerHeight :: a -> m CLong
dOMDOMWindowGetInnerHeight self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMDOMWindow -> IO CLong
webkit_dom_dom_window_get_inner_height Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetInnerHeightMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetInnerHeightMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetInnerHeight
#endif
foreign import ccall "webkit_dom_dom_window_get_inner_width" webkit_dom_dom_window_get_inner_width ::
Ptr DOMDOMWindow ->
IO CLong
{-# DEPRECATED dOMDOMWindowGetInnerWidth ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetInnerWidth ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m CLong
dOMDOMWindowGetInnerWidth :: a -> m CLong
dOMDOMWindowGetInnerWidth self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMDOMWindow -> IO CLong
webkit_dom_dom_window_get_inner_width Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetInnerWidthMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetInnerWidthMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetInnerWidth
#endif
foreign import ccall "webkit_dom_dom_window_get_length" webkit_dom_dom_window_get_length ::
Ptr DOMDOMWindow ->
IO CULong
{-# DEPRECATED dOMDOMWindowGetLength ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetLength ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m CULong
dOMDOMWindowGetLength :: a -> m CULong
dOMDOMWindowGetLength self :: a
self = IO CULong -> m CULong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CULong -> m CULong) -> IO CULong -> m CULong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CULong
result <- Ptr DOMDOMWindow -> IO CULong
webkit_dom_dom_window_get_length Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CULong -> IO CULong
forall (m :: * -> *) a. Monad m => a -> m a
return CULong
result
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetLengthMethodInfo
instance (signature ~ (m CULong), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetLengthMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetLength
#endif
foreign import ccall "webkit_dom_dom_window_get_name" webkit_dom_dom_window_get_name ::
Ptr DOMDOMWindow ->
IO CString
{-# DEPRECATED dOMDOMWindowGetName ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetName ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m T.Text
dOMDOMWindowGetName :: a -> m Text
dOMDOMWindowGetName self :: a
self = IO Text -> m Text
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr DOMDOMWindow -> IO CString
webkit_dom_dom_window_get_name Ptr DOMDOMWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "dOMDOMWindowGetName" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetNameMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetNameMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetName
#endif
foreign import ccall "webkit_dom_dom_window_get_offscreen_buffering" webkit_dom_dom_window_get_offscreen_buffering ::
Ptr DOMDOMWindow ->
IO CInt
{-# DEPRECATED dOMDOMWindowGetOffscreenBuffering ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetOffscreenBuffering ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m Bool
dOMDOMWindowGetOffscreenBuffering :: a -> m Bool
dOMDOMWindowGetOffscreenBuffering self :: a
self = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr DOMDOMWindow -> IO CInt
webkit_dom_dom_window_get_offscreen_buffering Ptr DOMDOMWindow
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= 0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetOffscreenBufferingMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetOffscreenBufferingMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetOffscreenBuffering
#endif
foreign import ccall "webkit_dom_dom_window_get_opener" webkit_dom_dom_window_get_opener ::
Ptr DOMDOMWindow ->
IO (Ptr DOMDOMWindow)
{-# DEPRECATED dOMDOMWindowGetOpener ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetOpener ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m DOMDOMWindow
dOMDOMWindowGetOpener :: a -> m DOMDOMWindow
dOMDOMWindowGetOpener self :: a
self = IO DOMDOMWindow -> m DOMDOMWindow
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMDOMWindow -> m DOMDOMWindow)
-> IO DOMDOMWindow -> m DOMDOMWindow
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMDOMWindow
result <- Ptr DOMDOMWindow -> IO (Ptr DOMDOMWindow)
webkit_dom_dom_window_get_opener Ptr DOMDOMWindow
self'
Text -> Ptr DOMDOMWindow -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "dOMDOMWindowGetOpener" Ptr DOMDOMWindow
result
DOMDOMWindow
result' <- ((ManagedPtr DOMDOMWindow -> DOMDOMWindow)
-> Ptr DOMDOMWindow -> IO DOMDOMWindow
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
wrapObject ManagedPtr DOMDOMWindow -> DOMDOMWindow
DOMDOMWindow) Ptr DOMDOMWindow
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
DOMDOMWindow -> IO DOMDOMWindow
forall (m :: * -> *) a. Monad m => a -> m a
return DOMDOMWindow
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetOpenerMethodInfo
instance (signature ~ (m DOMDOMWindow), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetOpenerMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetOpener
#endif
foreign import ccall "webkit_dom_dom_window_get_orientation" webkit_dom_dom_window_get_orientation ::
Ptr DOMDOMWindow ->
IO CLong
{-# DEPRECATED dOMDOMWindowGetOrientation ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetOrientation ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m CLong
dOMDOMWindowGetOrientation :: a -> m CLong
dOMDOMWindowGetOrientation self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMDOMWindow -> IO CLong
webkit_dom_dom_window_get_orientation Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetOrientationMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetOrientationMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetOrientation
#endif
foreign import ccall "webkit_dom_dom_window_get_outer_height" webkit_dom_dom_window_get_outer_height ::
Ptr DOMDOMWindow ->
IO CLong
{-# DEPRECATED dOMDOMWindowGetOuterHeight ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetOuterHeight ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m CLong
dOMDOMWindowGetOuterHeight :: a -> m CLong
dOMDOMWindowGetOuterHeight self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMDOMWindow -> IO CLong
webkit_dom_dom_window_get_outer_height Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetOuterHeightMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetOuterHeightMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetOuterHeight
#endif
foreign import ccall "webkit_dom_dom_window_get_outer_width" webkit_dom_dom_window_get_outer_width ::
Ptr DOMDOMWindow ->
IO CLong
{-# DEPRECATED dOMDOMWindowGetOuterWidth ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetOuterWidth ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m CLong
dOMDOMWindowGetOuterWidth :: a -> m CLong
dOMDOMWindowGetOuterWidth self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMDOMWindow -> IO CLong
webkit_dom_dom_window_get_outer_width Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetOuterWidthMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetOuterWidthMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetOuterWidth
#endif
foreign import ccall "webkit_dom_dom_window_get_page_x_offset" webkit_dom_dom_window_get_page_x_offset ::
Ptr DOMDOMWindow ->
IO CLong
{-# DEPRECATED dOMDOMWindowGetPageXOffset ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetPageXOffset ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m CLong
dOMDOMWindowGetPageXOffset :: a -> m CLong
dOMDOMWindowGetPageXOffset self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMDOMWindow -> IO CLong
webkit_dom_dom_window_get_page_x_offset Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetPageXOffsetMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetPageXOffsetMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetPageXOffset
#endif
foreign import ccall "webkit_dom_dom_window_get_page_y_offset" webkit_dom_dom_window_get_page_y_offset ::
Ptr DOMDOMWindow ->
IO CLong
{-# DEPRECATED dOMDOMWindowGetPageYOffset ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetPageYOffset ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m CLong
dOMDOMWindowGetPageYOffset :: a -> m CLong
dOMDOMWindowGetPageYOffset self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMDOMWindow -> IO CLong
webkit_dom_dom_window_get_page_y_offset Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetPageYOffsetMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetPageYOffsetMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetPageYOffset
#endif
foreign import ccall "webkit_dom_dom_window_get_parent" webkit_dom_dom_window_get_parent ::
Ptr DOMDOMWindow ->
IO (Ptr DOMDOMWindow)
{-# DEPRECATED dOMDOMWindowGetParent ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetParent ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m DOMDOMWindow
dOMDOMWindowGetParent :: a -> m DOMDOMWindow
dOMDOMWindowGetParent self :: a
self = IO DOMDOMWindow -> m DOMDOMWindow
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMDOMWindow -> m DOMDOMWindow)
-> IO DOMDOMWindow -> m DOMDOMWindow
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMDOMWindow
result <- Ptr DOMDOMWindow -> IO (Ptr DOMDOMWindow)
webkit_dom_dom_window_get_parent Ptr DOMDOMWindow
self'
Text -> Ptr DOMDOMWindow -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "dOMDOMWindowGetParent" Ptr DOMDOMWindow
result
DOMDOMWindow
result' <- ((ManagedPtr DOMDOMWindow -> DOMDOMWindow)
-> Ptr DOMDOMWindow -> IO DOMDOMWindow
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
wrapObject ManagedPtr DOMDOMWindow -> DOMDOMWindow
DOMDOMWindow) Ptr DOMDOMWindow
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
DOMDOMWindow -> IO DOMDOMWindow
forall (m :: * -> *) a. Monad m => a -> m a
return DOMDOMWindow
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetParentMethodInfo
instance (signature ~ (m DOMDOMWindow), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetParentMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetParent
#endif
foreign import ccall "webkit_dom_dom_window_get_screen_left" webkit_dom_dom_window_get_screen_left ::
Ptr DOMDOMWindow ->
IO CLong
{-# DEPRECATED dOMDOMWindowGetScreenLeft ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetScreenLeft ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m CLong
dOMDOMWindowGetScreenLeft :: a -> m CLong
dOMDOMWindowGetScreenLeft self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMDOMWindow -> IO CLong
webkit_dom_dom_window_get_screen_left Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetScreenLeftMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetScreenLeftMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetScreenLeft
#endif
foreign import ccall "webkit_dom_dom_window_get_screen_top" webkit_dom_dom_window_get_screen_top ::
Ptr DOMDOMWindow ->
IO CLong
{-# DEPRECATED dOMDOMWindowGetScreenTop ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetScreenTop ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m CLong
dOMDOMWindowGetScreenTop :: a -> m CLong
dOMDOMWindowGetScreenTop self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMDOMWindow -> IO CLong
webkit_dom_dom_window_get_screen_top Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetScreenTopMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetScreenTopMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetScreenTop
#endif
foreign import ccall "webkit_dom_dom_window_get_screen_x" webkit_dom_dom_window_get_screen_x ::
Ptr DOMDOMWindow ->
IO CLong
{-# DEPRECATED dOMDOMWindowGetScreenX ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetScreenX ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m CLong
dOMDOMWindowGetScreenX :: a -> m CLong
dOMDOMWindowGetScreenX self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMDOMWindow -> IO CLong
webkit_dom_dom_window_get_screen_x Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetScreenXMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetScreenXMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetScreenX
#endif
foreign import ccall "webkit_dom_dom_window_get_screen_y" webkit_dom_dom_window_get_screen_y ::
Ptr DOMDOMWindow ->
IO CLong
{-# DEPRECATED dOMDOMWindowGetScreenY ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetScreenY ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m CLong
dOMDOMWindowGetScreenY :: a -> m CLong
dOMDOMWindowGetScreenY self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMDOMWindow -> IO CLong
webkit_dom_dom_window_get_screen_y Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetScreenYMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetScreenYMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetScreenY
#endif
foreign import ccall "webkit_dom_dom_window_get_scroll_x" webkit_dom_dom_window_get_scroll_x ::
Ptr DOMDOMWindow ->
IO CLong
{-# DEPRECATED dOMDOMWindowGetScrollX ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetScrollX ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m CLong
dOMDOMWindowGetScrollX :: a -> m CLong
dOMDOMWindowGetScrollX self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMDOMWindow -> IO CLong
webkit_dom_dom_window_get_scroll_x Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetScrollXMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetScrollXMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetScrollX
#endif
foreign import ccall "webkit_dom_dom_window_get_scroll_y" webkit_dom_dom_window_get_scroll_y ::
Ptr DOMDOMWindow ->
IO CLong
{-# DEPRECATED dOMDOMWindowGetScrollY ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetScrollY ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m CLong
dOMDOMWindowGetScrollY :: a -> m CLong
dOMDOMWindowGetScrollY self :: a
self = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMDOMWindow -> IO CLong
webkit_dom_dom_window_get_scroll_y Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetScrollYMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetScrollYMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetScrollY
#endif
foreign import ccall "webkit_dom_dom_window_get_selection" webkit_dom_dom_window_get_selection ::
Ptr DOMDOMWindow ->
IO (Ptr WebKit2WebExtension.DOMDOMSelection.DOMDOMSelection)
{-# DEPRECATED dOMDOMWindowGetSelection ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetSelection ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m WebKit2WebExtension.DOMDOMSelection.DOMDOMSelection
dOMDOMWindowGetSelection :: a -> m DOMDOMSelection
dOMDOMWindowGetSelection self :: a
self = IO DOMDOMSelection -> m DOMDOMSelection
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMDOMSelection -> m DOMDOMSelection)
-> IO DOMDOMSelection -> m DOMDOMSelection
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMDOMSelection
result <- Ptr DOMDOMWindow -> IO (Ptr DOMDOMSelection)
webkit_dom_dom_window_get_selection Ptr DOMDOMWindow
self'
Text -> Ptr DOMDOMSelection -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "dOMDOMWindowGetSelection" Ptr DOMDOMSelection
result
DOMDOMSelection
result' <- ((ManagedPtr DOMDOMSelection -> DOMDOMSelection)
-> Ptr DOMDOMSelection -> IO DOMDOMSelection
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
wrapObject ManagedPtr DOMDOMSelection -> DOMDOMSelection
WebKit2WebExtension.DOMDOMSelection.DOMDOMSelection) Ptr DOMDOMSelection
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
DOMDOMSelection -> IO DOMDOMSelection
forall (m :: * -> *) a. Monad m => a -> m a
return DOMDOMSelection
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetSelectionMethodInfo
instance (signature ~ (m WebKit2WebExtension.DOMDOMSelection.DOMDOMSelection), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetSelectionMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetSelection
#endif
foreign import ccall "webkit_dom_dom_window_get_self" webkit_dom_dom_window_get_self ::
Ptr DOMDOMWindow ->
IO (Ptr DOMDOMWindow)
{-# DEPRECATED dOMDOMWindowGetSelf ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetSelf ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m DOMDOMWindow
dOMDOMWindowGetSelf :: a -> m DOMDOMWindow
dOMDOMWindowGetSelf self :: a
self = IO DOMDOMWindow -> m DOMDOMWindow
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMDOMWindow -> m DOMDOMWindow)
-> IO DOMDOMWindow -> m DOMDOMWindow
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMDOMWindow
result <- Ptr DOMDOMWindow -> IO (Ptr DOMDOMWindow)
webkit_dom_dom_window_get_self Ptr DOMDOMWindow
self'
Text -> Ptr DOMDOMWindow -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "dOMDOMWindowGetSelf" Ptr DOMDOMWindow
result
DOMDOMWindow
result' <- ((ManagedPtr DOMDOMWindow -> DOMDOMWindow)
-> Ptr DOMDOMWindow -> IO DOMDOMWindow
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
wrapObject ManagedPtr DOMDOMWindow -> DOMDOMWindow
DOMDOMWindow) Ptr DOMDOMWindow
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
DOMDOMWindow -> IO DOMDOMWindow
forall (m :: * -> *) a. Monad m => a -> m a
return DOMDOMWindow
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetSelfMethodInfo
instance (signature ~ (m DOMDOMWindow), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetSelfMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetSelf
#endif
foreign import ccall "webkit_dom_dom_window_get_status" webkit_dom_dom_window_get_status ::
Ptr DOMDOMWindow ->
IO CString
{-# DEPRECATED dOMDOMWindowGetStatus ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetStatus ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m T.Text
dOMDOMWindowGetStatus :: a -> m Text
dOMDOMWindowGetStatus self :: a
self = IO Text -> m Text
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr DOMDOMWindow -> IO CString
webkit_dom_dom_window_get_status Ptr DOMDOMWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "dOMDOMWindowGetStatus" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetStatusMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetStatusMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetStatus
#endif
foreign import ccall "webkit_dom_dom_window_get_top" webkit_dom_dom_window_get_top ::
Ptr DOMDOMWindow ->
IO (Ptr DOMDOMWindow)
{-# DEPRECATED dOMDOMWindowGetTop ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetTop ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m DOMDOMWindow
dOMDOMWindowGetTop :: a -> m DOMDOMWindow
dOMDOMWindowGetTop self :: a
self = IO DOMDOMWindow -> m DOMDOMWindow
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMDOMWindow -> m DOMDOMWindow)
-> IO DOMDOMWindow -> m DOMDOMWindow
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMDOMWindow
result <- Ptr DOMDOMWindow -> IO (Ptr DOMDOMWindow)
webkit_dom_dom_window_get_top Ptr DOMDOMWindow
self'
Text -> Ptr DOMDOMWindow -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "dOMDOMWindowGetTop" Ptr DOMDOMWindow
result
DOMDOMWindow
result' <- ((ManagedPtr DOMDOMWindow -> DOMDOMWindow)
-> Ptr DOMDOMWindow -> IO DOMDOMWindow
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
wrapObject ManagedPtr DOMDOMWindow -> DOMDOMWindow
DOMDOMWindow) Ptr DOMDOMWindow
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
DOMDOMWindow -> IO DOMDOMWindow
forall (m :: * -> *) a. Monad m => a -> m a
return DOMDOMWindow
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetTopMethodInfo
instance (signature ~ (m DOMDOMWindow), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetTopMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetTop
#endif
foreign import ccall "webkit_dom_dom_window_get_window" webkit_dom_dom_window_get_window ::
Ptr DOMDOMWindow ->
IO (Ptr DOMDOMWindow)
{-# DEPRECATED dOMDOMWindowGetWindow ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowGetWindow ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m DOMDOMWindow
dOMDOMWindowGetWindow :: a -> m DOMDOMWindow
dOMDOMWindowGetWindow self :: a
self = IO DOMDOMWindow -> m DOMDOMWindow
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMDOMWindow -> m DOMDOMWindow)
-> IO DOMDOMWindow -> m DOMDOMWindow
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMDOMWindow
result <- Ptr DOMDOMWindow -> IO (Ptr DOMDOMWindow)
webkit_dom_dom_window_get_window Ptr DOMDOMWindow
self'
Text -> Ptr DOMDOMWindow -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "dOMDOMWindowGetWindow" Ptr DOMDOMWindow
result
DOMDOMWindow
result' <- ((ManagedPtr DOMDOMWindow -> DOMDOMWindow)
-> Ptr DOMDOMWindow -> IO DOMDOMWindow
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
wrapObject ManagedPtr DOMDOMWindow -> DOMDOMWindow
DOMDOMWindow) Ptr DOMDOMWindow
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
DOMDOMWindow -> IO DOMDOMWindow
forall (m :: * -> *) a. Monad m => a -> m a
return DOMDOMWindow
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowGetWindowMethodInfo
instance (signature ~ (m DOMDOMWindow), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowGetWindowMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetWindow
#endif
foreign import ccall "webkit_dom_dom_window_move_by" webkit_dom_dom_window_move_by ::
Ptr DOMDOMWindow ->
CFloat ->
CFloat ->
IO ()
{-# DEPRECATED dOMDOMWindowMoveBy ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowMoveBy ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> Float
-> Float
-> m ()
dOMDOMWindowMoveBy :: a -> Float -> Float -> m ()
dOMDOMWindowMoveBy self :: a
self x :: Float
x y :: Float
y = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let x' :: CFloat
x' = Float -> CFloat
forall a b. (Real a, Fractional b) => a -> b
realToFrac Float
x
let y' :: CFloat
y' = Float -> CFloat
forall a b. (Real a, Fractional b) => a -> b
realToFrac Float
y
Ptr DOMDOMWindow -> CFloat -> CFloat -> IO ()
webkit_dom_dom_window_move_by Ptr DOMDOMWindow
self' CFloat
x' CFloat
y'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowMoveByMethodInfo
instance (signature ~ (Float -> Float -> m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowMoveByMethodInfo a signature where
overloadedMethod = dOMDOMWindowMoveBy
#endif
foreign import ccall "webkit_dom_dom_window_move_to" webkit_dom_dom_window_move_to ::
Ptr DOMDOMWindow ->
CFloat ->
CFloat ->
IO ()
{-# DEPRECATED dOMDOMWindowMoveTo ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowMoveTo ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> Float
-> Float
-> m ()
dOMDOMWindowMoveTo :: a -> Float -> Float -> m ()
dOMDOMWindowMoveTo self :: a
self x :: Float
x y :: Float
y = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let x' :: CFloat
x' = Float -> CFloat
forall a b. (Real a, Fractional b) => a -> b
realToFrac Float
x
let y' :: CFloat
y' = Float -> CFloat
forall a b. (Real a, Fractional b) => a -> b
realToFrac Float
y
Ptr DOMDOMWindow -> CFloat -> CFloat -> IO ()
webkit_dom_dom_window_move_to Ptr DOMDOMWindow
self' CFloat
x' CFloat
y'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowMoveToMethodInfo
instance (signature ~ (Float -> Float -> m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowMoveToMethodInfo a signature where
overloadedMethod = dOMDOMWindowMoveTo
#endif
foreign import ccall "webkit_dom_dom_window_print" webkit_dom_dom_window_print ::
Ptr DOMDOMWindow ->
IO ()
{-# DEPRECATED dOMDOMWindowPrint ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowPrint ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m ()
dOMDOMWindowPrint :: a -> m ()
dOMDOMWindowPrint self :: a
self = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMDOMWindow -> IO ()
webkit_dom_dom_window_print Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowPrintMethodInfo
instance (signature ~ (m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowPrintMethodInfo a signature where
overloadedMethod = dOMDOMWindowPrint
#endif
foreign import ccall "webkit_dom_dom_window_prompt" webkit_dom_dom_window_prompt ::
Ptr DOMDOMWindow ->
CString ->
CString ->
IO CString
{-# DEPRECATED dOMDOMWindowPrompt ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowPrompt ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> T.Text
-> T.Text
-> m T.Text
dOMDOMWindowPrompt :: a -> Text -> Text -> m Text
dOMDOMWindowPrompt self :: a
self message :: Text
message defaultValue :: Text
defaultValue = IO Text -> m Text
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
message' <- Text -> IO CString
textToCString Text
message
CString
defaultValue' <- Text -> IO CString
textToCString Text
defaultValue
CString
result <- Ptr DOMDOMWindow -> CString -> CString -> IO CString
webkit_dom_dom_window_prompt Ptr DOMDOMWindow
self' CString
message' CString
defaultValue'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "dOMDOMWindowPrompt" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
message'
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
defaultValue'
Text -> IO Text
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowPromptMethodInfo
instance (signature ~ (T.Text -> T.Text -> m T.Text), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowPromptMethodInfo a signature where
overloadedMethod = dOMDOMWindowPrompt
#endif
foreign import ccall "webkit_dom_dom_window_release_events" webkit_dom_dom_window_release_events ::
Ptr DOMDOMWindow ->
IO ()
{-# DEPRECATED dOMDOMWindowReleaseEvents ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowReleaseEvents ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m ()
dOMDOMWindowReleaseEvents :: a -> m ()
dOMDOMWindowReleaseEvents self :: a
self = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMDOMWindow -> IO ()
webkit_dom_dom_window_release_events Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowReleaseEventsMethodInfo
instance (signature ~ (m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowReleaseEventsMethodInfo a signature where
overloadedMethod = dOMDOMWindowReleaseEvents
#endif
foreign import ccall "webkit_dom_dom_window_resize_by" webkit_dom_dom_window_resize_by ::
Ptr DOMDOMWindow ->
CFloat ->
CFloat ->
IO ()
{-# DEPRECATED dOMDOMWindowResizeBy ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowResizeBy ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> Float
-> Float
-> m ()
dOMDOMWindowResizeBy :: a -> Float -> Float -> m ()
dOMDOMWindowResizeBy self :: a
self x :: Float
x y :: Float
y = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let x' :: CFloat
x' = Float -> CFloat
forall a b. (Real a, Fractional b) => a -> b
realToFrac Float
x
let y' :: CFloat
y' = Float -> CFloat
forall a b. (Real a, Fractional b) => a -> b
realToFrac Float
y
Ptr DOMDOMWindow -> CFloat -> CFloat -> IO ()
webkit_dom_dom_window_resize_by Ptr DOMDOMWindow
self' CFloat
x' CFloat
y'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowResizeByMethodInfo
instance (signature ~ (Float -> Float -> m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowResizeByMethodInfo a signature where
overloadedMethod = dOMDOMWindowResizeBy
#endif
foreign import ccall "webkit_dom_dom_window_resize_to" webkit_dom_dom_window_resize_to ::
Ptr DOMDOMWindow ->
CFloat ->
CFloat ->
IO ()
{-# DEPRECATED dOMDOMWindowResizeTo ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowResizeTo ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> Float
-> Float
-> m ()
dOMDOMWindowResizeTo :: a -> Float -> Float -> m ()
dOMDOMWindowResizeTo self :: a
self width :: Float
width height :: Float
height = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let width' :: CFloat
width' = Float -> CFloat
forall a b. (Real a, Fractional b) => a -> b
realToFrac Float
width
let height' :: CFloat
height' = Float -> CFloat
forall a b. (Real a, Fractional b) => a -> b
realToFrac Float
height
Ptr DOMDOMWindow -> CFloat -> CFloat -> IO ()
webkit_dom_dom_window_resize_to Ptr DOMDOMWindow
self' CFloat
width' CFloat
height'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowResizeToMethodInfo
instance (signature ~ (Float -> Float -> m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowResizeToMethodInfo a signature where
overloadedMethod = dOMDOMWindowResizeTo
#endif
foreign import ccall "webkit_dom_dom_window_scroll_by" webkit_dom_dom_window_scroll_by ::
Ptr DOMDOMWindow ->
CDouble ->
CDouble ->
IO ()
{-# DEPRECATED dOMDOMWindowScrollBy ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowScrollBy ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> Double
-> Double
-> m ()
dOMDOMWindowScrollBy :: a -> Double -> Double -> m ()
dOMDOMWindowScrollBy self :: a
self x :: Double
x y :: Double
y = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let x' :: CDouble
x' = Double -> CDouble
forall a b. (Real a, Fractional b) => a -> b
realToFrac Double
x
let y' :: CDouble
y' = Double -> CDouble
forall a b. (Real a, Fractional b) => a -> b
realToFrac Double
y
Ptr DOMDOMWindow -> CDouble -> CDouble -> IO ()
webkit_dom_dom_window_scroll_by Ptr DOMDOMWindow
self' CDouble
x' CDouble
y'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowScrollByMethodInfo
instance (signature ~ (Double -> Double -> m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowScrollByMethodInfo a signature where
overloadedMethod = dOMDOMWindowScrollBy
#endif
foreign import ccall "webkit_dom_dom_window_scroll_to" webkit_dom_dom_window_scroll_to ::
Ptr DOMDOMWindow ->
CDouble ->
CDouble ->
IO ()
{-# DEPRECATED dOMDOMWindowScrollTo ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowScrollTo ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> Double
-> Double
-> m ()
dOMDOMWindowScrollTo :: a -> Double -> Double -> m ()
dOMDOMWindowScrollTo self :: a
self x :: Double
x y :: Double
y = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let x' :: CDouble
x' = Double -> CDouble
forall a b. (Real a, Fractional b) => a -> b
realToFrac Double
x
let y' :: CDouble
y' = Double -> CDouble
forall a b. (Real a, Fractional b) => a -> b
realToFrac Double
y
Ptr DOMDOMWindow -> CDouble -> CDouble -> IO ()
webkit_dom_dom_window_scroll_to Ptr DOMDOMWindow
self' CDouble
x' CDouble
y'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowScrollToMethodInfo
instance (signature ~ (Double -> Double -> m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowScrollToMethodInfo a signature where
overloadedMethod = dOMDOMWindowScrollTo
#endif
foreign import ccall "webkit_dom_dom_window_set_default_status" webkit_dom_dom_window_set_default_status ::
Ptr DOMDOMWindow ->
CString ->
IO ()
{-# DEPRECATED dOMDOMWindowSetDefaultStatus ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowSetDefaultStatus ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> T.Text
-> m ()
dOMDOMWindowSetDefaultStatus :: a -> Text -> m ()
dOMDOMWindowSetDefaultStatus self :: a
self value :: Text
value = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
value' <- Text -> IO CString
textToCString Text
value
Ptr DOMDOMWindow -> CString -> IO ()
webkit_dom_dom_window_set_default_status Ptr DOMDOMWindow
self' CString
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
value'
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowSetDefaultStatusMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowSetDefaultStatusMethodInfo a signature where
overloadedMethod = dOMDOMWindowSetDefaultStatus
#endif
foreign import ccall "webkit_dom_dom_window_set_name" webkit_dom_dom_window_set_name ::
Ptr DOMDOMWindow ->
CString ->
IO ()
{-# DEPRECATED dOMDOMWindowSetName ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowSetName ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> T.Text
-> m ()
dOMDOMWindowSetName :: a -> Text -> m ()
dOMDOMWindowSetName self :: a
self value :: Text
value = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
value' <- Text -> IO CString
textToCString Text
value
Ptr DOMDOMWindow -> CString -> IO ()
webkit_dom_dom_window_set_name Ptr DOMDOMWindow
self' CString
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
value'
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowSetNameMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowSetNameMethodInfo a signature where
overloadedMethod = dOMDOMWindowSetName
#endif
foreign import ccall "webkit_dom_dom_window_set_status" webkit_dom_dom_window_set_status ::
Ptr DOMDOMWindow ->
CString ->
IO ()
{-# DEPRECATED dOMDOMWindowSetStatus ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowSetStatus ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> T.Text
-> m ()
dOMDOMWindowSetStatus :: a -> Text -> m ()
dOMDOMWindowSetStatus self :: a
self value :: Text
value = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
value' <- Text -> IO CString
textToCString Text
value
Ptr DOMDOMWindow -> CString -> IO ()
webkit_dom_dom_window_set_status Ptr DOMDOMWindow
self' CString
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
value'
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowSetStatusMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowSetStatusMethodInfo a signature where
overloadedMethod = dOMDOMWindowSetStatus
#endif
foreign import ccall "webkit_dom_dom_window_stop" webkit_dom_dom_window_stop ::
Ptr DOMDOMWindow ->
IO ()
{-# DEPRECATED dOMDOMWindowStop ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMDOMWindowStop ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> m ()
dOMDOMWindowStop :: a -> m ()
dOMDOMWindowStop self :: a
self = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
self' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMDOMWindow -> IO ()
webkit_dom_dom_window_stop Ptr DOMDOMWindow
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowStopMethodInfo
instance (signature ~ (m ()), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowStopMethodInfo a signature where
overloadedMethod = dOMDOMWindowStop
#endif
foreign import ccall "webkit_dom_dom_window_webkit_message_handlers_post_message" webkit_dom_dom_window_webkit_message_handlers_post_message ::
Ptr DOMDOMWindow ->
CString ->
CString ->
IO CInt
dOMDOMWindowWebkitMessageHandlersPostMessage ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a
-> T.Text
-> T.Text
-> m Bool
dOMDOMWindowWebkitMessageHandlersPostMessage :: a -> Text -> Text -> m Bool
dOMDOMWindowWebkitMessageHandlersPostMessage window :: a
window handler :: Text
handler message :: Text
message = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMDOMWindow
window' <- a -> IO (Ptr DOMDOMWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
window
CString
handler' <- Text -> IO CString
textToCString Text
handler
CString
message' <- Text -> IO CString
textToCString Text
message
CInt
result <- Ptr DOMDOMWindow -> CString -> CString -> IO CInt
webkit_dom_dom_window_webkit_message_handlers_post_message Ptr DOMDOMWindow
window' CString
handler' CString
message'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= 0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
window
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
handler'
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
message'
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DOMDOMWindowWebkitMessageHandlersPostMessageMethodInfo
instance (signature ~ (T.Text -> T.Text -> m Bool), MonadIO m, IsDOMDOMWindow a) => O.MethodInfo DOMDOMWindowWebkitMessageHandlersPostMessageMethodInfo a signature where
overloadedMethod = dOMDOMWindowWebkitMessageHandlersPostMessage
#endif