{-# 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 ,
#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.BasicTypes as B.Types
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GArray as B.GArray
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 Control.Monad.IO.Class as MIO
import qualified Data.Coerce as Coerce
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 GHC.Records as R
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 (SP.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)
instance SP.ManagedPtrNewtype DOMDOMWindow where
toManagedPtr :: DOMDOMWindow -> ManagedPtr DOMDOMWindow
toManagedPtr (DOMDOMWindow ManagedPtr DOMDOMWindow
p) = ManagedPtr DOMDOMWindow
p
foreign import ccall "webkit_dom_dom_window_get_type"
c_webkit_dom_dom_window_get_type :: IO B.Types.GType
instance B.Types.TypedObject DOMDOMWindow where
glibType :: IO GType
glibType = IO GType
c_webkit_dom_dom_window_get_type
instance B.Types.GObject DOMDOMWindow
class (SP.GObject o, O.IsDescendantOf DOMDOMWindow o) => IsDOMDOMWindow o
instance (SP.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 :: (MIO.MonadIO m, IsDOMDOMWindow o) => o -> m DOMDOMWindow
toDOMDOMWindow :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m DOMDOMWindow
toDOMDOMWindow = IO DOMDOMWindow -> m DOMDOMWindow
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr DOMDOMWindow -> DOMDOMWindow
DOMDOMWindow
instance B.GValue.IsGValue (Maybe DOMDOMWindow) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_webkit_dom_dom_window_get_type
gvalueSet_ :: Ptr GValue -> Maybe DOMDOMWindow -> IO ()
gvalueSet_ Ptr GValue
gv Maybe DOMDOMWindow
P.Nothing = Ptr GValue -> Ptr DOMDOMWindow -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr DOMDOMWindow
forall a. Ptr a
FP.nullPtr :: FP.Ptr DOMDOMWindow)
gvalueSet_ Ptr GValue
gv (P.Just DOMDOMWindow
obj) = DOMDOMWindow -> (Ptr DOMDOMWindow -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr DOMDOMWindow
obj (Ptr GValue -> Ptr DOMDOMWindow -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe DOMDOMWindow)
gvalueGet_ Ptr GValue
gv = do
Ptr DOMDOMWindow
ptr <- Ptr GValue -> IO (Ptr DOMDOMWindow)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr DOMDOMWindow)
if Ptr DOMDOMWindow
ptr Ptr DOMDOMWindow -> Ptr DOMDOMWindow -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr DOMDOMWindow
forall a. Ptr a
FP.nullPtr
then DOMDOMWindow -> Maybe DOMDOMWindow
forall a. a -> Maybe a
P.Just (DOMDOMWindow -> Maybe DOMDOMWindow)
-> IO DOMDOMWindow -> IO (Maybe DOMDOMWindow)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (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
else Maybe DOMDOMWindow -> IO (Maybe DOMDOMWindow)
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe DOMDOMWindow
forall a. Maybe a
P.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.OverloadedMethod 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
#if MIN_VERSION_base(4,13,0)
instance (info ~ ResolveDOMDOMWindowMethod t DOMDOMWindow, O.OverloadedMethod info DOMDOMWindow p, R.HasField t DOMDOMWindow p) => R.HasField t DOMDOMWindow p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveDOMDOMWindowMethod t DOMDOMWindow, O.OverloadedMethodInfo info DOMDOMWindow) => OL.IsLabel t (O.MethodProxy info DOMDOMWindow) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
getDOMDOMWindowClosed :: (MonadIO m, IsDOMDOMWindow o) => o -> m Bool
getDOMDOMWindowClosed :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m Bool
getDOMDOMWindowClosed o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.closed"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:closed"
})
#endif
getDOMDOMWindowDefaultStatus :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe T.Text)
getDOMDOMWindowDefaultStatus :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m (Maybe Text)
getDOMDOMWindowDefaultStatus o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"default-status"
setDOMDOMWindowDefaultStatus :: (MonadIO m, IsDOMDOMWindow o) => o -> T.Text -> m ()
setDOMDOMWindowDefaultStatus :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> Text -> m ()
setDOMDOMWindowDefaultStatus o
obj Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"default-status" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDOMDOMWindowDefaultStatus :: (IsDOMDOMWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructDOMDOMWindowDefaultStatus :: forall o (m :: * -> *).
(IsDOMDOMWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructDOMDOMWindowDefaultStatus Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"default-status" (Text -> Maybe Text
forall a. a -> Maybe a
P.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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.defaultStatus"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:defaultStatus"
})
#endif
getDOMDOMWindowDevicePixelRatio :: (MonadIO m, IsDOMDOMWindow o) => o -> m Double
getDOMDOMWindowDevicePixelRatio :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m Double
getDOMDOMWindowDevicePixelRatio o
obj = IO Double -> m Double
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.devicePixelRatio"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:devicePixelRatio"
})
#endif
getDOMDOMWindowDocument :: (MonadIO m, IsDOMDOMWindow o) => o -> m WebKit2WebExtension.DOMDocument.DOMDocument
getDOMDOMWindowDocument :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m DOMDocument
getDOMDOMWindowDocument o
obj = IO DOMDocument -> m DOMDocument
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 Text
"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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.document"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:document"
})
#endif
getDOMDOMWindowFrameElement :: (MonadIO m, IsDOMDOMWindow o) => o -> m WebKit2WebExtension.DOMElement.DOMElement
getDOMDOMWindowFrameElement :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m DOMElement
getDOMDOMWindowFrameElement o
obj = IO DOMElement -> m DOMElement
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 Text
"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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.frameElement"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:frameElement"
})
#endif
getDOMDOMWindowFrames :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowFrames :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowFrames o
obj = IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.frames"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:frames"
})
#endif
getDOMDOMWindowInnerHeight :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowInnerHeight :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m CLong
getDOMDOMWindowInnerHeight o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.innerHeight"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:innerHeight"
})
#endif
getDOMDOMWindowInnerWidth :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowInnerWidth :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m CLong
getDOMDOMWindowInnerWidth o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.innerWidth"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:innerWidth"
})
#endif
getDOMDOMWindowLength :: (MonadIO m, IsDOMDOMWindow o) => o -> m CULong
getDOMDOMWindowLength :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m CULong
getDOMDOMWindowLength o
obj = IO CULong -> m CULong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.length"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:length"
})
#endif
getDOMDOMWindowName :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe T.Text)
getDOMDOMWindowName :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m (Maybe Text)
getDOMDOMWindowName o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"name"
setDOMDOMWindowName :: (MonadIO m, IsDOMDOMWindow o) => o -> T.Text -> m ()
setDOMDOMWindowName :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> Text -> m ()
setDOMDOMWindowName o
obj Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDOMDOMWindowName :: (IsDOMDOMWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructDOMDOMWindowName :: forall o (m :: * -> *).
(IsDOMDOMWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructDOMDOMWindowName Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"name" (Text -> Maybe Text
forall a. a -> Maybe a
P.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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.name"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:name"
})
#endif
getDOMDOMWindowOffscreenBuffering :: (MonadIO m, IsDOMDOMWindow o) => o -> m Bool
getDOMDOMWindowOffscreenBuffering :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m Bool
getDOMDOMWindowOffscreenBuffering o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.offscreenBuffering"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:offscreenBuffering"
})
#endif
getDOMDOMWindowOpener :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowOpener :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowOpener o
obj = IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.opener"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:opener"
})
#endif
getDOMDOMWindowOrientation :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowOrientation :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m CLong
getDOMDOMWindowOrientation o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.orientation"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:orientation"
})
#endif
getDOMDOMWindowOuterHeight :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowOuterHeight :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m CLong
getDOMDOMWindowOuterHeight o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.outerHeight"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:outerHeight"
})
#endif
getDOMDOMWindowOuterWidth :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowOuterWidth :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m CLong
getDOMDOMWindowOuterWidth o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.outerWidth"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:outerWidth"
})
#endif
getDOMDOMWindowPageXOffset :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowPageXOffset :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m CLong
getDOMDOMWindowPageXOffset o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.pageXOffset"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:pageXOffset"
})
#endif
getDOMDOMWindowPageYOffset :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowPageYOffset :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m CLong
getDOMDOMWindowPageYOffset o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.pageYOffset"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:pageYOffset"
})
#endif
getDOMDOMWindowParent :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowParent :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowParent o
obj = IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.parent"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:parent"
})
#endif
getDOMDOMWindowScreenLeft :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowScreenLeft :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m CLong
getDOMDOMWindowScreenLeft o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.screenLeft"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:screenLeft"
})
#endif
getDOMDOMWindowScreenTop :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowScreenTop :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m CLong
getDOMDOMWindowScreenTop o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.screenTop"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:screenTop"
})
#endif
getDOMDOMWindowScreenX :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowScreenX :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m CLong
getDOMDOMWindowScreenX o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.screenX"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:screenX"
})
#endif
getDOMDOMWindowScreenY :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowScreenY :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m CLong
getDOMDOMWindowScreenY o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.screenY"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:screenY"
})
#endif
getDOMDOMWindowScrollX :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowScrollX :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m CLong
getDOMDOMWindowScrollX o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.scrollX"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:scrollX"
})
#endif
getDOMDOMWindowScrollY :: (MonadIO m, IsDOMDOMWindow o) => o -> m CLong
getDOMDOMWindowScrollY :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m CLong
getDOMDOMWindowScrollY o
obj = IO CLong -> m CLong
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.scrollY"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:scrollY"
})
#endif
getDOMDOMWindowSelf :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowSelf :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowSelf o
obj = IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.self"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:self"
})
#endif
getDOMDOMWindowStatus :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe T.Text)
getDOMDOMWindowStatus :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m (Maybe Text)
getDOMDOMWindowStatus o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"status"
setDOMDOMWindowStatus :: (MonadIO m, IsDOMDOMWindow o) => o -> T.Text -> m ()
setDOMDOMWindowStatus :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> Text -> m ()
setDOMDOMWindowStatus o
obj Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"status" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDOMDOMWindowStatus :: (IsDOMDOMWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructDOMDOMWindowStatus :: forall o (m :: * -> *).
(IsDOMDOMWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructDOMDOMWindowStatus Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"status" (Text -> Maybe Text
forall a. a -> Maybe a
P.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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.status"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:status"
})
#endif
getDOMDOMWindowTop :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowTop :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowTop o
obj = IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.top"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:top"
})
#endif
getDOMDOMWindowWindow :: (MonadIO m, IsDOMDOMWindow o) => o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowWindow :: forall (m :: * -> *) o.
(MonadIO m, IsDOMDOMWindow o) =>
o -> m (Maybe DOMDOMWindow)
getDOMDOMWindowWindow o
obj = IO (Maybe DOMDOMWindow) -> m (Maybe DOMDOMWindow)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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 String
"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
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.window"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#g:attr:window"
})
#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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> Text -> m ()
dOMDOMWindowAlert a
self 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.OverloadedMethod DOMDOMWindowAlertMethodInfo a signature where
overloadedMethod = dOMDOMWindowAlert
instance O.OverloadedMethodInfo DOMDOMWindowAlertMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowAlert",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m ()
dOMDOMWindowBlur 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.OverloadedMethod DOMDOMWindowBlurMethodInfo a signature where
overloadedMethod = dOMDOMWindowBlur
instance O.OverloadedMethodInfo DOMDOMWindowBlurMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowBlur",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m ()
dOMDOMWindowCaptureEvents 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.OverloadedMethod DOMDOMWindowCaptureEventsMethodInfo a signature where
overloadedMethod = dOMDOMWindowCaptureEvents
instance O.OverloadedMethodInfo DOMDOMWindowCaptureEventsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowCaptureEvents",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m ()
dOMDOMWindowClose 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.OverloadedMethod DOMDOMWindowCloseMethodInfo a signature where
overloadedMethod = dOMDOMWindowClose
instance O.OverloadedMethodInfo DOMDOMWindowCloseMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowClose",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> Text -> m Bool
dOMDOMWindowConfirm a
self 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
/= CInt
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.OverloadedMethod DOMDOMWindowConfirmMethodInfo a signature where
overloadedMethod = dOMDOMWindowConfirm
instance O.OverloadedMethodInfo DOMDOMWindowConfirmMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowConfirm",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> Text -> Bool -> Bool -> Bool -> Bool -> Bool -> Bool -> m Bool
dOMDOMWindowFind a
self Text
string Bool
caseSensitive Bool
backwards Bool
wrap Bool
wholeWord Bool
searchInFrames 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
/= CInt
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.OverloadedMethod DOMDOMWindowFindMethodInfo a signature where
overloadedMethod = dOMDOMWindowFind
instance O.OverloadedMethodInfo DOMDOMWindowFindMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowFind",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m ()
dOMDOMWindowFocus 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.OverloadedMethod DOMDOMWindowFocusMethodInfo a signature where
overloadedMethod = dOMDOMWindowFocus
instance O.OverloadedMethodInfo DOMDOMWindowFocusMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowFocus",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m Bool
dOMDOMWindowGetClosed 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
/= CInt
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.OverloadedMethod DOMDOMWindowGetClosedMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetClosed
instance O.OverloadedMethodInfo DOMDOMWindowGetClosedMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetClosed",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsDOMDOMWindow a, IsDOMElement b) =>
a -> b -> Maybe Text -> m DOMCSSStyleDeclaration
dOMDOMWindowGetComputedStyle a
self b
element 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
Maybe Text
Nothing -> CString -> IO CString
forall (m :: * -> *) a. Monad m => a -> m a
return CString
forall a. Ptr a
nullPtr
Just 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 Text
"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.OverloadedMethod DOMDOMWindowGetComputedStyleMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetComputedStyle
instance O.OverloadedMethodInfo DOMDOMWindowGetComputedStyleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetComputedStyle",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m Text
dOMDOMWindowGetDefaultStatus 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 Text
"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.OverloadedMethod DOMDOMWindowGetDefaultStatusMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetDefaultStatus
instance O.OverloadedMethodInfo DOMDOMWindowGetDefaultStatusMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetDefaultStatus",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m Double
dOMDOMWindowGetDevicePixelRatio 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.OverloadedMethod DOMDOMWindowGetDevicePixelRatioMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetDevicePixelRatio
instance O.OverloadedMethodInfo DOMDOMWindowGetDevicePixelRatioMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetDevicePixelRatio",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m DOMDocument
dOMDOMWindowGetDocument 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 Text
"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.OverloadedMethod DOMDOMWindowGetDocumentMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetDocument
instance O.OverloadedMethodInfo DOMDOMWindowGetDocumentMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetDocument",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m DOMElement
dOMDOMWindowGetFrameElement 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 Text
"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.OverloadedMethod DOMDOMWindowGetFrameElementMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetFrameElement
instance O.OverloadedMethodInfo DOMDOMWindowGetFrameElementMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetFrameElement",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m DOMDOMWindow
dOMDOMWindowGetFrames 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 Text
"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.OverloadedMethod DOMDOMWindowGetFramesMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetFrames
instance O.OverloadedMethodInfo DOMDOMWindowGetFramesMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetFrames",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m CLong
dOMDOMWindowGetInnerHeight 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.OverloadedMethod DOMDOMWindowGetInnerHeightMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetInnerHeight
instance O.OverloadedMethodInfo DOMDOMWindowGetInnerHeightMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetInnerHeight",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m CLong
dOMDOMWindowGetInnerWidth 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.OverloadedMethod DOMDOMWindowGetInnerWidthMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetInnerWidth
instance O.OverloadedMethodInfo DOMDOMWindowGetInnerWidthMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetInnerWidth",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m CULong
dOMDOMWindowGetLength 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.OverloadedMethod DOMDOMWindowGetLengthMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetLength
instance O.OverloadedMethodInfo DOMDOMWindowGetLengthMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetLength",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m Text
dOMDOMWindowGetName 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 Text
"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.OverloadedMethod DOMDOMWindowGetNameMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetName
instance O.OverloadedMethodInfo DOMDOMWindowGetNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m Bool
dOMDOMWindowGetOffscreenBuffering 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
/= CInt
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.OverloadedMethod DOMDOMWindowGetOffscreenBufferingMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetOffscreenBuffering
instance O.OverloadedMethodInfo DOMDOMWindowGetOffscreenBufferingMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetOffscreenBuffering",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m DOMDOMWindow
dOMDOMWindowGetOpener 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 Text
"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.OverloadedMethod DOMDOMWindowGetOpenerMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetOpener
instance O.OverloadedMethodInfo DOMDOMWindowGetOpenerMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetOpener",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m CLong
dOMDOMWindowGetOrientation 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.OverloadedMethod DOMDOMWindowGetOrientationMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetOrientation
instance O.OverloadedMethodInfo DOMDOMWindowGetOrientationMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetOrientation",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m CLong
dOMDOMWindowGetOuterHeight 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.OverloadedMethod DOMDOMWindowGetOuterHeightMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetOuterHeight
instance O.OverloadedMethodInfo DOMDOMWindowGetOuterHeightMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetOuterHeight",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m CLong
dOMDOMWindowGetOuterWidth 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.OverloadedMethod DOMDOMWindowGetOuterWidthMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetOuterWidth
instance O.OverloadedMethodInfo DOMDOMWindowGetOuterWidthMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetOuterWidth",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m CLong
dOMDOMWindowGetPageXOffset 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.OverloadedMethod DOMDOMWindowGetPageXOffsetMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetPageXOffset
instance O.OverloadedMethodInfo DOMDOMWindowGetPageXOffsetMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetPageXOffset",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m CLong
dOMDOMWindowGetPageYOffset 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.OverloadedMethod DOMDOMWindowGetPageYOffsetMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetPageYOffset
instance O.OverloadedMethodInfo DOMDOMWindowGetPageYOffsetMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetPageYOffset",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m DOMDOMWindow
dOMDOMWindowGetParent 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 Text
"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.OverloadedMethod DOMDOMWindowGetParentMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetParent
instance O.OverloadedMethodInfo DOMDOMWindowGetParentMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetParent",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m CLong
dOMDOMWindowGetScreenLeft 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.OverloadedMethod DOMDOMWindowGetScreenLeftMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetScreenLeft
instance O.OverloadedMethodInfo DOMDOMWindowGetScreenLeftMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetScreenLeft",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m CLong
dOMDOMWindowGetScreenTop 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.OverloadedMethod DOMDOMWindowGetScreenTopMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetScreenTop
instance O.OverloadedMethodInfo DOMDOMWindowGetScreenTopMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetScreenTop",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m CLong
dOMDOMWindowGetScreenX 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.OverloadedMethod DOMDOMWindowGetScreenXMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetScreenX
instance O.OverloadedMethodInfo DOMDOMWindowGetScreenXMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetScreenX",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m CLong
dOMDOMWindowGetScreenY 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.OverloadedMethod DOMDOMWindowGetScreenYMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetScreenY
instance O.OverloadedMethodInfo DOMDOMWindowGetScreenYMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetScreenY",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m CLong
dOMDOMWindowGetScrollX 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.OverloadedMethod DOMDOMWindowGetScrollXMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetScrollX
instance O.OverloadedMethodInfo DOMDOMWindowGetScrollXMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetScrollX",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m CLong
dOMDOMWindowGetScrollY 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.OverloadedMethod DOMDOMWindowGetScrollYMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetScrollY
instance O.OverloadedMethodInfo DOMDOMWindowGetScrollYMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetScrollY",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m DOMDOMSelection
dOMDOMWindowGetSelection 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 Text
"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.OverloadedMethod DOMDOMWindowGetSelectionMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetSelection
instance O.OverloadedMethodInfo DOMDOMWindowGetSelectionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetSelection",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m DOMDOMWindow
dOMDOMWindowGetSelf 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 Text
"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.OverloadedMethod DOMDOMWindowGetSelfMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetSelf
instance O.OverloadedMethodInfo DOMDOMWindowGetSelfMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetSelf",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m Text
dOMDOMWindowGetStatus 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 Text
"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.OverloadedMethod DOMDOMWindowGetStatusMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetStatus
instance O.OverloadedMethodInfo DOMDOMWindowGetStatusMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetStatus",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m DOMDOMWindow
dOMDOMWindowGetTop 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 Text
"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.OverloadedMethod DOMDOMWindowGetTopMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetTop
instance O.OverloadedMethodInfo DOMDOMWindowGetTopMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetTop",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m DOMDOMWindow
dOMDOMWindowGetWindow 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 Text
"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.OverloadedMethod DOMDOMWindowGetWindowMethodInfo a signature where
overloadedMethod = dOMDOMWindowGetWindow
instance O.OverloadedMethodInfo DOMDOMWindowGetWindowMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowGetWindow",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> Float -> Float -> m ()
dOMDOMWindowMoveBy a
self Float
x 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.OverloadedMethod DOMDOMWindowMoveByMethodInfo a signature where
overloadedMethod = dOMDOMWindowMoveBy
instance O.OverloadedMethodInfo DOMDOMWindowMoveByMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowMoveBy",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> Float -> Float -> m ()
dOMDOMWindowMoveTo a
self Float
x 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.OverloadedMethod DOMDOMWindowMoveToMethodInfo a signature where
overloadedMethod = dOMDOMWindowMoveTo
instance O.OverloadedMethodInfo DOMDOMWindowMoveToMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowMoveTo",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m ()
dOMDOMWindowPrint 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.OverloadedMethod DOMDOMWindowPrintMethodInfo a signature where
overloadedMethod = dOMDOMWindowPrint
instance O.OverloadedMethodInfo DOMDOMWindowPrintMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowPrint",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> Text -> Text -> m Text
dOMDOMWindowPrompt a
self Text
message 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 Text
"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.OverloadedMethod DOMDOMWindowPromptMethodInfo a signature where
overloadedMethod = dOMDOMWindowPrompt
instance O.OverloadedMethodInfo DOMDOMWindowPromptMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowPrompt",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m ()
dOMDOMWindowReleaseEvents 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.OverloadedMethod DOMDOMWindowReleaseEventsMethodInfo a signature where
overloadedMethod = dOMDOMWindowReleaseEvents
instance O.OverloadedMethodInfo DOMDOMWindowReleaseEventsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowReleaseEvents",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> Float -> Float -> m ()
dOMDOMWindowResizeBy a
self Float
x 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.OverloadedMethod DOMDOMWindowResizeByMethodInfo a signature where
overloadedMethod = dOMDOMWindowResizeBy
instance O.OverloadedMethodInfo DOMDOMWindowResizeByMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowResizeBy",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> Float -> Float -> m ()
dOMDOMWindowResizeTo a
self Float
width 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.OverloadedMethod DOMDOMWindowResizeToMethodInfo a signature where
overloadedMethod = dOMDOMWindowResizeTo
instance O.OverloadedMethodInfo DOMDOMWindowResizeToMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowResizeTo",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> Double -> Double -> m ()
dOMDOMWindowScrollBy a
self Double
x 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.OverloadedMethod DOMDOMWindowScrollByMethodInfo a signature where
overloadedMethod = dOMDOMWindowScrollBy
instance O.OverloadedMethodInfo DOMDOMWindowScrollByMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowScrollBy",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> Double -> Double -> m ()
dOMDOMWindowScrollTo a
self Double
x 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.OverloadedMethod DOMDOMWindowScrollToMethodInfo a signature where
overloadedMethod = dOMDOMWindowScrollTo
instance O.OverloadedMethodInfo DOMDOMWindowScrollToMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowScrollTo",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> Text -> m ()
dOMDOMWindowSetDefaultStatus a
self 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.OverloadedMethod DOMDOMWindowSetDefaultStatusMethodInfo a signature where
overloadedMethod = dOMDOMWindowSetDefaultStatus
instance O.OverloadedMethodInfo DOMDOMWindowSetDefaultStatusMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowSetDefaultStatus",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> Text -> m ()
dOMDOMWindowSetName a
self 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.OverloadedMethod DOMDOMWindowSetNameMethodInfo a signature where
overloadedMethod = dOMDOMWindowSetName
instance O.OverloadedMethodInfo DOMDOMWindowSetNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowSetName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> Text -> m ()
dOMDOMWindowSetStatus a
self 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.OverloadedMethod DOMDOMWindowSetStatusMethodInfo a signature where
overloadedMethod = dOMDOMWindowSetStatus
instance O.OverloadedMethodInfo DOMDOMWindowSetStatusMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowSetStatus",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> m ()
dOMDOMWindowStop 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.OverloadedMethod DOMDOMWindowStopMethodInfo a signature where
overloadedMethod = dOMDOMWindowStop
instance O.OverloadedMethodInfo DOMDOMWindowStopMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowStop",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v: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 :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMDOMWindow a) =>
a -> Text -> Text -> m Bool
dOMDOMWindowWebkitMessageHandlersPostMessage a
window Text
handler 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
/= CInt
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.OverloadedMethod DOMDOMWindowWebkitMessageHandlersPostMessageMethodInfo a signature where
overloadedMethod = dOMDOMWindowWebkitMessageHandlersPostMessage
instance O.OverloadedMethodInfo DOMDOMWindowWebkitMessageHandlersPostMessageMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMDOMWindow.dOMDOMWindowWebkitMessageHandlersPostMessage",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.27/docs/GI-WebKit2WebExtension-Objects-DOMDOMWindow.html#v:dOMDOMWindowWebkitMessageHandlersPostMessage"
})
#endif