{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.WebKit2WebExtension.Objects.DOMHTMLDListElement
(
DOMHTMLDListElement(..) ,
IsDOMHTMLDListElement ,
toDOMHTMLDListElement ,
#if defined(ENABLE_OVERLOADING)
ResolveDOMHTMLDListElementMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
DOMHTMLDListElementGetCompactMethodInfo ,
#endif
dOMHTMLDListElementGetCompact ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLDListElementSetCompactMethodInfo ,
#endif
dOMHTMLDListElementSetCompact ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLDListElementCompactPropertyInfo ,
#endif
constructDOMHTMLDListElementCompact ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLDListElementCompact ,
#endif
getDOMHTMLDListElementCompact ,
setDOMHTMLDListElementCompact ,
) 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.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.DOMElement as WebKit2WebExtension.DOMElement
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMHTMLElement as WebKit2WebExtension.DOMHTMLElement
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMNode as WebKit2WebExtension.DOMNode
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMObject as WebKit2WebExtension.DOMObject
newtype DOMHTMLDListElement = DOMHTMLDListElement (SP.ManagedPtr DOMHTMLDListElement)
deriving (DOMHTMLDListElement -> DOMHTMLDListElement -> Bool
(DOMHTMLDListElement -> DOMHTMLDListElement -> Bool)
-> (DOMHTMLDListElement -> DOMHTMLDListElement -> Bool)
-> Eq DOMHTMLDListElement
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DOMHTMLDListElement -> DOMHTMLDListElement -> Bool
$c/= :: DOMHTMLDListElement -> DOMHTMLDListElement -> Bool
== :: DOMHTMLDListElement -> DOMHTMLDListElement -> Bool
$c== :: DOMHTMLDListElement -> DOMHTMLDListElement -> Bool
Eq)
instance SP.ManagedPtrNewtype DOMHTMLDListElement where
toManagedPtr :: DOMHTMLDListElement -> ManagedPtr DOMHTMLDListElement
toManagedPtr (DOMHTMLDListElement ManagedPtr DOMHTMLDListElement
p) = ManagedPtr DOMHTMLDListElement
p
foreign import ccall "webkit_dom_html_d_list_element_get_type"
c_webkit_dom_html_d_list_element_get_type :: IO B.Types.GType
instance B.Types.TypedObject DOMHTMLDListElement where
glibType :: IO GType
glibType = IO GType
c_webkit_dom_html_d_list_element_get_type
instance B.Types.GObject DOMHTMLDListElement
class (SP.GObject o, O.IsDescendantOf DOMHTMLDListElement o) => IsDOMHTMLDListElement o
instance (SP.GObject o, O.IsDescendantOf DOMHTMLDListElement o) => IsDOMHTMLDListElement o
instance O.HasParentTypes DOMHTMLDListElement
type instance O.ParentTypes DOMHTMLDListElement = '[WebKit2WebExtension.DOMHTMLElement.DOMHTMLElement, WebKit2WebExtension.DOMElement.DOMElement, WebKit2WebExtension.DOMNode.DOMNode, WebKit2WebExtension.DOMObject.DOMObject, GObject.Object.Object, WebKit2WebExtension.DOMEventTarget.DOMEventTarget]
toDOMHTMLDListElement :: (MIO.MonadIO m, IsDOMHTMLDListElement o) => o -> m DOMHTMLDListElement
toDOMHTMLDListElement :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLDListElement o) =>
o -> m DOMHTMLDListElement
toDOMHTMLDListElement = IO DOMHTMLDListElement -> m DOMHTMLDListElement
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO DOMHTMLDListElement -> m DOMHTMLDListElement)
-> (o -> IO DOMHTMLDListElement) -> o -> m DOMHTMLDListElement
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr DOMHTMLDListElement -> DOMHTMLDListElement)
-> o -> IO DOMHTMLDListElement
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr DOMHTMLDListElement -> DOMHTMLDListElement
DOMHTMLDListElement
instance B.GValue.IsGValue (Maybe DOMHTMLDListElement) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_webkit_dom_html_d_list_element_get_type
gvalueSet_ :: Ptr GValue -> Maybe DOMHTMLDListElement -> IO ()
gvalueSet_ Ptr GValue
gv Maybe DOMHTMLDListElement
P.Nothing = Ptr GValue -> Ptr DOMHTMLDListElement -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr DOMHTMLDListElement
forall a. Ptr a
FP.nullPtr :: FP.Ptr DOMHTMLDListElement)
gvalueSet_ Ptr GValue
gv (P.Just DOMHTMLDListElement
obj) = DOMHTMLDListElement -> (Ptr DOMHTMLDListElement -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr DOMHTMLDListElement
obj (Ptr GValue -> Ptr DOMHTMLDListElement -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe DOMHTMLDListElement)
gvalueGet_ Ptr GValue
gv = do
Ptr DOMHTMLDListElement
ptr <- Ptr GValue -> IO (Ptr DOMHTMLDListElement)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr DOMHTMLDListElement)
if Ptr DOMHTMLDListElement
ptr Ptr DOMHTMLDListElement -> Ptr DOMHTMLDListElement -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr DOMHTMLDListElement
forall a. Ptr a
FP.nullPtr
then DOMHTMLDListElement -> Maybe DOMHTMLDListElement
forall a. a -> Maybe a
P.Just (DOMHTMLDListElement -> Maybe DOMHTMLDListElement)
-> IO DOMHTMLDListElement -> IO (Maybe DOMHTMLDListElement)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr DOMHTMLDListElement -> DOMHTMLDListElement)
-> Ptr DOMHTMLDListElement -> IO DOMHTMLDListElement
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr DOMHTMLDListElement -> DOMHTMLDListElement
DOMHTMLDListElement Ptr DOMHTMLDListElement
ptr
else Maybe DOMHTMLDListElement -> IO (Maybe DOMHTMLDListElement)
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe DOMHTMLDListElement
forall a. Maybe a
P.Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveDOMHTMLDListElementMethod (t :: Symbol) (o :: *) :: * where
ResolveDOMHTMLDListElementMethod "addEventListener" o = WebKit2WebExtension.DOMEventTarget.DOMEventTargetAddEventListenerMethodInfo
ResolveDOMHTMLDListElementMethod "appendChild" o = WebKit2WebExtension.DOMNode.DOMNodeAppendChildMethodInfo
ResolveDOMHTMLDListElementMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveDOMHTMLDListElementMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveDOMHTMLDListElementMethod "blur" o = WebKit2WebExtension.DOMElement.DOMElementBlurMethodInfo
ResolveDOMHTMLDListElementMethod "click" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementClickMethodInfo
ResolveDOMHTMLDListElementMethod "cloneNodeWithError" o = WebKit2WebExtension.DOMNode.DOMNodeCloneNodeWithErrorMethodInfo
ResolveDOMHTMLDListElementMethod "closest" o = WebKit2WebExtension.DOMElement.DOMElementClosestMethodInfo
ResolveDOMHTMLDListElementMethod "compareDocumentPosition" o = WebKit2WebExtension.DOMNode.DOMNodeCompareDocumentPositionMethodInfo
ResolveDOMHTMLDListElementMethod "contains" o = WebKit2WebExtension.DOMNode.DOMNodeContainsMethodInfo
ResolveDOMHTMLDListElementMethod "dispatchEvent" o = WebKit2WebExtension.DOMEventTarget.DOMEventTargetDispatchEventMethodInfo
ResolveDOMHTMLDListElementMethod "focus" o = WebKit2WebExtension.DOMElement.DOMElementFocusMethodInfo
ResolveDOMHTMLDListElementMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveDOMHTMLDListElementMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveDOMHTMLDListElementMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveDOMHTMLDListElementMethod "hasAttribute" o = WebKit2WebExtension.DOMElement.DOMElementHasAttributeMethodInfo
ResolveDOMHTMLDListElementMethod "hasAttributeNs" o = WebKit2WebExtension.DOMElement.DOMElementHasAttributeNsMethodInfo
ResolveDOMHTMLDListElementMethod "hasAttributes" o = WebKit2WebExtension.DOMElement.DOMElementHasAttributesMethodInfo
ResolveDOMHTMLDListElementMethod "hasChildNodes" o = WebKit2WebExtension.DOMNode.DOMNodeHasChildNodesMethodInfo
ResolveDOMHTMLDListElementMethod "htmlInputElementGetAutoFilled" o = WebKit2WebExtension.DOMElement.DOMElementHtmlInputElementGetAutoFilledMethodInfo
ResolveDOMHTMLDListElementMethod "htmlInputElementIsUserEdited" o = WebKit2WebExtension.DOMElement.DOMElementHtmlInputElementIsUserEditedMethodInfo
ResolveDOMHTMLDListElementMethod "htmlInputElementSetAutoFilled" o = WebKit2WebExtension.DOMElement.DOMElementHtmlInputElementSetAutoFilledMethodInfo
ResolveDOMHTMLDListElementMethod "htmlInputElementSetEditingValue" o = WebKit2WebExtension.DOMElement.DOMElementHtmlInputElementSetEditingValueMethodInfo
ResolveDOMHTMLDListElementMethod "insertAdjacentElement" o = WebKit2WebExtension.DOMElement.DOMElementInsertAdjacentElementMethodInfo
ResolveDOMHTMLDListElementMethod "insertAdjacentHtml" o = WebKit2WebExtension.DOMElement.DOMElementInsertAdjacentHtmlMethodInfo
ResolveDOMHTMLDListElementMethod "insertAdjacentText" o = WebKit2WebExtension.DOMElement.DOMElementInsertAdjacentTextMethodInfo
ResolveDOMHTMLDListElementMethod "insertBefore" o = WebKit2WebExtension.DOMNode.DOMNodeInsertBeforeMethodInfo
ResolveDOMHTMLDListElementMethod "isDefaultNamespace" o = WebKit2WebExtension.DOMNode.DOMNodeIsDefaultNamespaceMethodInfo
ResolveDOMHTMLDListElementMethod "isEqualNode" o = WebKit2WebExtension.DOMNode.DOMNodeIsEqualNodeMethodInfo
ResolveDOMHTMLDListElementMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveDOMHTMLDListElementMethod "isSameNode" o = WebKit2WebExtension.DOMNode.DOMNodeIsSameNodeMethodInfo
ResolveDOMHTMLDListElementMethod "isSupported" o = WebKit2WebExtension.DOMNode.DOMNodeIsSupportedMethodInfo
ResolveDOMHTMLDListElementMethod "lookupNamespaceUri" o = WebKit2WebExtension.DOMNode.DOMNodeLookupNamespaceUriMethodInfo
ResolveDOMHTMLDListElementMethod "lookupPrefix" o = WebKit2WebExtension.DOMNode.DOMNodeLookupPrefixMethodInfo
ResolveDOMHTMLDListElementMethod "matches" o = WebKit2WebExtension.DOMElement.DOMElementMatchesMethodInfo
ResolveDOMHTMLDListElementMethod "normalize" o = WebKit2WebExtension.DOMNode.DOMNodeNormalizeMethodInfo
ResolveDOMHTMLDListElementMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveDOMHTMLDListElementMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveDOMHTMLDListElementMethod "querySelector" o = WebKit2WebExtension.DOMElement.DOMElementQuerySelectorMethodInfo
ResolveDOMHTMLDListElementMethod "querySelectorAll" o = WebKit2WebExtension.DOMElement.DOMElementQuerySelectorAllMethodInfo
ResolveDOMHTMLDListElementMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveDOMHTMLDListElementMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveDOMHTMLDListElementMethod "remove" o = WebKit2WebExtension.DOMElement.DOMElementRemoveMethodInfo
ResolveDOMHTMLDListElementMethod "removeAttribute" o = WebKit2WebExtension.DOMElement.DOMElementRemoveAttributeMethodInfo
ResolveDOMHTMLDListElementMethod "removeAttributeNode" o = WebKit2WebExtension.DOMElement.DOMElementRemoveAttributeNodeMethodInfo
ResolveDOMHTMLDListElementMethod "removeAttributeNs" o = WebKit2WebExtension.DOMElement.DOMElementRemoveAttributeNsMethodInfo
ResolveDOMHTMLDListElementMethod "removeChild" o = WebKit2WebExtension.DOMNode.DOMNodeRemoveChildMethodInfo
ResolveDOMHTMLDListElementMethod "removeEventListener" o = WebKit2WebExtension.DOMEventTarget.DOMEventTargetRemoveEventListenerMethodInfo
ResolveDOMHTMLDListElementMethod "replaceChild" o = WebKit2WebExtension.DOMNode.DOMNodeReplaceChildMethodInfo
ResolveDOMHTMLDListElementMethod "requestPointerLock" o = WebKit2WebExtension.DOMElement.DOMElementRequestPointerLockMethodInfo
ResolveDOMHTMLDListElementMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveDOMHTMLDListElementMethod "scrollByLines" o = WebKit2WebExtension.DOMElement.DOMElementScrollByLinesMethodInfo
ResolveDOMHTMLDListElementMethod "scrollByPages" o = WebKit2WebExtension.DOMElement.DOMElementScrollByPagesMethodInfo
ResolveDOMHTMLDListElementMethod "scrollIntoView" o = WebKit2WebExtension.DOMElement.DOMElementScrollIntoViewMethodInfo
ResolveDOMHTMLDListElementMethod "scrollIntoViewIfNeeded" o = WebKit2WebExtension.DOMElement.DOMElementScrollIntoViewIfNeededMethodInfo
ResolveDOMHTMLDListElementMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveDOMHTMLDListElementMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveDOMHTMLDListElementMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveDOMHTMLDListElementMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveDOMHTMLDListElementMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveDOMHTMLDListElementMethod "webkitMatchesSelector" o = WebKit2WebExtension.DOMElement.DOMElementWebkitMatchesSelectorMethodInfo
ResolveDOMHTMLDListElementMethod "webkitRequestFullscreen" o = WebKit2WebExtension.DOMElement.DOMElementWebkitRequestFullscreenMethodInfo
ResolveDOMHTMLDListElementMethod "getAccessKey" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetAccessKeyMethodInfo
ResolveDOMHTMLDListElementMethod "getAttribute" o = WebKit2WebExtension.DOMElement.DOMElementGetAttributeMethodInfo
ResolveDOMHTMLDListElementMethod "getAttributeNode" o = WebKit2WebExtension.DOMElement.DOMElementGetAttributeNodeMethodInfo
ResolveDOMHTMLDListElementMethod "getAttributeNodeNs" o = WebKit2WebExtension.DOMElement.DOMElementGetAttributeNodeNsMethodInfo
ResolveDOMHTMLDListElementMethod "getAttributeNs" o = WebKit2WebExtension.DOMElement.DOMElementGetAttributeNsMethodInfo
ResolveDOMHTMLDListElementMethod "getAttributes" o = WebKit2WebExtension.DOMElement.DOMElementGetAttributesMethodInfo
ResolveDOMHTMLDListElementMethod "getBaseUri" o = WebKit2WebExtension.DOMNode.DOMNodeGetBaseUriMethodInfo
ResolveDOMHTMLDListElementMethod "getBoundingClientRect" o = WebKit2WebExtension.DOMElement.DOMElementGetBoundingClientRectMethodInfo
ResolveDOMHTMLDListElementMethod "getChildElementCount" o = WebKit2WebExtension.DOMElement.DOMElementGetChildElementCountMethodInfo
ResolveDOMHTMLDListElementMethod "getChildNodes" o = WebKit2WebExtension.DOMNode.DOMNodeGetChildNodesMethodInfo
ResolveDOMHTMLDListElementMethod "getChildren" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetChildrenMethodInfo
ResolveDOMHTMLDListElementMethod "getClassList" o = WebKit2WebExtension.DOMElement.DOMElementGetClassListMethodInfo
ResolveDOMHTMLDListElementMethod "getClassName" o = WebKit2WebExtension.DOMElement.DOMElementGetClassNameMethodInfo
ResolveDOMHTMLDListElementMethod "getClientHeight" o = WebKit2WebExtension.DOMElement.DOMElementGetClientHeightMethodInfo
ResolveDOMHTMLDListElementMethod "getClientLeft" o = WebKit2WebExtension.DOMElement.DOMElementGetClientLeftMethodInfo
ResolveDOMHTMLDListElementMethod "getClientRects" o = WebKit2WebExtension.DOMElement.DOMElementGetClientRectsMethodInfo
ResolveDOMHTMLDListElementMethod "getClientTop" o = WebKit2WebExtension.DOMElement.DOMElementGetClientTopMethodInfo
ResolveDOMHTMLDListElementMethod "getClientWidth" o = WebKit2WebExtension.DOMElement.DOMElementGetClientWidthMethodInfo
ResolveDOMHTMLDListElementMethod "getCompact" o = DOMHTMLDListElementGetCompactMethodInfo
ResolveDOMHTMLDListElementMethod "getContentEditable" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetContentEditableMethodInfo
ResolveDOMHTMLDListElementMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveDOMHTMLDListElementMethod "getDir" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetDirMethodInfo
ResolveDOMHTMLDListElementMethod "getDraggable" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetDraggableMethodInfo
ResolveDOMHTMLDListElementMethod "getElementsByClassName" o = WebKit2WebExtension.DOMElement.DOMElementGetElementsByClassNameMethodInfo
ResolveDOMHTMLDListElementMethod "getElementsByClassNameAsHtmlCollection" o = WebKit2WebExtension.DOMElement.DOMElementGetElementsByClassNameAsHtmlCollectionMethodInfo
ResolveDOMHTMLDListElementMethod "getElementsByTagName" o = WebKit2WebExtension.DOMElement.DOMElementGetElementsByTagNameMethodInfo
ResolveDOMHTMLDListElementMethod "getElementsByTagNameAsHtmlCollection" o = WebKit2WebExtension.DOMElement.DOMElementGetElementsByTagNameAsHtmlCollectionMethodInfo
ResolveDOMHTMLDListElementMethod "getElementsByTagNameNs" o = WebKit2WebExtension.DOMElement.DOMElementGetElementsByTagNameNsMethodInfo
ResolveDOMHTMLDListElementMethod "getElementsByTagNameNsAsHtmlCollection" o = WebKit2WebExtension.DOMElement.DOMElementGetElementsByTagNameNsAsHtmlCollectionMethodInfo
ResolveDOMHTMLDListElementMethod "getFirstChild" o = WebKit2WebExtension.DOMNode.DOMNodeGetFirstChildMethodInfo
ResolveDOMHTMLDListElementMethod "getFirstElementChild" o = WebKit2WebExtension.DOMElement.DOMElementGetFirstElementChildMethodInfo
ResolveDOMHTMLDListElementMethod "getHidden" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetHiddenMethodInfo
ResolveDOMHTMLDListElementMethod "getId" o = WebKit2WebExtension.DOMElement.DOMElementGetIdMethodInfo
ResolveDOMHTMLDListElementMethod "getInnerHtml" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetInnerHtmlMethodInfo
ResolveDOMHTMLDListElementMethod "getInnerText" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetInnerTextMethodInfo
ResolveDOMHTMLDListElementMethod "getIsContentEditable" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetIsContentEditableMethodInfo
ResolveDOMHTMLDListElementMethod "getLang" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetLangMethodInfo
ResolveDOMHTMLDListElementMethod "getLastChild" o = WebKit2WebExtension.DOMNode.DOMNodeGetLastChildMethodInfo
ResolveDOMHTMLDListElementMethod "getLastElementChild" o = WebKit2WebExtension.DOMElement.DOMElementGetLastElementChildMethodInfo
ResolveDOMHTMLDListElementMethod "getLocalName" o = WebKit2WebExtension.DOMElement.DOMElementGetLocalNameMethodInfo
ResolveDOMHTMLDListElementMethod "getNamespaceUri" o = WebKit2WebExtension.DOMElement.DOMElementGetNamespaceUriMethodInfo
ResolveDOMHTMLDListElementMethod "getNextElementSibling" o = WebKit2WebExtension.DOMElement.DOMElementGetNextElementSiblingMethodInfo
ResolveDOMHTMLDListElementMethod "getNextSibling" o = WebKit2WebExtension.DOMNode.DOMNodeGetNextSiblingMethodInfo
ResolveDOMHTMLDListElementMethod "getNodeName" o = WebKit2WebExtension.DOMNode.DOMNodeGetNodeNameMethodInfo
ResolveDOMHTMLDListElementMethod "getNodeType" o = WebKit2WebExtension.DOMNode.DOMNodeGetNodeTypeMethodInfo
ResolveDOMHTMLDListElementMethod "getNodeValue" o = WebKit2WebExtension.DOMNode.DOMNodeGetNodeValueMethodInfo
ResolveDOMHTMLDListElementMethod "getOffsetHeight" o = WebKit2WebExtension.DOMElement.DOMElementGetOffsetHeightMethodInfo
ResolveDOMHTMLDListElementMethod "getOffsetLeft" o = WebKit2WebExtension.DOMElement.DOMElementGetOffsetLeftMethodInfo
ResolveDOMHTMLDListElementMethod "getOffsetParent" o = WebKit2WebExtension.DOMElement.DOMElementGetOffsetParentMethodInfo
ResolveDOMHTMLDListElementMethod "getOffsetTop" o = WebKit2WebExtension.DOMElement.DOMElementGetOffsetTopMethodInfo
ResolveDOMHTMLDListElementMethod "getOffsetWidth" o = WebKit2WebExtension.DOMElement.DOMElementGetOffsetWidthMethodInfo
ResolveDOMHTMLDListElementMethod "getOuterHtml" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetOuterHtmlMethodInfo
ResolveDOMHTMLDListElementMethod "getOuterText" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetOuterTextMethodInfo
ResolveDOMHTMLDListElementMethod "getOwnerDocument" o = WebKit2WebExtension.DOMNode.DOMNodeGetOwnerDocumentMethodInfo
ResolveDOMHTMLDListElementMethod "getParentElement" o = WebKit2WebExtension.DOMNode.DOMNodeGetParentElementMethodInfo
ResolveDOMHTMLDListElementMethod "getParentNode" o = WebKit2WebExtension.DOMNode.DOMNodeGetParentNodeMethodInfo
ResolveDOMHTMLDListElementMethod "getPrefix" o = WebKit2WebExtension.DOMElement.DOMElementGetPrefixMethodInfo
ResolveDOMHTMLDListElementMethod "getPreviousElementSibling" o = WebKit2WebExtension.DOMElement.DOMElementGetPreviousElementSiblingMethodInfo
ResolveDOMHTMLDListElementMethod "getPreviousSibling" o = WebKit2WebExtension.DOMNode.DOMNodeGetPreviousSiblingMethodInfo
ResolveDOMHTMLDListElementMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveDOMHTMLDListElementMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveDOMHTMLDListElementMethod "getScrollHeight" o = WebKit2WebExtension.DOMElement.DOMElementGetScrollHeightMethodInfo
ResolveDOMHTMLDListElementMethod "getScrollLeft" o = WebKit2WebExtension.DOMElement.DOMElementGetScrollLeftMethodInfo
ResolveDOMHTMLDListElementMethod "getScrollTop" o = WebKit2WebExtension.DOMElement.DOMElementGetScrollTopMethodInfo
ResolveDOMHTMLDListElementMethod "getScrollWidth" o = WebKit2WebExtension.DOMElement.DOMElementGetScrollWidthMethodInfo
ResolveDOMHTMLDListElementMethod "getSpellcheck" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetSpellcheckMethodInfo
ResolveDOMHTMLDListElementMethod "getStyle" o = WebKit2WebExtension.DOMElement.DOMElementGetStyleMethodInfo
ResolveDOMHTMLDListElementMethod "getTabIndex" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetTabIndexMethodInfo
ResolveDOMHTMLDListElementMethod "getTagName" o = WebKit2WebExtension.DOMElement.DOMElementGetTagNameMethodInfo
ResolveDOMHTMLDListElementMethod "getTextContent" o = WebKit2WebExtension.DOMNode.DOMNodeGetTextContentMethodInfo
ResolveDOMHTMLDListElementMethod "getTitle" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetTitleMethodInfo
ResolveDOMHTMLDListElementMethod "getTranslate" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetTranslateMethodInfo
ResolveDOMHTMLDListElementMethod "getWebkitRegionOverset" o = WebKit2WebExtension.DOMElement.DOMElementGetWebkitRegionOversetMethodInfo
ResolveDOMHTMLDListElementMethod "getWebkitdropzone" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetWebkitdropzoneMethodInfo
ResolveDOMHTMLDListElementMethod "setAccessKey" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetAccessKeyMethodInfo
ResolveDOMHTMLDListElementMethod "setAttribute" o = WebKit2WebExtension.DOMElement.DOMElementSetAttributeMethodInfo
ResolveDOMHTMLDListElementMethod "setAttributeNode" o = WebKit2WebExtension.DOMElement.DOMElementSetAttributeNodeMethodInfo
ResolveDOMHTMLDListElementMethod "setAttributeNodeNs" o = WebKit2WebExtension.DOMElement.DOMElementSetAttributeNodeNsMethodInfo
ResolveDOMHTMLDListElementMethod "setAttributeNs" o = WebKit2WebExtension.DOMElement.DOMElementSetAttributeNsMethodInfo
ResolveDOMHTMLDListElementMethod "setClassName" o = WebKit2WebExtension.DOMElement.DOMElementSetClassNameMethodInfo
ResolveDOMHTMLDListElementMethod "setCompact" o = DOMHTMLDListElementSetCompactMethodInfo
ResolveDOMHTMLDListElementMethod "setContentEditable" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetContentEditableMethodInfo
ResolveDOMHTMLDListElementMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveDOMHTMLDListElementMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveDOMHTMLDListElementMethod "setDir" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetDirMethodInfo
ResolveDOMHTMLDListElementMethod "setDraggable" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetDraggableMethodInfo
ResolveDOMHTMLDListElementMethod "setHidden" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetHiddenMethodInfo
ResolveDOMHTMLDListElementMethod "setId" o = WebKit2WebExtension.DOMElement.DOMElementSetIdMethodInfo
ResolveDOMHTMLDListElementMethod "setInnerHtml" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetInnerHtmlMethodInfo
ResolveDOMHTMLDListElementMethod "setInnerText" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetInnerTextMethodInfo
ResolveDOMHTMLDListElementMethod "setLang" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetLangMethodInfo
ResolveDOMHTMLDListElementMethod "setNodeValue" o = WebKit2WebExtension.DOMNode.DOMNodeSetNodeValueMethodInfo
ResolveDOMHTMLDListElementMethod "setOuterHtml" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetOuterHtmlMethodInfo
ResolveDOMHTMLDListElementMethod "setOuterText" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetOuterTextMethodInfo
ResolveDOMHTMLDListElementMethod "setPrefix" o = WebKit2WebExtension.DOMNode.DOMNodeSetPrefixMethodInfo
ResolveDOMHTMLDListElementMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveDOMHTMLDListElementMethod "setScrollLeft" o = WebKit2WebExtension.DOMElement.DOMElementSetScrollLeftMethodInfo
ResolveDOMHTMLDListElementMethod "setScrollTop" o = WebKit2WebExtension.DOMElement.DOMElementSetScrollTopMethodInfo
ResolveDOMHTMLDListElementMethod "setSpellcheck" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetSpellcheckMethodInfo
ResolveDOMHTMLDListElementMethod "setTabIndex" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetTabIndexMethodInfo
ResolveDOMHTMLDListElementMethod "setTextContent" o = WebKit2WebExtension.DOMNode.DOMNodeSetTextContentMethodInfo
ResolveDOMHTMLDListElementMethod "setTitle" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetTitleMethodInfo
ResolveDOMHTMLDListElementMethod "setTranslate" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetTranslateMethodInfo
ResolveDOMHTMLDListElementMethod "setWebkitdropzone" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetWebkitdropzoneMethodInfo
ResolveDOMHTMLDListElementMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveDOMHTMLDListElementMethod t DOMHTMLDListElement, O.OverloadedMethod info DOMHTMLDListElement p) => OL.IsLabel t (DOMHTMLDListElement -> 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 ~ ResolveDOMHTMLDListElementMethod t DOMHTMLDListElement, O.OverloadedMethod info DOMHTMLDListElement p, R.HasField t DOMHTMLDListElement p) => R.HasField t DOMHTMLDListElement p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveDOMHTMLDListElementMethod t DOMHTMLDListElement, O.OverloadedMethodInfo info DOMHTMLDListElement) => OL.IsLabel t (O.MethodProxy info DOMHTMLDListElement) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
getDOMHTMLDListElementCompact :: (MonadIO m, IsDOMHTMLDListElement o) => o -> m Bool
getDOMHTMLDListElementCompact :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLDListElement o) =>
o -> m Bool
getDOMHTMLDListElementCompact 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
"compact"
setDOMHTMLDListElementCompact :: (MonadIO m, IsDOMHTMLDListElement o) => o -> Bool -> m ()
setDOMHTMLDListElementCompact :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLDListElement o) =>
o -> Bool -> m ()
setDOMHTMLDListElementCompact o
obj Bool
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 -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"compact" Bool
val
constructDOMHTMLDListElementCompact :: (IsDOMHTMLDListElement o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructDOMHTMLDListElementCompact :: forall o (m :: * -> *).
(IsDOMHTMLDListElement o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructDOMHTMLDListElementCompact Bool
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 -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"compact" Bool
val
#if defined(ENABLE_OVERLOADING)
data DOMHTMLDListElementCompactPropertyInfo
instance AttrInfo DOMHTMLDListElementCompactPropertyInfo where
type AttrAllowedOps DOMHTMLDListElementCompactPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLDListElementCompactPropertyInfo = IsDOMHTMLDListElement
type AttrSetTypeConstraint DOMHTMLDListElementCompactPropertyInfo = (~) Bool
type AttrTransferTypeConstraint DOMHTMLDListElementCompactPropertyInfo = (~) Bool
type AttrTransferType DOMHTMLDListElementCompactPropertyInfo = Bool
type AttrGetType DOMHTMLDListElementCompactPropertyInfo = Bool
type AttrLabel DOMHTMLDListElementCompactPropertyInfo = "compact"
type AttrOrigin DOMHTMLDListElementCompactPropertyInfo = DOMHTMLDListElement
attrGet = getDOMHTMLDListElementCompact
attrSet = setDOMHTMLDListElementCompact
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLDListElementCompact
attrClear = undefined
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList DOMHTMLDListElement
type instance O.AttributeList DOMHTMLDListElement = DOMHTMLDListElementAttributeList
type DOMHTMLDListElementAttributeList = ('[ '("accessKey", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementAccessKeyPropertyInfo), '("attributes", WebKit2WebExtension.DOMElement.DOMElementAttributesPropertyInfo), '("baseUri", WebKit2WebExtension.DOMNode.DOMNodeBaseUriPropertyInfo), '("childElementCount", WebKit2WebExtension.DOMElement.DOMElementChildElementCountPropertyInfo), '("childNodes", WebKit2WebExtension.DOMNode.DOMNodeChildNodesPropertyInfo), '("children", WebKit2WebExtension.DOMElement.DOMElementChildrenPropertyInfo), '("classList", WebKit2WebExtension.DOMElement.DOMElementClassListPropertyInfo), '("className", WebKit2WebExtension.DOMElement.DOMElementClassNamePropertyInfo), '("clientHeight", WebKit2WebExtension.DOMElement.DOMElementClientHeightPropertyInfo), '("clientLeft", WebKit2WebExtension.DOMElement.DOMElementClientLeftPropertyInfo), '("clientTop", WebKit2WebExtension.DOMElement.DOMElementClientTopPropertyInfo), '("clientWidth", WebKit2WebExtension.DOMElement.DOMElementClientWidthPropertyInfo), '("compact", DOMHTMLDListElementCompactPropertyInfo), '("contentEditable", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementContentEditablePropertyInfo), '("coreObject", WebKit2WebExtension.DOMObject.DOMObjectCoreObjectPropertyInfo), '("dir", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementDirPropertyInfo), '("draggable", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementDraggablePropertyInfo), '("firstChild", WebKit2WebExtension.DOMNode.DOMNodeFirstChildPropertyInfo), '("firstElementChild", WebKit2WebExtension.DOMElement.DOMElementFirstElementChildPropertyInfo), '("hidden", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementHiddenPropertyInfo), '("id", WebKit2WebExtension.DOMElement.DOMElementIdPropertyInfo), '("innerHtml", WebKit2WebExtension.DOMElement.DOMElementInnerHtmlPropertyInfo), '("innerText", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementIsContentEditablePropertyInfo), '("lang", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementLangPropertyInfo), '("lastChild", WebKit2WebExtension.DOMNode.DOMNodeLastChildPropertyInfo), '("lastElementChild", WebKit2WebExtension.DOMElement.DOMElementLastElementChildPropertyInfo), '("localName", WebKit2WebExtension.DOMElement.DOMElementLocalNamePropertyInfo), '("namespaceUri", WebKit2WebExtension.DOMElement.DOMElementNamespaceUriPropertyInfo), '("nextElementSibling", WebKit2WebExtension.DOMElement.DOMElementNextElementSiblingPropertyInfo), '("nextSibling", WebKit2WebExtension.DOMNode.DOMNodeNextSiblingPropertyInfo), '("nodeName", WebKit2WebExtension.DOMNode.DOMNodeNodeNamePropertyInfo), '("nodeType", WebKit2WebExtension.DOMNode.DOMNodeNodeTypePropertyInfo), '("nodeValue", WebKit2WebExtension.DOMNode.DOMNodeNodeValuePropertyInfo), '("offsetHeight", WebKit2WebExtension.DOMElement.DOMElementOffsetHeightPropertyInfo), '("offsetLeft", WebKit2WebExtension.DOMElement.DOMElementOffsetLeftPropertyInfo), '("offsetParent", WebKit2WebExtension.DOMElement.DOMElementOffsetParentPropertyInfo), '("offsetTop", WebKit2WebExtension.DOMElement.DOMElementOffsetTopPropertyInfo), '("offsetWidth", WebKit2WebExtension.DOMElement.DOMElementOffsetWidthPropertyInfo), '("outerHtml", WebKit2WebExtension.DOMElement.DOMElementOuterHtmlPropertyInfo), '("outerText", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", WebKit2WebExtension.DOMNode.DOMNodeOwnerDocumentPropertyInfo), '("parentElement", WebKit2WebExtension.DOMNode.DOMNodeParentElementPropertyInfo), '("parentNode", WebKit2WebExtension.DOMNode.DOMNodeParentNodePropertyInfo), '("prefix", WebKit2WebExtension.DOMElement.DOMElementPrefixPropertyInfo), '("previousElementSibling", WebKit2WebExtension.DOMElement.DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", WebKit2WebExtension.DOMNode.DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", WebKit2WebExtension.DOMElement.DOMElementScrollHeightPropertyInfo), '("scrollLeft", WebKit2WebExtension.DOMElement.DOMElementScrollLeftPropertyInfo), '("scrollTop", WebKit2WebExtension.DOMElement.DOMElementScrollTopPropertyInfo), '("scrollWidth", WebKit2WebExtension.DOMElement.DOMElementScrollWidthPropertyInfo), '("spellcheck", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSpellcheckPropertyInfo), '("style", WebKit2WebExtension.DOMElement.DOMElementStylePropertyInfo), '("tabIndex", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementTabIndexPropertyInfo), '("tagName", WebKit2WebExtension.DOMElement.DOMElementTagNamePropertyInfo), '("textContent", WebKit2WebExtension.DOMNode.DOMNodeTextContentPropertyInfo), '("title", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementTitlePropertyInfo), '("translate", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", WebKit2WebExtension.DOMElement.DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
dOMHTMLDListElementCompact :: AttrLabelProxy "compact"
dOMHTMLDListElementCompact = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList DOMHTMLDListElement = DOMHTMLDListElementSignalList
type DOMHTMLDListElementSignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "webkit_dom_html_d_list_element_get_compact" webkit_dom_html_d_list_element_get_compact ::
Ptr DOMHTMLDListElement ->
IO CInt
{-# DEPRECATED dOMHTMLDListElementGetCompact ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLDListElementGetCompact ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLDListElement a) =>
a
-> m Bool
dOMHTMLDListElementGetCompact :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLDListElement a) =>
a -> m Bool
dOMHTMLDListElementGetCompact 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 DOMHTMLDListElement
self' <- a -> IO (Ptr DOMHTMLDListElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr DOMHTMLDListElement -> IO CInt
webkit_dom_html_d_list_element_get_compact Ptr DOMHTMLDListElement
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 DOMHTMLDListElementGetCompactMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMHTMLDListElement a) => O.OverloadedMethod DOMHTMLDListElementGetCompactMethodInfo a signature where
overloadedMethod = dOMHTMLDListElementGetCompact
instance O.OverloadedMethodInfo DOMHTMLDListElementGetCompactMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.WebKit2WebExtension.Objects.DOMHTMLDListElement.dOMHTMLDListElementGetCompact",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.26/docs/GI-WebKit2WebExtension-Objects-DOMHTMLDListElement.html#v:dOMHTMLDListElementGetCompact"
}
#endif
foreign import ccall "webkit_dom_html_d_list_element_set_compact" webkit_dom_html_d_list_element_set_compact ::
Ptr DOMHTMLDListElement ->
CInt ->
IO ()
{-# DEPRECATED dOMHTMLDListElementSetCompact ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLDListElementSetCompact ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLDListElement a) =>
a
-> Bool
-> m ()
dOMHTMLDListElementSetCompact :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLDListElement a) =>
a -> Bool -> m ()
dOMHTMLDListElementSetCompact a
self Bool
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 DOMHTMLDListElement
self' <- a -> IO (Ptr DOMHTMLDListElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let value' :: CInt
value' = (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
value
Ptr DOMHTMLDListElement -> CInt -> IO ()
webkit_dom_html_d_list_element_set_compact Ptr DOMHTMLDListElement
self' CInt
value'
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 DOMHTMLDListElementSetCompactMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsDOMHTMLDListElement a) => O.OverloadedMethod DOMHTMLDListElementSetCompactMethodInfo a signature where
overloadedMethod = dOMHTMLDListElementSetCompact
instance O.OverloadedMethodInfo DOMHTMLDListElementSetCompactMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.WebKit2WebExtension.Objects.DOMHTMLDListElement.dOMHTMLDListElementSetCompact",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.26/docs/GI-WebKit2WebExtension-Objects-DOMHTMLDListElement.html#v:dOMHTMLDListElementSetCompact"
}
#endif