module GI.WebKit.Objects.DOMWebKitNamedFlow
(
DOMWebKitNamedFlow(..) ,
IsDOMWebKitNamedFlow ,
toDOMWebKitNamedFlow ,
noDOMWebKitNamedFlow ,
DOMWebKitNamedFlowDispatchEventMethodInfo,
dOMWebKitNamedFlowDispatchEvent ,
DOMWebKitNamedFlowGetContentMethodInfo ,
dOMWebKitNamedFlowGetContent ,
DOMWebKitNamedFlowGetContentNodesMethodInfo,
dOMWebKitNamedFlowGetContentNodes ,
DOMWebKitNamedFlowGetFirstEmptyRegionIndexMethodInfo,
dOMWebKitNamedFlowGetFirstEmptyRegionIndex,
DOMWebKitNamedFlowGetNameMethodInfo ,
dOMWebKitNamedFlowGetName ,
DOMWebKitNamedFlowGetOverflowMethodInfo ,
dOMWebKitNamedFlowGetOverflow ,
DOMWebKitNamedFlowGetOversetMethodInfo ,
dOMWebKitNamedFlowGetOverset ,
DOMWebKitNamedFlowGetRegionsMethodInfo ,
dOMWebKitNamedFlowGetRegions ,
DOMWebKitNamedFlowGetRegionsByContentMethodInfo,
dOMWebKitNamedFlowGetRegionsByContent ,
DOMWebKitNamedFlowGetRegionsByContentNodeMethodInfo,
dOMWebKitNamedFlowGetRegionsByContentNode,
DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo,
dOMWebKitNamedFlowFirstEmptyRegionIndex ,
getDOMWebKitNamedFlowFirstEmptyRegionIndex,
DOMWebKitNamedFlowNamePropertyInfo ,
dOMWebKitNamedFlowName ,
getDOMWebKitNamedFlowName ,
DOMWebKitNamedFlowOversetPropertyInfo ,
dOMWebKitNamedFlowOverset ,
getDOMWebKitNamedFlowOverset ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
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 GI.GObject.Objects.Object as GObject.Object
import qualified GI.WebKit.Interfaces.DOMEventTarget as WebKit.DOMEventTarget
import qualified GI.WebKit.Objects.DOMEvent as WebKit.DOMEvent
import qualified GI.WebKit.Objects.DOMNode as WebKit.DOMNode
import qualified GI.WebKit.Objects.DOMNodeList as WebKit.DOMNodeList
import qualified GI.WebKit.Objects.DOMObject as WebKit.DOMObject
newtype DOMWebKitNamedFlow = DOMWebKitNamedFlow (ManagedPtr DOMWebKitNamedFlow)
foreign import ccall "webkit_dom_webkit_named_flow_get_type"
c_webkit_dom_webkit_named_flow_get_type :: IO GType
instance GObject DOMWebKitNamedFlow where
gobjectType _ = c_webkit_dom_webkit_named_flow_get_type
class GObject o => IsDOMWebKitNamedFlow o
#if MIN_VERSION_base(4,9,0)
instance (GObject a, O.UnknownAncestorError DOMWebKitNamedFlow a) =>
IsDOMWebKitNamedFlow a
#endif
instance IsDOMWebKitNamedFlow DOMWebKitNamedFlow
instance WebKit.DOMObject.IsDOMObject DOMWebKitNamedFlow
instance GObject.Object.IsObject DOMWebKitNamedFlow
instance WebKit.DOMEventTarget.IsDOMEventTarget DOMWebKitNamedFlow
toDOMWebKitNamedFlow :: IsDOMWebKitNamedFlow o => o -> IO DOMWebKitNamedFlow
toDOMWebKitNamedFlow = unsafeCastTo DOMWebKitNamedFlow
noDOMWebKitNamedFlow :: Maybe DOMWebKitNamedFlow
noDOMWebKitNamedFlow = Nothing
type family ResolveDOMWebKitNamedFlowMethod (t :: Symbol) (o :: *) :: * where
ResolveDOMWebKitNamedFlowMethod "addEventListener" o = WebKit.DOMEventTarget.DOMEventTargetAddEventListenerMethodInfo
ResolveDOMWebKitNamedFlowMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveDOMWebKitNamedFlowMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveDOMWebKitNamedFlowMethod "dispatchEvent" o = DOMWebKitNamedFlowDispatchEventMethodInfo
ResolveDOMWebKitNamedFlowMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveDOMWebKitNamedFlowMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveDOMWebKitNamedFlowMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveDOMWebKitNamedFlowMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveDOMWebKitNamedFlowMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveDOMWebKitNamedFlowMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveDOMWebKitNamedFlowMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveDOMWebKitNamedFlowMethod "removeEventListener" o = WebKit.DOMEventTarget.DOMEventTargetRemoveEventListenerMethodInfo
ResolveDOMWebKitNamedFlowMethod "replaceData" o = GObject.Object.ObjectReplaceDataMethodInfo
ResolveDOMWebKitNamedFlowMethod "replaceQdata" o = GObject.Object.ObjectReplaceQdataMethodInfo
ResolveDOMWebKitNamedFlowMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveDOMWebKitNamedFlowMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveDOMWebKitNamedFlowMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveDOMWebKitNamedFlowMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveDOMWebKitNamedFlowMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveDOMWebKitNamedFlowMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveDOMWebKitNamedFlowMethod "getContent" o = DOMWebKitNamedFlowGetContentMethodInfo
ResolveDOMWebKitNamedFlowMethod "getContentNodes" o = DOMWebKitNamedFlowGetContentNodesMethodInfo
ResolveDOMWebKitNamedFlowMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveDOMWebKitNamedFlowMethod "getFirstEmptyRegionIndex" o = DOMWebKitNamedFlowGetFirstEmptyRegionIndexMethodInfo
ResolveDOMWebKitNamedFlowMethod "getName" o = DOMWebKitNamedFlowGetNameMethodInfo
ResolveDOMWebKitNamedFlowMethod "getOverflow" o = DOMWebKitNamedFlowGetOverflowMethodInfo
ResolveDOMWebKitNamedFlowMethod "getOverset" o = DOMWebKitNamedFlowGetOversetMethodInfo
ResolveDOMWebKitNamedFlowMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveDOMWebKitNamedFlowMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveDOMWebKitNamedFlowMethod "getRegions" o = DOMWebKitNamedFlowGetRegionsMethodInfo
ResolveDOMWebKitNamedFlowMethod "getRegionsByContent" o = DOMWebKitNamedFlowGetRegionsByContentMethodInfo
ResolveDOMWebKitNamedFlowMethod "getRegionsByContentNode" o = DOMWebKitNamedFlowGetRegionsByContentNodeMethodInfo
ResolveDOMWebKitNamedFlowMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveDOMWebKitNamedFlowMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveDOMWebKitNamedFlowMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveDOMWebKitNamedFlowMethod t DOMWebKitNamedFlow, O.MethodInfo info DOMWebKitNamedFlow p) => O.IsLabelProxy t (DOMWebKitNamedFlow -> p) where
fromLabelProxy _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#if MIN_VERSION_base(4,9,0)
instance (info ~ ResolveDOMWebKitNamedFlowMethod t DOMWebKitNamedFlow, O.MethodInfo info DOMWebKitNamedFlow p) => O.IsLabel t (DOMWebKitNamedFlow -> p) where
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
getDOMWebKitNamedFlowFirstEmptyRegionIndex :: (MonadIO m, IsDOMWebKitNamedFlow o) => o -> m CLong
getDOMWebKitNamedFlowFirstEmptyRegionIndex obj = liftIO $ getObjectPropertyLong obj "first-empty-region-index"
data DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo
instance AttrInfo DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo where
type AttrAllowedOps DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo = IsDOMWebKitNamedFlow
type AttrGetType DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo = CLong
type AttrLabel DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo = "first-empty-region-index"
type AttrOrigin DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo = DOMWebKitNamedFlow
attrGet _ = getDOMWebKitNamedFlowFirstEmptyRegionIndex
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMWebKitNamedFlowName :: (MonadIO m, IsDOMWebKitNamedFlow o) => o -> m (Maybe T.Text)
getDOMWebKitNamedFlowName obj = liftIO $ getObjectPropertyString obj "name"
data DOMWebKitNamedFlowNamePropertyInfo
instance AttrInfo DOMWebKitNamedFlowNamePropertyInfo where
type AttrAllowedOps DOMWebKitNamedFlowNamePropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMWebKitNamedFlowNamePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMWebKitNamedFlowNamePropertyInfo = IsDOMWebKitNamedFlow
type AttrGetType DOMWebKitNamedFlowNamePropertyInfo = (Maybe T.Text)
type AttrLabel DOMWebKitNamedFlowNamePropertyInfo = "name"
type AttrOrigin DOMWebKitNamedFlowNamePropertyInfo = DOMWebKitNamedFlow
attrGet _ = getDOMWebKitNamedFlowName
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMWebKitNamedFlowOverset :: (MonadIO m, IsDOMWebKitNamedFlow o) => o -> m Bool
getDOMWebKitNamedFlowOverset obj = liftIO $ getObjectPropertyBool obj "overset"
data DOMWebKitNamedFlowOversetPropertyInfo
instance AttrInfo DOMWebKitNamedFlowOversetPropertyInfo where
type AttrAllowedOps DOMWebKitNamedFlowOversetPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMWebKitNamedFlowOversetPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMWebKitNamedFlowOversetPropertyInfo = IsDOMWebKitNamedFlow
type AttrGetType DOMWebKitNamedFlowOversetPropertyInfo = Bool
type AttrLabel DOMWebKitNamedFlowOversetPropertyInfo = "overset"
type AttrOrigin DOMWebKitNamedFlowOversetPropertyInfo = DOMWebKitNamedFlow
attrGet _ = getDOMWebKitNamedFlowOverset
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
instance O.HasAttributeList DOMWebKitNamedFlow
type instance O.AttributeList DOMWebKitNamedFlow = DOMWebKitNamedFlowAttributeList
type DOMWebKitNamedFlowAttributeList = ('[ '("coreObject", WebKit.DOMObject.DOMObjectCoreObjectPropertyInfo), '("firstEmptyRegionIndex", DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo), '("name", DOMWebKitNamedFlowNamePropertyInfo), '("overset", DOMWebKitNamedFlowOversetPropertyInfo)] :: [(Symbol, *)])
dOMWebKitNamedFlowFirstEmptyRegionIndex :: AttrLabelProxy "firstEmptyRegionIndex"
dOMWebKitNamedFlowFirstEmptyRegionIndex = AttrLabelProxy
dOMWebKitNamedFlowName :: AttrLabelProxy "name"
dOMWebKitNamedFlowName = AttrLabelProxy
dOMWebKitNamedFlowOverset :: AttrLabelProxy "overset"
dOMWebKitNamedFlowOverset = AttrLabelProxy
type instance O.SignalList DOMWebKitNamedFlow = DOMWebKitNamedFlowSignalList
type DOMWebKitNamedFlowSignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
foreign import ccall "webkit_dom_webkit_named_flow_dispatch_event" webkit_dom_webkit_named_flow_dispatch_event ::
Ptr DOMWebKitNamedFlow ->
Ptr WebKit.DOMEvent.DOMEvent ->
Ptr (Ptr GError) ->
IO CInt
dOMWebKitNamedFlowDispatchEvent ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWebKitNamedFlow a, WebKit.DOMEvent.IsDOMEvent b) =>
a
-> b
-> m ()
dOMWebKitNamedFlowDispatchEvent self event = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
event' <- unsafeManagedPtrCastPtr event
onException (do
_ <- propagateGError $ webkit_dom_webkit_named_flow_dispatch_event self' event'
touchManagedPtr self
touchManagedPtr event
return ()
) (do
return ()
)
data DOMWebKitNamedFlowDispatchEventMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsDOMWebKitNamedFlow a, WebKit.DOMEvent.IsDOMEvent b) => O.MethodInfo DOMWebKitNamedFlowDispatchEventMethodInfo a signature where
overloadedMethod _ = dOMWebKitNamedFlowDispatchEvent
foreign import ccall "webkit_dom_webkit_named_flow_get_content" webkit_dom_webkit_named_flow_get_content ::
Ptr DOMWebKitNamedFlow ->
IO (Ptr WebKit.DOMNodeList.DOMNodeList)
dOMWebKitNamedFlowGetContent ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWebKitNamedFlow a) =>
a
-> m WebKit.DOMNodeList.DOMNodeList
dOMWebKitNamedFlowGetContent self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_webkit_named_flow_get_content self'
checkUnexpectedReturnNULL "dOMWebKitNamedFlowGetContent" result
result' <- (wrapObject WebKit.DOMNodeList.DOMNodeList) result
touchManagedPtr self
return result'
data DOMWebKitNamedFlowGetContentMethodInfo
instance (signature ~ (m WebKit.DOMNodeList.DOMNodeList), MonadIO m, IsDOMWebKitNamedFlow a) => O.MethodInfo DOMWebKitNamedFlowGetContentMethodInfo a signature where
overloadedMethod _ = dOMWebKitNamedFlowGetContent
foreign import ccall "webkit_dom_webkit_named_flow_get_content_nodes" webkit_dom_webkit_named_flow_get_content_nodes ::
Ptr DOMWebKitNamedFlow ->
IO (Ptr WebKit.DOMNodeList.DOMNodeList)
dOMWebKitNamedFlowGetContentNodes ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWebKitNamedFlow a) =>
a
-> m WebKit.DOMNodeList.DOMNodeList
dOMWebKitNamedFlowGetContentNodes flow = liftIO $ do
flow' <- unsafeManagedPtrCastPtr flow
result <- webkit_dom_webkit_named_flow_get_content_nodes flow'
checkUnexpectedReturnNULL "dOMWebKitNamedFlowGetContentNodes" result
result' <- (newObject WebKit.DOMNodeList.DOMNodeList) result
touchManagedPtr flow
return result'
data DOMWebKitNamedFlowGetContentNodesMethodInfo
instance (signature ~ (m WebKit.DOMNodeList.DOMNodeList), MonadIO m, IsDOMWebKitNamedFlow a) => O.MethodInfo DOMWebKitNamedFlowGetContentNodesMethodInfo a signature where
overloadedMethod _ = dOMWebKitNamedFlowGetContentNodes
foreign import ccall "webkit_dom_webkit_named_flow_get_first_empty_region_index" webkit_dom_webkit_named_flow_get_first_empty_region_index ::
Ptr DOMWebKitNamedFlow ->
IO CLong
dOMWebKitNamedFlowGetFirstEmptyRegionIndex ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWebKitNamedFlow a) =>
a
-> m CLong
dOMWebKitNamedFlowGetFirstEmptyRegionIndex self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_webkit_named_flow_get_first_empty_region_index self'
touchManagedPtr self
return result
data DOMWebKitNamedFlowGetFirstEmptyRegionIndexMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMWebKitNamedFlow a) => O.MethodInfo DOMWebKitNamedFlowGetFirstEmptyRegionIndexMethodInfo a signature where
overloadedMethod _ = dOMWebKitNamedFlowGetFirstEmptyRegionIndex
foreign import ccall "webkit_dom_webkit_named_flow_get_name" webkit_dom_webkit_named_flow_get_name ::
Ptr DOMWebKitNamedFlow ->
IO CString
dOMWebKitNamedFlowGetName ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWebKitNamedFlow a) =>
a
-> m T.Text
dOMWebKitNamedFlowGetName self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_webkit_named_flow_get_name self'
checkUnexpectedReturnNULL "dOMWebKitNamedFlowGetName" result
result' <- cstringToText result
freeMem result
touchManagedPtr self
return result'
data DOMWebKitNamedFlowGetNameMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMWebKitNamedFlow a) => O.MethodInfo DOMWebKitNamedFlowGetNameMethodInfo a signature where
overloadedMethod _ = dOMWebKitNamedFlowGetName
foreign import ccall "webkit_dom_webkit_named_flow_get_overflow" webkit_dom_webkit_named_flow_get_overflow ::
Ptr DOMWebKitNamedFlow ->
IO CInt
dOMWebKitNamedFlowGetOverflow ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWebKitNamedFlow a) =>
a
-> m Bool
dOMWebKitNamedFlowGetOverflow flow = liftIO $ do
flow' <- unsafeManagedPtrCastPtr flow
result <- webkit_dom_webkit_named_flow_get_overflow flow'
let result' = (/= 0) result
touchManagedPtr flow
return result'
data DOMWebKitNamedFlowGetOverflowMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMWebKitNamedFlow a) => O.MethodInfo DOMWebKitNamedFlowGetOverflowMethodInfo a signature where
overloadedMethod _ = dOMWebKitNamedFlowGetOverflow
foreign import ccall "webkit_dom_webkit_named_flow_get_overset" webkit_dom_webkit_named_flow_get_overset ::
Ptr DOMWebKitNamedFlow ->
IO CInt
dOMWebKitNamedFlowGetOverset ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWebKitNamedFlow a) =>
a
-> m Bool
dOMWebKitNamedFlowGetOverset self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_webkit_named_flow_get_overset self'
let result' = (/= 0) result
touchManagedPtr self
return result'
data DOMWebKitNamedFlowGetOversetMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMWebKitNamedFlow a) => O.MethodInfo DOMWebKitNamedFlowGetOversetMethodInfo a signature where
overloadedMethod _ = dOMWebKitNamedFlowGetOverset
foreign import ccall "webkit_dom_webkit_named_flow_get_regions" webkit_dom_webkit_named_flow_get_regions ::
Ptr DOMWebKitNamedFlow ->
IO (Ptr WebKit.DOMNodeList.DOMNodeList)
dOMWebKitNamedFlowGetRegions ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWebKitNamedFlow a) =>
a
-> m WebKit.DOMNodeList.DOMNodeList
dOMWebKitNamedFlowGetRegions self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_webkit_named_flow_get_regions self'
checkUnexpectedReturnNULL "dOMWebKitNamedFlowGetRegions" result
result' <- (wrapObject WebKit.DOMNodeList.DOMNodeList) result
touchManagedPtr self
return result'
data DOMWebKitNamedFlowGetRegionsMethodInfo
instance (signature ~ (m WebKit.DOMNodeList.DOMNodeList), MonadIO m, IsDOMWebKitNamedFlow a) => O.MethodInfo DOMWebKitNamedFlowGetRegionsMethodInfo a signature where
overloadedMethod _ = dOMWebKitNamedFlowGetRegions
foreign import ccall "webkit_dom_webkit_named_flow_get_regions_by_content" webkit_dom_webkit_named_flow_get_regions_by_content ::
Ptr DOMWebKitNamedFlow ->
Ptr WebKit.DOMNode.DOMNode ->
IO (Ptr WebKit.DOMNodeList.DOMNodeList)
dOMWebKitNamedFlowGetRegionsByContent ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWebKitNamedFlow a, WebKit.DOMNode.IsDOMNode b) =>
a
-> b
-> m WebKit.DOMNodeList.DOMNodeList
dOMWebKitNamedFlowGetRegionsByContent self contentNode = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
contentNode' <- unsafeManagedPtrCastPtr contentNode
result <- webkit_dom_webkit_named_flow_get_regions_by_content self' contentNode'
checkUnexpectedReturnNULL "dOMWebKitNamedFlowGetRegionsByContent" result
result' <- (wrapObject WebKit.DOMNodeList.DOMNodeList) result
touchManagedPtr self
touchManagedPtr contentNode
return result'
data DOMWebKitNamedFlowGetRegionsByContentMethodInfo
instance (signature ~ (b -> m WebKit.DOMNodeList.DOMNodeList), MonadIO m, IsDOMWebKitNamedFlow a, WebKit.DOMNode.IsDOMNode b) => O.MethodInfo DOMWebKitNamedFlowGetRegionsByContentMethodInfo a signature where
overloadedMethod _ = dOMWebKitNamedFlowGetRegionsByContent
foreign import ccall "webkit_dom_webkit_named_flow_get_regions_by_content_node" webkit_dom_webkit_named_flow_get_regions_by_content_node ::
Ptr DOMWebKitNamedFlow ->
Ptr WebKit.DOMNode.DOMNode ->
IO (Ptr WebKit.DOMNodeList.DOMNodeList)
dOMWebKitNamedFlowGetRegionsByContentNode ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMWebKitNamedFlow a, WebKit.DOMNode.IsDOMNode b) =>
a
-> b
-> m WebKit.DOMNodeList.DOMNodeList
dOMWebKitNamedFlowGetRegionsByContentNode flow contentNode = liftIO $ do
flow' <- unsafeManagedPtrCastPtr flow
contentNode' <- unsafeManagedPtrCastPtr contentNode
result <- webkit_dom_webkit_named_flow_get_regions_by_content_node flow' contentNode'
checkUnexpectedReturnNULL "dOMWebKitNamedFlowGetRegionsByContentNode" result
result' <- (newObject WebKit.DOMNodeList.DOMNodeList) result
touchManagedPtr flow
touchManagedPtr contentNode
return result'
data DOMWebKitNamedFlowGetRegionsByContentNodeMethodInfo
instance (signature ~ (b -> m WebKit.DOMNodeList.DOMNodeList), MonadIO m, IsDOMWebKitNamedFlow a, WebKit.DOMNode.IsDOMNode b) => O.MethodInfo DOMWebKitNamedFlowGetRegionsByContentNodeMethodInfo a signature where
overloadedMethod _ = dOMWebKitNamedFlowGetRegionsByContentNode