gi-webkit (empty) → 0.2.4.8
raw patch · 6 files changed
+24861/−0 lines, 6 filesdep +basedep +bytestringdep +containerssetup-changed
Dependencies added: base, bytestring, containers, gi-atk, gi-cairo, gi-gdk, gi-gdkpixbuf, gi-gio, gi-glib, gi-gobject, gi-gtk, gi-javascriptcore, gi-soup, haskell-gi-base, text, transformers
Files
- GI/WebKit.hs too large to diff
- GI/WebKitAttributes.hs +23498/−0
- GI/WebKitSignals.hs +824/−0
- LICENSE +502/−0
- Setup.hs +3/−0
- gi-webkit.cabal +34/−0
+ GI/WebKit.hs view
file too large to diff
+ GI/WebKitAttributes.hs view
@@ -0,0 +1,23498 @@+{-# OPTIONS_GHC -fno-warn-orphans -fno-warn-unused-imports #-}++-- Generated code.++{-# OPTIONS_GHC -fno-warn-unused-imports #-}++{-# LANGUAGE ForeignFunctionInterface, ConstraintKinds,+ TypeFamilies, MultiParamTypeClasses, KindSignatures,+ FlexibleInstances, UndecidableInstances, DataKinds,+ OverloadedStrings, NegativeLiterals, FlexibleContexts #-}++module GI.WebKitAttributes where++import Prelude ()+import Data.GI.Base.ShortPrelude+import Data.Char+import Data.Int+import Data.Word+import qualified Data.ByteString.Char8 as B+import Data.ByteString.Char8 (ByteString)+import qualified Data.Map as Map+import Foreign.C+import Foreign.Ptr+import Foreign.ForeignPtr+import Foreign.ForeignPtr.Unsafe (unsafeForeignPtrToPtr)+import Foreign.Storable (peek, poke, sizeOf)+import Control.Applicative ((<$>))+import Control.Exception (onException)+import Control.Monad.IO.Class+import qualified Data.Text as T++import Data.GI.Base.Attributes hiding (get, set)+import Data.GI.Base.BasicTypes+import Data.GI.Base.BasicConversions+import Data.GI.Base.Closure+import Data.GI.Base.GError+import Data.GI.Base.GHashTable+import Data.GI.Base.GParamSpec+import Data.GI.Base.GVariant+import Data.GI.Base.GValue+import Data.GI.Base.ManagedPtr+import Data.GI.Base.Overloading+import Data.GI.Base.Properties hiding (new)+import Data.GI.Base.Signals (SignalConnectMode(..), connectSignalFunPtr, SignalHandlerId)+import Data.GI.Base.Utils++import qualified GI.Gtk as Gtk+import qualified GI.GtkAttributes as GtkA+import qualified GI.Soup as Soup+import qualified GI.SoupAttributes as SoupA+import GI.WebKit++-- VVV Prop "is-id"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMAttrIsId :: (MonadIO m, DOMAttrK o) => o -> m Bool+getDOMAttrIsId obj = liftIO $ getObjectPropertyBool obj "is-id"++data DOMAttrIsIdPropertyInfo+instance AttrInfo DOMAttrIsIdPropertyInfo where+ type AttrAllowedOps DOMAttrIsIdPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMAttrIsIdPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMAttrIsIdPropertyInfo = DOMAttrK+ type AttrGetType DOMAttrIsIdPropertyInfo = Bool+ type AttrLabel DOMAttrIsIdPropertyInfo = "DOMAttr::is-id"+ attrGet _ = getDOMAttrIsId+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMAttrName :: (MonadIO m, DOMAttrK o) => o -> m T.Text+getDOMAttrName obj = liftIO $ getObjectPropertyString obj "name"++data DOMAttrNamePropertyInfo+instance AttrInfo DOMAttrNamePropertyInfo where+ type AttrAllowedOps DOMAttrNamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMAttrNamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMAttrNamePropertyInfo = DOMAttrK+ type AttrGetType DOMAttrNamePropertyInfo = T.Text+ type AttrLabel DOMAttrNamePropertyInfo = "DOMAttr::name"+ attrGet _ = getDOMAttrName+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "owner-element"+ -- Type: TInterface "WebKit" "DOMElement"+ -- Flags: [PropertyReadable]++getDOMAttrOwnerElement :: (MonadIO m, DOMAttrK o) => o -> m DOMElement+getDOMAttrOwnerElement obj = liftIO $ getObjectPropertyObject obj "owner-element" DOMElement++data DOMAttrOwnerElementPropertyInfo+instance AttrInfo DOMAttrOwnerElementPropertyInfo where+ type AttrAllowedOps DOMAttrOwnerElementPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMAttrOwnerElementPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMAttrOwnerElementPropertyInfo = DOMAttrK+ type AttrGetType DOMAttrOwnerElementPropertyInfo = DOMElement+ type AttrLabel DOMAttrOwnerElementPropertyInfo = "DOMAttr::owner-element"+ attrGet _ = getDOMAttrOwnerElement+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "specified"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMAttrSpecified :: (MonadIO m, DOMAttrK o) => o -> m Bool+getDOMAttrSpecified obj = liftIO $ getObjectPropertyBool obj "specified"++data DOMAttrSpecifiedPropertyInfo+instance AttrInfo DOMAttrSpecifiedPropertyInfo where+ type AttrAllowedOps DOMAttrSpecifiedPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMAttrSpecifiedPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMAttrSpecifiedPropertyInfo = DOMAttrK+ type AttrGetType DOMAttrSpecifiedPropertyInfo = Bool+ type AttrLabel DOMAttrSpecifiedPropertyInfo = "DOMAttr::specified"+ attrGet _ = getDOMAttrSpecified+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "value"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMAttrValue :: (MonadIO m, DOMAttrK o) => o -> m T.Text+getDOMAttrValue obj = liftIO $ getObjectPropertyString obj "value"++setDOMAttrValue :: (MonadIO m, DOMAttrK o) => o -> T.Text -> m ()+setDOMAttrValue obj val = liftIO $ setObjectPropertyString obj "value" val++constructDOMAttrValue :: T.Text -> IO ([Char], GValue)+constructDOMAttrValue val = constructObjectPropertyString "value" val++data DOMAttrValuePropertyInfo+instance AttrInfo DOMAttrValuePropertyInfo where+ type AttrAllowedOps DOMAttrValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMAttrValuePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMAttrValuePropertyInfo = DOMAttrK+ type AttrGetType DOMAttrValuePropertyInfo = T.Text+ type AttrLabel DOMAttrValuePropertyInfo = "DOMAttr::value"+ attrGet _ = getDOMAttrValue+ attrSet _ = setDOMAttrValue+ attrConstruct _ = constructDOMAttrValue++type instance AttributeList DOMAttr = '[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("is-id", DOMAttrIsIdPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMAttrNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("owner-element", DOMAttrOwnerElementPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("specified", DOMAttrSpecifiedPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("value", DOMAttrValuePropertyInfo)]++-- VVV Prop "enabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMAudioTrackEnabled :: (MonadIO m, DOMAudioTrackK o) => o -> m Bool+getDOMAudioTrackEnabled obj = liftIO $ getObjectPropertyBool obj "enabled"++setDOMAudioTrackEnabled :: (MonadIO m, DOMAudioTrackK o) => o -> Bool -> m ()+setDOMAudioTrackEnabled obj val = liftIO $ setObjectPropertyBool obj "enabled" val++constructDOMAudioTrackEnabled :: Bool -> IO ([Char], GValue)+constructDOMAudioTrackEnabled val = constructObjectPropertyBool "enabled" val++data DOMAudioTrackEnabledPropertyInfo+instance AttrInfo DOMAudioTrackEnabledPropertyInfo where+ type AttrAllowedOps DOMAudioTrackEnabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMAudioTrackEnabledPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMAudioTrackEnabledPropertyInfo = DOMAudioTrackK+ type AttrGetType DOMAudioTrackEnabledPropertyInfo = Bool+ type AttrLabel DOMAudioTrackEnabledPropertyInfo = "DOMAudioTrack::enabled"+ attrGet _ = getDOMAudioTrackEnabled+ attrSet _ = setDOMAudioTrackEnabled+ attrConstruct _ = constructDOMAudioTrackEnabled++-- VVV Prop "id"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMAudioTrackId :: (MonadIO m, DOMAudioTrackK o) => o -> m T.Text+getDOMAudioTrackId obj = liftIO $ getObjectPropertyString obj "id"++data DOMAudioTrackIdPropertyInfo+instance AttrInfo DOMAudioTrackIdPropertyInfo where+ type AttrAllowedOps DOMAudioTrackIdPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMAudioTrackIdPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMAudioTrackIdPropertyInfo = DOMAudioTrackK+ type AttrGetType DOMAudioTrackIdPropertyInfo = T.Text+ type AttrLabel DOMAudioTrackIdPropertyInfo = "DOMAudioTrack::id"+ attrGet _ = getDOMAudioTrackId+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "kind"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMAudioTrackKind :: (MonadIO m, DOMAudioTrackK o) => o -> m T.Text+getDOMAudioTrackKind obj = liftIO $ getObjectPropertyString obj "kind"++data DOMAudioTrackKindPropertyInfo+instance AttrInfo DOMAudioTrackKindPropertyInfo where+ type AttrAllowedOps DOMAudioTrackKindPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMAudioTrackKindPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMAudioTrackKindPropertyInfo = DOMAudioTrackK+ type AttrGetType DOMAudioTrackKindPropertyInfo = T.Text+ type AttrLabel DOMAudioTrackKindPropertyInfo = "DOMAudioTrack::kind"+ attrGet _ = getDOMAudioTrackKind+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "label"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMAudioTrackLabel :: (MonadIO m, DOMAudioTrackK o) => o -> m T.Text+getDOMAudioTrackLabel obj = liftIO $ getObjectPropertyString obj "label"++data DOMAudioTrackLabelPropertyInfo+instance AttrInfo DOMAudioTrackLabelPropertyInfo where+ type AttrAllowedOps DOMAudioTrackLabelPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMAudioTrackLabelPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMAudioTrackLabelPropertyInfo = DOMAudioTrackK+ type AttrGetType DOMAudioTrackLabelPropertyInfo = T.Text+ type AttrLabel DOMAudioTrackLabelPropertyInfo = "DOMAudioTrack::label"+ attrGet _ = getDOMAudioTrackLabel+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "language"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMAudioTrackLanguage :: (MonadIO m, DOMAudioTrackK o) => o -> m T.Text+getDOMAudioTrackLanguage obj = liftIO $ getObjectPropertyString obj "language"++data DOMAudioTrackLanguagePropertyInfo+instance AttrInfo DOMAudioTrackLanguagePropertyInfo where+ type AttrAllowedOps DOMAudioTrackLanguagePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMAudioTrackLanguagePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMAudioTrackLanguagePropertyInfo = DOMAudioTrackK+ type AttrGetType DOMAudioTrackLanguagePropertyInfo = T.Text+ type AttrLabel DOMAudioTrackLanguagePropertyInfo = "DOMAudioTrack::language"+ attrGet _ = getDOMAudioTrackLanguage+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMAudioTrack = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("enabled", DOMAudioTrackEnabledPropertyInfo), '("id", DOMAudioTrackIdPropertyInfo), '("kind", DOMAudioTrackKindPropertyInfo), '("label", DOMAudioTrackLabelPropertyInfo), '("language", DOMAudioTrackLanguagePropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMAudioTrackListLength :: (MonadIO m, DOMAudioTrackListK o) => o -> m Word64+getDOMAudioTrackListLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMAudioTrackListLengthPropertyInfo+instance AttrInfo DOMAudioTrackListLengthPropertyInfo where+ type AttrAllowedOps DOMAudioTrackListLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMAudioTrackListLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMAudioTrackListLengthPropertyInfo = DOMAudioTrackListK+ type AttrGetType DOMAudioTrackListLengthPropertyInfo = Word64+ type AttrLabel DOMAudioTrackListLengthPropertyInfo = "DOMAudioTrackList::length"+ attrGet _ = getDOMAudioTrackListLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMAudioTrackList = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMAudioTrackListLengthPropertyInfo)]++-- VVV Prop "visible"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMBarInfoVisible :: (MonadIO m, DOMBarInfoK o) => o -> m Bool+getDOMBarInfoVisible obj = liftIO $ getObjectPropertyBool obj "visible"++data DOMBarInfoVisiblePropertyInfo+instance AttrInfo DOMBarInfoVisiblePropertyInfo where+ type AttrAllowedOps DOMBarInfoVisiblePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMBarInfoVisiblePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMBarInfoVisiblePropertyInfo = DOMBarInfoK+ type AttrGetType DOMBarInfoVisiblePropertyInfo = Bool+ type AttrLabel DOMBarInfoVisiblePropertyInfo = "DOMBarInfo::visible"+ attrGet _ = getDOMBarInfoVisible+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMBarInfo = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("visible", DOMBarInfoVisiblePropertyInfo)]++-- VVV Prop "visible"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMBarPropVisible :: (MonadIO m, DOMBarPropK o) => o -> m Bool+getDOMBarPropVisible obj = liftIO $ getObjectPropertyBool obj "visible"++data DOMBarPropVisiblePropertyInfo+instance AttrInfo DOMBarPropVisiblePropertyInfo where+ type AttrAllowedOps DOMBarPropVisiblePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMBarPropVisiblePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMBarPropVisiblePropertyInfo = DOMBarPropK+ type AttrGetType DOMBarPropVisiblePropertyInfo = Bool+ type AttrLabel DOMBarPropVisiblePropertyInfo = "DOMBarProp::visible"+ attrGet _ = getDOMBarPropVisible+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMBarProp = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("visible", DOMBarPropVisiblePropertyInfo)]++-- VVV Prop "charging"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMBatteryManagerCharging :: (MonadIO m, DOMBatteryManagerK o) => o -> m Bool+getDOMBatteryManagerCharging obj = liftIO $ getObjectPropertyBool obj "charging"++data DOMBatteryManagerChargingPropertyInfo+instance AttrInfo DOMBatteryManagerChargingPropertyInfo where+ type AttrAllowedOps DOMBatteryManagerChargingPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMBatteryManagerChargingPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMBatteryManagerChargingPropertyInfo = DOMBatteryManagerK+ type AttrGetType DOMBatteryManagerChargingPropertyInfo = Bool+ type AttrLabel DOMBatteryManagerChargingPropertyInfo = "DOMBatteryManager::charging"+ attrGet _ = getDOMBatteryManagerCharging+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "charging-time"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getDOMBatteryManagerChargingTime :: (MonadIO m, DOMBatteryManagerK o) => o -> m Double+getDOMBatteryManagerChargingTime obj = liftIO $ getObjectPropertyDouble obj "charging-time"++data DOMBatteryManagerChargingTimePropertyInfo+instance AttrInfo DOMBatteryManagerChargingTimePropertyInfo where+ type AttrAllowedOps DOMBatteryManagerChargingTimePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMBatteryManagerChargingTimePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMBatteryManagerChargingTimePropertyInfo = DOMBatteryManagerK+ type AttrGetType DOMBatteryManagerChargingTimePropertyInfo = Double+ type AttrLabel DOMBatteryManagerChargingTimePropertyInfo = "DOMBatteryManager::charging-time"+ attrGet _ = getDOMBatteryManagerChargingTime+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "discharging-time"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getDOMBatteryManagerDischargingTime :: (MonadIO m, DOMBatteryManagerK o) => o -> m Double+getDOMBatteryManagerDischargingTime obj = liftIO $ getObjectPropertyDouble obj "discharging-time"++data DOMBatteryManagerDischargingTimePropertyInfo+instance AttrInfo DOMBatteryManagerDischargingTimePropertyInfo where+ type AttrAllowedOps DOMBatteryManagerDischargingTimePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMBatteryManagerDischargingTimePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMBatteryManagerDischargingTimePropertyInfo = DOMBatteryManagerK+ type AttrGetType DOMBatteryManagerDischargingTimePropertyInfo = Double+ type AttrLabel DOMBatteryManagerDischargingTimePropertyInfo = "DOMBatteryManager::discharging-time"+ attrGet _ = getDOMBatteryManagerDischargingTime+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "level"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getDOMBatteryManagerLevel :: (MonadIO m, DOMBatteryManagerK o) => o -> m Double+getDOMBatteryManagerLevel obj = liftIO $ getObjectPropertyDouble obj "level"++data DOMBatteryManagerLevelPropertyInfo+instance AttrInfo DOMBatteryManagerLevelPropertyInfo where+ type AttrAllowedOps DOMBatteryManagerLevelPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMBatteryManagerLevelPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMBatteryManagerLevelPropertyInfo = DOMBatteryManagerK+ type AttrGetType DOMBatteryManagerLevelPropertyInfo = Double+ type AttrLabel DOMBatteryManagerLevelPropertyInfo = "DOMBatteryManager::level"+ attrGet _ = getDOMBatteryManagerLevel+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMBatteryManager = '[ '("charging", DOMBatteryManagerChargingPropertyInfo), '("charging-time", DOMBatteryManagerChargingTimePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("discharging-time", DOMBatteryManagerDischargingTimePropertyInfo), '("level", DOMBatteryManagerLevelPropertyInfo)]++-- VVV Prop "size"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMBlobSize :: (MonadIO m, DOMBlobK o) => o -> m Word64+getDOMBlobSize obj = liftIO $ getObjectPropertyUInt64 obj "size"++data DOMBlobSizePropertyInfo+instance AttrInfo DOMBlobSizePropertyInfo where+ type AttrAllowedOps DOMBlobSizePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMBlobSizePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMBlobSizePropertyInfo = DOMBlobK+ type AttrGetType DOMBlobSizePropertyInfo = Word64+ type AttrLabel DOMBlobSizePropertyInfo = "DOMBlob::size"+ attrGet _ = getDOMBlobSize+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMBlobType :: (MonadIO m, DOMBlobK o) => o -> m T.Text+getDOMBlobType obj = liftIO $ getObjectPropertyString obj "type"++data DOMBlobTypePropertyInfo+instance AttrInfo DOMBlobTypePropertyInfo where+ type AttrAllowedOps DOMBlobTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMBlobTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMBlobTypePropertyInfo = DOMBlobK+ type AttrGetType DOMBlobTypePropertyInfo = T.Text+ type AttrLabel DOMBlobTypePropertyInfo = "DOMBlob::type"+ attrGet _ = getDOMBlobType+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMBlob = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("size", DOMBlobSizePropertyInfo), '("type", DOMBlobTypePropertyInfo)]++type instance AttributeList DOMCDATASection = '[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("data", DOMCharacterDataDataPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("length", DOMCharacterDataLengthPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("whole-text", DOMTextWholeTextPropertyInfo)]++-- VVV Prop "css-text"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMCSSRuleCssText :: (MonadIO m, DOMCSSRuleK o) => o -> m T.Text+getDOMCSSRuleCssText obj = liftIO $ getObjectPropertyString obj "css-text"++setDOMCSSRuleCssText :: (MonadIO m, DOMCSSRuleK o) => o -> T.Text -> m ()+setDOMCSSRuleCssText obj val = liftIO $ setObjectPropertyString obj "css-text" val++constructDOMCSSRuleCssText :: T.Text -> IO ([Char], GValue)+constructDOMCSSRuleCssText val = constructObjectPropertyString "css-text" val++data DOMCSSRuleCssTextPropertyInfo+instance AttrInfo DOMCSSRuleCssTextPropertyInfo where+ type AttrAllowedOps DOMCSSRuleCssTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMCSSRuleCssTextPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMCSSRuleCssTextPropertyInfo = DOMCSSRuleK+ type AttrGetType DOMCSSRuleCssTextPropertyInfo = T.Text+ type AttrLabel DOMCSSRuleCssTextPropertyInfo = "DOMCSSRule::css-text"+ attrGet _ = getDOMCSSRuleCssText+ attrSet _ = setDOMCSSRuleCssText+ attrConstruct _ = constructDOMCSSRuleCssText++-- VVV Prop "parent-rule"+ -- Type: TInterface "WebKit" "DOMCSSRule"+ -- Flags: [PropertyReadable]++getDOMCSSRuleParentRule :: (MonadIO m, DOMCSSRuleK o) => o -> m DOMCSSRule+getDOMCSSRuleParentRule obj = liftIO $ getObjectPropertyObject obj "parent-rule" DOMCSSRule++data DOMCSSRuleParentRulePropertyInfo+instance AttrInfo DOMCSSRuleParentRulePropertyInfo where+ type AttrAllowedOps DOMCSSRuleParentRulePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMCSSRuleParentRulePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMCSSRuleParentRulePropertyInfo = DOMCSSRuleK+ type AttrGetType DOMCSSRuleParentRulePropertyInfo = DOMCSSRule+ type AttrLabel DOMCSSRuleParentRulePropertyInfo = "DOMCSSRule::parent-rule"+ attrGet _ = getDOMCSSRuleParentRule+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "parent-style-sheet"+ -- Type: TInterface "WebKit" "DOMCSSStyleSheet"+ -- Flags: [PropertyReadable]++getDOMCSSRuleParentStyleSheet :: (MonadIO m, DOMCSSRuleK o) => o -> m DOMCSSStyleSheet+getDOMCSSRuleParentStyleSheet obj = liftIO $ getObjectPropertyObject obj "parent-style-sheet" DOMCSSStyleSheet++data DOMCSSRuleParentStyleSheetPropertyInfo+instance AttrInfo DOMCSSRuleParentStyleSheetPropertyInfo where+ type AttrAllowedOps DOMCSSRuleParentStyleSheetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMCSSRuleParentStyleSheetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMCSSRuleParentStyleSheetPropertyInfo = DOMCSSRuleK+ type AttrGetType DOMCSSRuleParentStyleSheetPropertyInfo = DOMCSSStyleSheet+ type AttrLabel DOMCSSRuleParentStyleSheetPropertyInfo = "DOMCSSRule::parent-style-sheet"+ attrGet _ = getDOMCSSRuleParentStyleSheet+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "type"+ -- Type: TBasicType TUInt32+ -- Flags: [PropertyReadable]++getDOMCSSRuleType :: (MonadIO m, DOMCSSRuleK o) => o -> m Word32+getDOMCSSRuleType obj = liftIO $ getObjectPropertyCUInt obj "type"++data DOMCSSRuleTypePropertyInfo+instance AttrInfo DOMCSSRuleTypePropertyInfo where+ type AttrAllowedOps DOMCSSRuleTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMCSSRuleTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMCSSRuleTypePropertyInfo = DOMCSSRuleK+ type AttrGetType DOMCSSRuleTypePropertyInfo = Word32+ type AttrLabel DOMCSSRuleTypePropertyInfo = "DOMCSSRule::type"+ attrGet _ = getDOMCSSRuleType+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMCSSRule = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("css-text", DOMCSSRuleCssTextPropertyInfo), '("parent-rule", DOMCSSRuleParentRulePropertyInfo), '("parent-style-sheet", DOMCSSRuleParentStyleSheetPropertyInfo), '("type", DOMCSSRuleTypePropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMCSSRuleListLength :: (MonadIO m, DOMCSSRuleListK o) => o -> m Word64+getDOMCSSRuleListLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMCSSRuleListLengthPropertyInfo+instance AttrInfo DOMCSSRuleListLengthPropertyInfo where+ type AttrAllowedOps DOMCSSRuleListLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMCSSRuleListLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMCSSRuleListLengthPropertyInfo = DOMCSSRuleListK+ type AttrGetType DOMCSSRuleListLengthPropertyInfo = Word64+ type AttrLabel DOMCSSRuleListLengthPropertyInfo = "DOMCSSRuleList::length"+ attrGet _ = getDOMCSSRuleListLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMCSSRuleList = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMCSSRuleListLengthPropertyInfo)]++-- VVV Prop "css-text"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMCSSStyleDeclarationCssText :: (MonadIO m, DOMCSSStyleDeclarationK o) => o -> m T.Text+getDOMCSSStyleDeclarationCssText obj = liftIO $ getObjectPropertyString obj "css-text"++setDOMCSSStyleDeclarationCssText :: (MonadIO m, DOMCSSStyleDeclarationK o) => o -> T.Text -> m ()+setDOMCSSStyleDeclarationCssText obj val = liftIO $ setObjectPropertyString obj "css-text" val++constructDOMCSSStyleDeclarationCssText :: T.Text -> IO ([Char], GValue)+constructDOMCSSStyleDeclarationCssText val = constructObjectPropertyString "css-text" val++data DOMCSSStyleDeclarationCssTextPropertyInfo+instance AttrInfo DOMCSSStyleDeclarationCssTextPropertyInfo where+ type AttrAllowedOps DOMCSSStyleDeclarationCssTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMCSSStyleDeclarationCssTextPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMCSSStyleDeclarationCssTextPropertyInfo = DOMCSSStyleDeclarationK+ type AttrGetType DOMCSSStyleDeclarationCssTextPropertyInfo = T.Text+ type AttrLabel DOMCSSStyleDeclarationCssTextPropertyInfo = "DOMCSSStyleDeclaration::css-text"+ attrGet _ = getDOMCSSStyleDeclarationCssText+ attrSet _ = setDOMCSSStyleDeclarationCssText+ attrConstruct _ = constructDOMCSSStyleDeclarationCssText++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMCSSStyleDeclarationLength :: (MonadIO m, DOMCSSStyleDeclarationK o) => o -> m Word64+getDOMCSSStyleDeclarationLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMCSSStyleDeclarationLengthPropertyInfo+instance AttrInfo DOMCSSStyleDeclarationLengthPropertyInfo where+ type AttrAllowedOps DOMCSSStyleDeclarationLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMCSSStyleDeclarationLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMCSSStyleDeclarationLengthPropertyInfo = DOMCSSStyleDeclarationK+ type AttrGetType DOMCSSStyleDeclarationLengthPropertyInfo = Word64+ type AttrLabel DOMCSSStyleDeclarationLengthPropertyInfo = "DOMCSSStyleDeclaration::length"+ attrGet _ = getDOMCSSStyleDeclarationLength+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "parent-rule"+ -- Type: TInterface "WebKit" "DOMCSSRule"+ -- Flags: [PropertyReadable]++getDOMCSSStyleDeclarationParentRule :: (MonadIO m, DOMCSSStyleDeclarationK o) => o -> m DOMCSSRule+getDOMCSSStyleDeclarationParentRule obj = liftIO $ getObjectPropertyObject obj "parent-rule" DOMCSSRule++data DOMCSSStyleDeclarationParentRulePropertyInfo+instance AttrInfo DOMCSSStyleDeclarationParentRulePropertyInfo where+ type AttrAllowedOps DOMCSSStyleDeclarationParentRulePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMCSSStyleDeclarationParentRulePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMCSSStyleDeclarationParentRulePropertyInfo = DOMCSSStyleDeclarationK+ type AttrGetType DOMCSSStyleDeclarationParentRulePropertyInfo = DOMCSSRule+ type AttrLabel DOMCSSStyleDeclarationParentRulePropertyInfo = "DOMCSSStyleDeclaration::parent-rule"+ attrGet _ = getDOMCSSStyleDeclarationParentRule+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMCSSStyleDeclaration = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("css-text", DOMCSSStyleDeclarationCssTextPropertyInfo), '("length", DOMCSSStyleDeclarationLengthPropertyInfo), '("parent-rule", DOMCSSStyleDeclarationParentRulePropertyInfo)]++-- VVV Prop "css-rules"+ -- Type: TInterface "WebKit" "DOMCSSRuleList"+ -- Flags: [PropertyReadable]++getDOMCSSStyleSheetCssRules :: (MonadIO m, DOMCSSStyleSheetK o) => o -> m DOMCSSRuleList+getDOMCSSStyleSheetCssRules obj = liftIO $ getObjectPropertyObject obj "css-rules" DOMCSSRuleList++data DOMCSSStyleSheetCssRulesPropertyInfo+instance AttrInfo DOMCSSStyleSheetCssRulesPropertyInfo where+ type AttrAllowedOps DOMCSSStyleSheetCssRulesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMCSSStyleSheetCssRulesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMCSSStyleSheetCssRulesPropertyInfo = DOMCSSStyleSheetK+ type AttrGetType DOMCSSStyleSheetCssRulesPropertyInfo = DOMCSSRuleList+ type AttrLabel DOMCSSStyleSheetCssRulesPropertyInfo = "DOMCSSStyleSheet::css-rules"+ attrGet _ = getDOMCSSStyleSheetCssRules+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "owner-rule"+ -- Type: TInterface "WebKit" "DOMCSSRule"+ -- Flags: [PropertyReadable]++getDOMCSSStyleSheetOwnerRule :: (MonadIO m, DOMCSSStyleSheetK o) => o -> m DOMCSSRule+getDOMCSSStyleSheetOwnerRule obj = liftIO $ getObjectPropertyObject obj "owner-rule" DOMCSSRule++data DOMCSSStyleSheetOwnerRulePropertyInfo+instance AttrInfo DOMCSSStyleSheetOwnerRulePropertyInfo where+ type AttrAllowedOps DOMCSSStyleSheetOwnerRulePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMCSSStyleSheetOwnerRulePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMCSSStyleSheetOwnerRulePropertyInfo = DOMCSSStyleSheetK+ type AttrGetType DOMCSSStyleSheetOwnerRulePropertyInfo = DOMCSSRule+ type AttrLabel DOMCSSStyleSheetOwnerRulePropertyInfo = "DOMCSSStyleSheet::owner-rule"+ attrGet _ = getDOMCSSStyleSheetOwnerRule+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "rules"+ -- Type: TInterface "WebKit" "DOMCSSRuleList"+ -- Flags: [PropertyReadable]++getDOMCSSStyleSheetRules :: (MonadIO m, DOMCSSStyleSheetK o) => o -> m DOMCSSRuleList+getDOMCSSStyleSheetRules obj = liftIO $ getObjectPropertyObject obj "rules" DOMCSSRuleList++data DOMCSSStyleSheetRulesPropertyInfo+instance AttrInfo DOMCSSStyleSheetRulesPropertyInfo where+ type AttrAllowedOps DOMCSSStyleSheetRulesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMCSSStyleSheetRulesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMCSSStyleSheetRulesPropertyInfo = DOMCSSStyleSheetK+ type AttrGetType DOMCSSStyleSheetRulesPropertyInfo = DOMCSSRuleList+ type AttrLabel DOMCSSStyleSheetRulesPropertyInfo = "DOMCSSStyleSheet::rules"+ attrGet _ = getDOMCSSStyleSheetRules+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMCSSStyleSheet = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("css-rules", DOMCSSStyleSheetCssRulesPropertyInfo), '("disabled", DOMStyleSheetDisabledPropertyInfo), '("href", DOMStyleSheetHrefPropertyInfo), '("media", DOMStyleSheetMediaPropertyInfo), '("owner-node", DOMStyleSheetOwnerNodePropertyInfo), '("owner-rule", DOMCSSStyleSheetOwnerRulePropertyInfo), '("parent-style-sheet", DOMStyleSheetParentStyleSheetPropertyInfo), '("rules", DOMCSSStyleSheetRulesPropertyInfo), '("title", DOMStyleSheetTitlePropertyInfo), '("type", DOMStyleSheetTypePropertyInfo)]++-- VVV Prop "css-text"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMCSSValueCssText :: (MonadIO m, DOMCSSValueK o) => o -> m T.Text+getDOMCSSValueCssText obj = liftIO $ getObjectPropertyString obj "css-text"++setDOMCSSValueCssText :: (MonadIO m, DOMCSSValueK o) => o -> T.Text -> m ()+setDOMCSSValueCssText obj val = liftIO $ setObjectPropertyString obj "css-text" val++constructDOMCSSValueCssText :: T.Text -> IO ([Char], GValue)+constructDOMCSSValueCssText val = constructObjectPropertyString "css-text" val++data DOMCSSValueCssTextPropertyInfo+instance AttrInfo DOMCSSValueCssTextPropertyInfo where+ type AttrAllowedOps DOMCSSValueCssTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMCSSValueCssTextPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMCSSValueCssTextPropertyInfo = DOMCSSValueK+ type AttrGetType DOMCSSValueCssTextPropertyInfo = T.Text+ type AttrLabel DOMCSSValueCssTextPropertyInfo = "DOMCSSValue::css-text"+ attrGet _ = getDOMCSSValueCssText+ attrSet _ = setDOMCSSValueCssText+ attrConstruct _ = constructDOMCSSValueCssText++-- VVV Prop "css-value-type"+ -- Type: TBasicType TUInt32+ -- Flags: [PropertyReadable]++getDOMCSSValueCssValueType :: (MonadIO m, DOMCSSValueK o) => o -> m Word32+getDOMCSSValueCssValueType obj = liftIO $ getObjectPropertyCUInt obj "css-value-type"++data DOMCSSValueCssValueTypePropertyInfo+instance AttrInfo DOMCSSValueCssValueTypePropertyInfo where+ type AttrAllowedOps DOMCSSValueCssValueTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMCSSValueCssValueTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMCSSValueCssValueTypePropertyInfo = DOMCSSValueK+ type AttrGetType DOMCSSValueCssValueTypePropertyInfo = Word32+ type AttrLabel DOMCSSValueCssValueTypePropertyInfo = "DOMCSSValue::css-value-type"+ attrGet _ = getDOMCSSValueCssValueType+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMCSSValue = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("css-text", DOMCSSValueCssTextPropertyInfo), '("css-value-type", DOMCSSValueCssValueTypePropertyInfo)]++-- VVV Prop "data"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMCharacterDataData :: (MonadIO m, DOMCharacterDataK o) => o -> m T.Text+getDOMCharacterDataData obj = liftIO $ getObjectPropertyString obj "data"++setDOMCharacterDataData :: (MonadIO m, DOMCharacterDataK o) => o -> T.Text -> m ()+setDOMCharacterDataData obj val = liftIO $ setObjectPropertyString obj "data" val++constructDOMCharacterDataData :: T.Text -> IO ([Char], GValue)+constructDOMCharacterDataData val = constructObjectPropertyString "data" val++data DOMCharacterDataDataPropertyInfo+instance AttrInfo DOMCharacterDataDataPropertyInfo where+ type AttrAllowedOps DOMCharacterDataDataPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMCharacterDataDataPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMCharacterDataDataPropertyInfo = DOMCharacterDataK+ type AttrGetType DOMCharacterDataDataPropertyInfo = T.Text+ type AttrLabel DOMCharacterDataDataPropertyInfo = "DOMCharacterData::data"+ attrGet _ = getDOMCharacterDataData+ attrSet _ = setDOMCharacterDataData+ attrConstruct _ = constructDOMCharacterDataData++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMCharacterDataLength :: (MonadIO m, DOMCharacterDataK o) => o -> m Word64+getDOMCharacterDataLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMCharacterDataLengthPropertyInfo+instance AttrInfo DOMCharacterDataLengthPropertyInfo where+ type AttrAllowedOps DOMCharacterDataLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMCharacterDataLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMCharacterDataLengthPropertyInfo = DOMCharacterDataK+ type AttrGetType DOMCharacterDataLengthPropertyInfo = Word64+ type AttrLabel DOMCharacterDataLengthPropertyInfo = "DOMCharacterData::length"+ attrGet _ = getDOMCharacterDataLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMCharacterData = '[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("data", DOMCharacterDataDataPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("length", DOMCharacterDataLengthPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo)]++type instance AttributeList DOMComment = '[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("data", DOMCharacterDataDataPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("length", DOMCharacterDataLengthPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo)]++type instance AttributeList DOMConsole = '[ '("core-object", DOMObjectCoreObjectPropertyInfo)]++-- VVV Prop "status"+ -- Type: TBasicType TUInt32+ -- Flags: [PropertyReadable]++getDOMDOMApplicationCacheStatus :: (MonadIO m, DOMDOMApplicationCacheK o) => o -> m Word32+getDOMDOMApplicationCacheStatus obj = liftIO $ getObjectPropertyCUInt obj "status"++data DOMDOMApplicationCacheStatusPropertyInfo+instance AttrInfo DOMDOMApplicationCacheStatusPropertyInfo where+ type AttrAllowedOps DOMDOMApplicationCacheStatusPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMApplicationCacheStatusPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMApplicationCacheStatusPropertyInfo = DOMDOMApplicationCacheK+ type AttrGetType DOMDOMApplicationCacheStatusPropertyInfo = Word32+ type AttrLabel DOMDOMApplicationCacheStatusPropertyInfo = "DOMDOMApplicationCache::status"+ attrGet _ = getDOMDOMApplicationCacheStatus+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMDOMApplicationCache = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("status", DOMDOMApplicationCacheStatusPropertyInfo)]++type instance AttributeList DOMDOMImplementation = '[ '("core-object", DOMObjectCoreObjectPropertyInfo)]++-- VVV Prop "description"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDOMMimeTypeDescription :: (MonadIO m, DOMDOMMimeTypeK o) => o -> m T.Text+getDOMDOMMimeTypeDescription obj = liftIO $ getObjectPropertyString obj "description"++data DOMDOMMimeTypeDescriptionPropertyInfo+instance AttrInfo DOMDOMMimeTypeDescriptionPropertyInfo where+ type AttrAllowedOps DOMDOMMimeTypeDescriptionPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMMimeTypeDescriptionPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMMimeTypeDescriptionPropertyInfo = DOMDOMMimeTypeK+ type AttrGetType DOMDOMMimeTypeDescriptionPropertyInfo = T.Text+ type AttrLabel DOMDOMMimeTypeDescriptionPropertyInfo = "DOMDOMMimeType::description"+ attrGet _ = getDOMDOMMimeTypeDescription+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "enabled-plugin"+ -- Type: TInterface "WebKit" "DOMDOMPlugin"+ -- Flags: [PropertyReadable]++getDOMDOMMimeTypeEnabledPlugin :: (MonadIO m, DOMDOMMimeTypeK o) => o -> m DOMDOMPlugin+getDOMDOMMimeTypeEnabledPlugin obj = liftIO $ getObjectPropertyObject obj "enabled-plugin" DOMDOMPlugin++data DOMDOMMimeTypeEnabledPluginPropertyInfo+instance AttrInfo DOMDOMMimeTypeEnabledPluginPropertyInfo where+ type AttrAllowedOps DOMDOMMimeTypeEnabledPluginPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMMimeTypeEnabledPluginPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMMimeTypeEnabledPluginPropertyInfo = DOMDOMMimeTypeK+ type AttrGetType DOMDOMMimeTypeEnabledPluginPropertyInfo = DOMDOMPlugin+ type AttrLabel DOMDOMMimeTypeEnabledPluginPropertyInfo = "DOMDOMMimeType::enabled-plugin"+ attrGet _ = getDOMDOMMimeTypeEnabledPlugin+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "suffixes"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDOMMimeTypeSuffixes :: (MonadIO m, DOMDOMMimeTypeK o) => o -> m T.Text+getDOMDOMMimeTypeSuffixes obj = liftIO $ getObjectPropertyString obj "suffixes"++data DOMDOMMimeTypeSuffixesPropertyInfo+instance AttrInfo DOMDOMMimeTypeSuffixesPropertyInfo where+ type AttrAllowedOps DOMDOMMimeTypeSuffixesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMMimeTypeSuffixesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMMimeTypeSuffixesPropertyInfo = DOMDOMMimeTypeK+ type AttrGetType DOMDOMMimeTypeSuffixesPropertyInfo = T.Text+ type AttrLabel DOMDOMMimeTypeSuffixesPropertyInfo = "DOMDOMMimeType::suffixes"+ attrGet _ = getDOMDOMMimeTypeSuffixes+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDOMMimeTypeType :: (MonadIO m, DOMDOMMimeTypeK o) => o -> m T.Text+getDOMDOMMimeTypeType obj = liftIO $ getObjectPropertyString obj "type"++data DOMDOMMimeTypeTypePropertyInfo+instance AttrInfo DOMDOMMimeTypeTypePropertyInfo where+ type AttrAllowedOps DOMDOMMimeTypeTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMMimeTypeTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMMimeTypeTypePropertyInfo = DOMDOMMimeTypeK+ type AttrGetType DOMDOMMimeTypeTypePropertyInfo = T.Text+ type AttrLabel DOMDOMMimeTypeTypePropertyInfo = "DOMDOMMimeType::type"+ attrGet _ = getDOMDOMMimeTypeType+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMDOMMimeType = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("description", DOMDOMMimeTypeDescriptionPropertyInfo), '("enabled-plugin", DOMDOMMimeTypeEnabledPluginPropertyInfo), '("suffixes", DOMDOMMimeTypeSuffixesPropertyInfo), '("type", DOMDOMMimeTypeTypePropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMDOMMimeTypeArrayLength :: (MonadIO m, DOMDOMMimeTypeArrayK o) => o -> m Word64+getDOMDOMMimeTypeArrayLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMDOMMimeTypeArrayLengthPropertyInfo+instance AttrInfo DOMDOMMimeTypeArrayLengthPropertyInfo where+ type AttrAllowedOps DOMDOMMimeTypeArrayLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMMimeTypeArrayLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMMimeTypeArrayLengthPropertyInfo = DOMDOMMimeTypeArrayK+ type AttrGetType DOMDOMMimeTypeArrayLengthPropertyInfo = Word64+ type AttrLabel DOMDOMMimeTypeArrayLengthPropertyInfo = "DOMDOMMimeTypeArray::length"+ attrGet _ = getDOMDOMMimeTypeArrayLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMDOMMimeTypeArray = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMMimeTypeArrayLengthPropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMDOMNamedFlowCollectionLength :: (MonadIO m, DOMDOMNamedFlowCollectionK o) => o -> m Word64+getDOMDOMNamedFlowCollectionLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMDOMNamedFlowCollectionLengthPropertyInfo+instance AttrInfo DOMDOMNamedFlowCollectionLengthPropertyInfo where+ type AttrAllowedOps DOMDOMNamedFlowCollectionLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMNamedFlowCollectionLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMNamedFlowCollectionLengthPropertyInfo = DOMDOMNamedFlowCollectionK+ type AttrGetType DOMDOMNamedFlowCollectionLengthPropertyInfo = Word64+ type AttrLabel DOMDOMNamedFlowCollectionLengthPropertyInfo = "DOMDOMNamedFlowCollection::length"+ attrGet _ = getDOMDOMNamedFlowCollectionLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMDOMNamedFlowCollection = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMNamedFlowCollectionLengthPropertyInfo)]++-- VVV Prop "description"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDOMPluginDescription :: (MonadIO m, DOMDOMPluginK o) => o -> m T.Text+getDOMDOMPluginDescription obj = liftIO $ getObjectPropertyString obj "description"++data DOMDOMPluginDescriptionPropertyInfo+instance AttrInfo DOMDOMPluginDescriptionPropertyInfo where+ type AttrAllowedOps DOMDOMPluginDescriptionPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMPluginDescriptionPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMPluginDescriptionPropertyInfo = DOMDOMPluginK+ type AttrGetType DOMDOMPluginDescriptionPropertyInfo = T.Text+ type AttrLabel DOMDOMPluginDescriptionPropertyInfo = "DOMDOMPlugin::description"+ attrGet _ = getDOMDOMPluginDescription+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "filename"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDOMPluginFilename :: (MonadIO m, DOMDOMPluginK o) => o -> m T.Text+getDOMDOMPluginFilename obj = liftIO $ getObjectPropertyString obj "filename"++data DOMDOMPluginFilenamePropertyInfo+instance AttrInfo DOMDOMPluginFilenamePropertyInfo where+ type AttrAllowedOps DOMDOMPluginFilenamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMPluginFilenamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMPluginFilenamePropertyInfo = DOMDOMPluginK+ type AttrGetType DOMDOMPluginFilenamePropertyInfo = T.Text+ type AttrLabel DOMDOMPluginFilenamePropertyInfo = "DOMDOMPlugin::filename"+ attrGet _ = getDOMDOMPluginFilename+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMDOMPluginLength :: (MonadIO m, DOMDOMPluginK o) => o -> m Word64+getDOMDOMPluginLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMDOMPluginLengthPropertyInfo+instance AttrInfo DOMDOMPluginLengthPropertyInfo where+ type AttrAllowedOps DOMDOMPluginLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMPluginLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMPluginLengthPropertyInfo = DOMDOMPluginK+ type AttrGetType DOMDOMPluginLengthPropertyInfo = Word64+ type AttrLabel DOMDOMPluginLengthPropertyInfo = "DOMDOMPlugin::length"+ attrGet _ = getDOMDOMPluginLength+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDOMPluginName :: (MonadIO m, DOMDOMPluginK o) => o -> m T.Text+getDOMDOMPluginName obj = liftIO $ getObjectPropertyString obj "name"++data DOMDOMPluginNamePropertyInfo+instance AttrInfo DOMDOMPluginNamePropertyInfo where+ type AttrAllowedOps DOMDOMPluginNamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMPluginNamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMPluginNamePropertyInfo = DOMDOMPluginK+ type AttrGetType DOMDOMPluginNamePropertyInfo = T.Text+ type AttrLabel DOMDOMPluginNamePropertyInfo = "DOMDOMPlugin::name"+ attrGet _ = getDOMDOMPluginName+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMDOMPlugin = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("description", DOMDOMPluginDescriptionPropertyInfo), '("filename", DOMDOMPluginFilenamePropertyInfo), '("length", DOMDOMPluginLengthPropertyInfo), '("name", DOMDOMPluginNamePropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMDOMPluginArrayLength :: (MonadIO m, DOMDOMPluginArrayK o) => o -> m Word64+getDOMDOMPluginArrayLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMDOMPluginArrayLengthPropertyInfo+instance AttrInfo DOMDOMPluginArrayLengthPropertyInfo where+ type AttrAllowedOps DOMDOMPluginArrayLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMPluginArrayLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMPluginArrayLengthPropertyInfo = DOMDOMPluginArrayK+ type AttrGetType DOMDOMPluginArrayLengthPropertyInfo = Word64+ type AttrLabel DOMDOMPluginArrayLengthPropertyInfo = "DOMDOMPluginArray::length"+ attrGet _ = getDOMDOMPluginArrayLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMDOMPluginArray = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMPluginArrayLengthPropertyInfo)]++-- VVV Prop "allows-eval"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMDOMSecurityPolicyAllowsEval :: (MonadIO m, DOMDOMSecurityPolicyK o) => o -> m Bool+getDOMDOMSecurityPolicyAllowsEval obj = liftIO $ getObjectPropertyBool obj "allows-eval"++data DOMDOMSecurityPolicyAllowsEvalPropertyInfo+instance AttrInfo DOMDOMSecurityPolicyAllowsEvalPropertyInfo where+ type AttrAllowedOps DOMDOMSecurityPolicyAllowsEvalPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSecurityPolicyAllowsEvalPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMSecurityPolicyAllowsEvalPropertyInfo = DOMDOMSecurityPolicyK+ type AttrGetType DOMDOMSecurityPolicyAllowsEvalPropertyInfo = Bool+ type AttrLabel DOMDOMSecurityPolicyAllowsEvalPropertyInfo = "DOMDOMSecurityPolicy::allows-eval"+ attrGet _ = getDOMDOMSecurityPolicyAllowsEval+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "allows-inline-script"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMDOMSecurityPolicyAllowsInlineScript :: (MonadIO m, DOMDOMSecurityPolicyK o) => o -> m Bool+getDOMDOMSecurityPolicyAllowsInlineScript obj = liftIO $ getObjectPropertyBool obj "allows-inline-script"++data DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo+instance AttrInfo DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo where+ type AttrAllowedOps DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo = DOMDOMSecurityPolicyK+ type AttrGetType DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo = Bool+ type AttrLabel DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo = "DOMDOMSecurityPolicy::allows-inline-script"+ attrGet _ = getDOMDOMSecurityPolicyAllowsInlineScript+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "allows-inline-style"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMDOMSecurityPolicyAllowsInlineStyle :: (MonadIO m, DOMDOMSecurityPolicyK o) => o -> m Bool+getDOMDOMSecurityPolicyAllowsInlineStyle obj = liftIO $ getObjectPropertyBool obj "allows-inline-style"++data DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo+instance AttrInfo DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo where+ type AttrAllowedOps DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo = DOMDOMSecurityPolicyK+ type AttrGetType DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo = Bool+ type AttrLabel DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo = "DOMDOMSecurityPolicy::allows-inline-style"+ attrGet _ = getDOMDOMSecurityPolicyAllowsInlineStyle+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "is-active"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMDOMSecurityPolicyIsActive :: (MonadIO m, DOMDOMSecurityPolicyK o) => o -> m Bool+getDOMDOMSecurityPolicyIsActive obj = liftIO $ getObjectPropertyBool obj "is-active"++data DOMDOMSecurityPolicyIsActivePropertyInfo+instance AttrInfo DOMDOMSecurityPolicyIsActivePropertyInfo where+ type AttrAllowedOps DOMDOMSecurityPolicyIsActivePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSecurityPolicyIsActivePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMSecurityPolicyIsActivePropertyInfo = DOMDOMSecurityPolicyK+ type AttrGetType DOMDOMSecurityPolicyIsActivePropertyInfo = Bool+ type AttrLabel DOMDOMSecurityPolicyIsActivePropertyInfo = "DOMDOMSecurityPolicy::is-active"+ attrGet _ = getDOMDOMSecurityPolicyIsActive+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "report-ur-is"+ -- Type: TInterface "WebKit" "DOMDOMStringList"+ -- Flags: [PropertyReadable]++getDOMDOMSecurityPolicyReportUrIs :: (MonadIO m, DOMDOMSecurityPolicyK o) => o -> m DOMDOMStringList+getDOMDOMSecurityPolicyReportUrIs obj = liftIO $ getObjectPropertyObject obj "report-ur-is" DOMDOMStringList++data DOMDOMSecurityPolicyReportUrIsPropertyInfo+instance AttrInfo DOMDOMSecurityPolicyReportUrIsPropertyInfo where+ type AttrAllowedOps DOMDOMSecurityPolicyReportUrIsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSecurityPolicyReportUrIsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMSecurityPolicyReportUrIsPropertyInfo = DOMDOMSecurityPolicyK+ type AttrGetType DOMDOMSecurityPolicyReportUrIsPropertyInfo = DOMDOMStringList+ type AttrLabel DOMDOMSecurityPolicyReportUrIsPropertyInfo = "DOMDOMSecurityPolicy::report-ur-is"+ attrGet _ = getDOMDOMSecurityPolicyReportUrIs+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMDOMSecurityPolicy = '[ '("allows-eval", DOMDOMSecurityPolicyAllowsEvalPropertyInfo), '("allows-inline-script", DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo), '("allows-inline-style", DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("is-active", DOMDOMSecurityPolicyIsActivePropertyInfo), '("report-ur-is", DOMDOMSecurityPolicyReportUrIsPropertyInfo)]++-- VVV Prop "anchor-node"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMDOMSelectionAnchorNode :: (MonadIO m, DOMDOMSelectionK o) => o -> m DOMNode+getDOMDOMSelectionAnchorNode obj = liftIO $ getObjectPropertyObject obj "anchor-node" DOMNode++data DOMDOMSelectionAnchorNodePropertyInfo+instance AttrInfo DOMDOMSelectionAnchorNodePropertyInfo where+ type AttrAllowedOps DOMDOMSelectionAnchorNodePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSelectionAnchorNodePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMSelectionAnchorNodePropertyInfo = DOMDOMSelectionK+ type AttrGetType DOMDOMSelectionAnchorNodePropertyInfo = DOMNode+ type AttrLabel DOMDOMSelectionAnchorNodePropertyInfo = "DOMDOMSelection::anchor-node"+ attrGet _ = getDOMDOMSelectionAnchorNode+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "anchor-offset"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMSelectionAnchorOffset :: (MonadIO m, DOMDOMSelectionK o) => o -> m Int64+getDOMDOMSelectionAnchorOffset obj = liftIO $ getObjectPropertyInt64 obj "anchor-offset"++data DOMDOMSelectionAnchorOffsetPropertyInfo+instance AttrInfo DOMDOMSelectionAnchorOffsetPropertyInfo where+ type AttrAllowedOps DOMDOMSelectionAnchorOffsetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSelectionAnchorOffsetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMSelectionAnchorOffsetPropertyInfo = DOMDOMSelectionK+ type AttrGetType DOMDOMSelectionAnchorOffsetPropertyInfo = Int64+ type AttrLabel DOMDOMSelectionAnchorOffsetPropertyInfo = "DOMDOMSelection::anchor-offset"+ attrGet _ = getDOMDOMSelectionAnchorOffset+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "base-node"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMDOMSelectionBaseNode :: (MonadIO m, DOMDOMSelectionK o) => o -> m DOMNode+getDOMDOMSelectionBaseNode obj = liftIO $ getObjectPropertyObject obj "base-node" DOMNode++data DOMDOMSelectionBaseNodePropertyInfo+instance AttrInfo DOMDOMSelectionBaseNodePropertyInfo where+ type AttrAllowedOps DOMDOMSelectionBaseNodePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSelectionBaseNodePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMSelectionBaseNodePropertyInfo = DOMDOMSelectionK+ type AttrGetType DOMDOMSelectionBaseNodePropertyInfo = DOMNode+ type AttrLabel DOMDOMSelectionBaseNodePropertyInfo = "DOMDOMSelection::base-node"+ attrGet _ = getDOMDOMSelectionBaseNode+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "base-offset"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMSelectionBaseOffset :: (MonadIO m, DOMDOMSelectionK o) => o -> m Int64+getDOMDOMSelectionBaseOffset obj = liftIO $ getObjectPropertyInt64 obj "base-offset"++data DOMDOMSelectionBaseOffsetPropertyInfo+instance AttrInfo DOMDOMSelectionBaseOffsetPropertyInfo where+ type AttrAllowedOps DOMDOMSelectionBaseOffsetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSelectionBaseOffsetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMSelectionBaseOffsetPropertyInfo = DOMDOMSelectionK+ type AttrGetType DOMDOMSelectionBaseOffsetPropertyInfo = Int64+ type AttrLabel DOMDOMSelectionBaseOffsetPropertyInfo = "DOMDOMSelection::base-offset"+ attrGet _ = getDOMDOMSelectionBaseOffset+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "extent-node"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMDOMSelectionExtentNode :: (MonadIO m, DOMDOMSelectionK o) => o -> m DOMNode+getDOMDOMSelectionExtentNode obj = liftIO $ getObjectPropertyObject obj "extent-node" DOMNode++data DOMDOMSelectionExtentNodePropertyInfo+instance AttrInfo DOMDOMSelectionExtentNodePropertyInfo where+ type AttrAllowedOps DOMDOMSelectionExtentNodePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSelectionExtentNodePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMSelectionExtentNodePropertyInfo = DOMDOMSelectionK+ type AttrGetType DOMDOMSelectionExtentNodePropertyInfo = DOMNode+ type AttrLabel DOMDOMSelectionExtentNodePropertyInfo = "DOMDOMSelection::extent-node"+ attrGet _ = getDOMDOMSelectionExtentNode+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "extent-offset"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMSelectionExtentOffset :: (MonadIO m, DOMDOMSelectionK o) => o -> m Int64+getDOMDOMSelectionExtentOffset obj = liftIO $ getObjectPropertyInt64 obj "extent-offset"++data DOMDOMSelectionExtentOffsetPropertyInfo+instance AttrInfo DOMDOMSelectionExtentOffsetPropertyInfo where+ type AttrAllowedOps DOMDOMSelectionExtentOffsetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSelectionExtentOffsetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMSelectionExtentOffsetPropertyInfo = DOMDOMSelectionK+ type AttrGetType DOMDOMSelectionExtentOffsetPropertyInfo = Int64+ type AttrLabel DOMDOMSelectionExtentOffsetPropertyInfo = "DOMDOMSelection::extent-offset"+ attrGet _ = getDOMDOMSelectionExtentOffset+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "focus-node"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMDOMSelectionFocusNode :: (MonadIO m, DOMDOMSelectionK o) => o -> m DOMNode+getDOMDOMSelectionFocusNode obj = liftIO $ getObjectPropertyObject obj "focus-node" DOMNode++data DOMDOMSelectionFocusNodePropertyInfo+instance AttrInfo DOMDOMSelectionFocusNodePropertyInfo where+ type AttrAllowedOps DOMDOMSelectionFocusNodePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSelectionFocusNodePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMSelectionFocusNodePropertyInfo = DOMDOMSelectionK+ type AttrGetType DOMDOMSelectionFocusNodePropertyInfo = DOMNode+ type AttrLabel DOMDOMSelectionFocusNodePropertyInfo = "DOMDOMSelection::focus-node"+ attrGet _ = getDOMDOMSelectionFocusNode+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "focus-offset"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMSelectionFocusOffset :: (MonadIO m, DOMDOMSelectionK o) => o -> m Int64+getDOMDOMSelectionFocusOffset obj = liftIO $ getObjectPropertyInt64 obj "focus-offset"++data DOMDOMSelectionFocusOffsetPropertyInfo+instance AttrInfo DOMDOMSelectionFocusOffsetPropertyInfo where+ type AttrAllowedOps DOMDOMSelectionFocusOffsetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSelectionFocusOffsetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMSelectionFocusOffsetPropertyInfo = DOMDOMSelectionK+ type AttrGetType DOMDOMSelectionFocusOffsetPropertyInfo = Int64+ type AttrLabel DOMDOMSelectionFocusOffsetPropertyInfo = "DOMDOMSelection::focus-offset"+ attrGet _ = getDOMDOMSelectionFocusOffset+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "is-collapsed"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMDOMSelectionIsCollapsed :: (MonadIO m, DOMDOMSelectionK o) => o -> m Bool+getDOMDOMSelectionIsCollapsed obj = liftIO $ getObjectPropertyBool obj "is-collapsed"++data DOMDOMSelectionIsCollapsedPropertyInfo+instance AttrInfo DOMDOMSelectionIsCollapsedPropertyInfo where+ type AttrAllowedOps DOMDOMSelectionIsCollapsedPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSelectionIsCollapsedPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMSelectionIsCollapsedPropertyInfo = DOMDOMSelectionK+ type AttrGetType DOMDOMSelectionIsCollapsedPropertyInfo = Bool+ type AttrLabel DOMDOMSelectionIsCollapsedPropertyInfo = "DOMDOMSelection::is-collapsed"+ attrGet _ = getDOMDOMSelectionIsCollapsed+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "range-count"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMSelectionRangeCount :: (MonadIO m, DOMDOMSelectionK o) => o -> m Int64+getDOMDOMSelectionRangeCount obj = liftIO $ getObjectPropertyInt64 obj "range-count"++data DOMDOMSelectionRangeCountPropertyInfo+instance AttrInfo DOMDOMSelectionRangeCountPropertyInfo where+ type AttrAllowedOps DOMDOMSelectionRangeCountPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSelectionRangeCountPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMSelectionRangeCountPropertyInfo = DOMDOMSelectionK+ type AttrGetType DOMDOMSelectionRangeCountPropertyInfo = Int64+ type AttrLabel DOMDOMSelectionRangeCountPropertyInfo = "DOMDOMSelection::range-count"+ attrGet _ = getDOMDOMSelectionRangeCount+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDOMSelectionType :: (MonadIO m, DOMDOMSelectionK o) => o -> m T.Text+getDOMDOMSelectionType obj = liftIO $ getObjectPropertyString obj "type"++data DOMDOMSelectionTypePropertyInfo+instance AttrInfo DOMDOMSelectionTypePropertyInfo where+ type AttrAllowedOps DOMDOMSelectionTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSelectionTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMSelectionTypePropertyInfo = DOMDOMSelectionK+ type AttrGetType DOMDOMSelectionTypePropertyInfo = T.Text+ type AttrLabel DOMDOMSelectionTypePropertyInfo = "DOMDOMSelection::type"+ attrGet _ = getDOMDOMSelectionType+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMDOMSelection = '[ '("anchor-node", DOMDOMSelectionAnchorNodePropertyInfo), '("anchor-offset", DOMDOMSelectionAnchorOffsetPropertyInfo), '("base-node", DOMDOMSelectionBaseNodePropertyInfo), '("base-offset", DOMDOMSelectionBaseOffsetPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("extent-node", DOMDOMSelectionExtentNodePropertyInfo), '("extent-offset", DOMDOMSelectionExtentOffsetPropertyInfo), '("focus-node", DOMDOMSelectionFocusNodePropertyInfo), '("focus-offset", DOMDOMSelectionFocusOffsetPropertyInfo), '("is-collapsed", DOMDOMSelectionIsCollapsedPropertyInfo), '("range-count", DOMDOMSelectionRangeCountPropertyInfo), '("type", DOMDOMSelectionTypePropertyInfo)]++-- VVV Prop "value"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMDOMSettableTokenListValue :: (MonadIO m, DOMDOMSettableTokenListK o) => o -> m T.Text+getDOMDOMSettableTokenListValue obj = liftIO $ getObjectPropertyString obj "value"++setDOMDOMSettableTokenListValue :: (MonadIO m, DOMDOMSettableTokenListK o) => o -> T.Text -> m ()+setDOMDOMSettableTokenListValue obj val = liftIO $ setObjectPropertyString obj "value" val++constructDOMDOMSettableTokenListValue :: T.Text -> IO ([Char], GValue)+constructDOMDOMSettableTokenListValue val = constructObjectPropertyString "value" val++data DOMDOMSettableTokenListValuePropertyInfo+instance AttrInfo DOMDOMSettableTokenListValuePropertyInfo where+ type AttrAllowedOps DOMDOMSettableTokenListValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMDOMSettableTokenListValuePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMDOMSettableTokenListValuePropertyInfo = DOMDOMSettableTokenListK+ type AttrGetType DOMDOMSettableTokenListValuePropertyInfo = T.Text+ type AttrLabel DOMDOMSettableTokenListValuePropertyInfo = "DOMDOMSettableTokenList::value"+ attrGet _ = getDOMDOMSettableTokenListValue+ attrSet _ = setDOMDOMSettableTokenListValue+ attrConstruct _ = constructDOMDOMSettableTokenListValue++type instance AttributeList DOMDOMSettableTokenList = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMTokenListLengthPropertyInfo), '("value", DOMDOMSettableTokenListValuePropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMDOMStringListLength :: (MonadIO m, DOMDOMStringListK o) => o -> m Word64+getDOMDOMStringListLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMDOMStringListLengthPropertyInfo+instance AttrInfo DOMDOMStringListLengthPropertyInfo where+ type AttrAllowedOps DOMDOMStringListLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMStringListLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMStringListLengthPropertyInfo = DOMDOMStringListK+ type AttrGetType DOMDOMStringListLengthPropertyInfo = Word64+ type AttrLabel DOMDOMStringListLengthPropertyInfo = "DOMDOMStringList::length"+ attrGet _ = getDOMDOMStringListLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMDOMStringList = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMStringListLengthPropertyInfo)]++type instance AttributeList DOMDOMStringMap = '[ '("core-object", DOMObjectCoreObjectPropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMDOMTokenListLength :: (MonadIO m, DOMDOMTokenListK o) => o -> m Word64+getDOMDOMTokenListLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMDOMTokenListLengthPropertyInfo+instance AttrInfo DOMDOMTokenListLengthPropertyInfo where+ type AttrAllowedOps DOMDOMTokenListLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMTokenListLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMTokenListLengthPropertyInfo = DOMDOMTokenListK+ type AttrGetType DOMDOMTokenListLengthPropertyInfo = Word64+ type AttrLabel DOMDOMTokenListLengthPropertyInfo = "DOMDOMTokenList::length"+ attrGet _ = getDOMDOMTokenListLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMDOMTokenList = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMTokenListLengthPropertyInfo)]++-- VVV Prop "application-cache"+ -- Type: TInterface "WebKit" "DOMDOMApplicationCache"+ -- Flags: [PropertyReadable]++getDOMDOMWindowApplicationCache :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMApplicationCache+getDOMDOMWindowApplicationCache obj = liftIO $ getObjectPropertyObject obj "application-cache" DOMDOMApplicationCache++data DOMDOMWindowApplicationCachePropertyInfo+instance AttrInfo DOMDOMWindowApplicationCachePropertyInfo where+ type AttrAllowedOps DOMDOMWindowApplicationCachePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowApplicationCachePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowApplicationCachePropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowApplicationCachePropertyInfo = DOMDOMApplicationCache+ type AttrLabel DOMDOMWindowApplicationCachePropertyInfo = "DOMDOMWindow::application-cache"+ attrGet _ = getDOMDOMWindowApplicationCache+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "client-information"+ -- Type: TInterface "WebKit" "DOMNavigator"+ -- Flags: [PropertyReadable]++getDOMDOMWindowClientInformation :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMNavigator+getDOMDOMWindowClientInformation obj = liftIO $ getObjectPropertyObject obj "client-information" DOMNavigator++data DOMDOMWindowClientInformationPropertyInfo+instance AttrInfo DOMDOMWindowClientInformationPropertyInfo where+ type AttrAllowedOps DOMDOMWindowClientInformationPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowClientInformationPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowClientInformationPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowClientInformationPropertyInfo = DOMNavigator+ type AttrLabel DOMDOMWindowClientInformationPropertyInfo = "DOMDOMWindow::client-information"+ attrGet _ = getDOMDOMWindowClientInformation+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "closed"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMDOMWindowClosed :: (MonadIO m, DOMDOMWindowK o) => o -> m Bool+getDOMDOMWindowClosed obj = liftIO $ getObjectPropertyBool obj "closed"++data DOMDOMWindowClosedPropertyInfo+instance AttrInfo DOMDOMWindowClosedPropertyInfo where+ type AttrAllowedOps DOMDOMWindowClosedPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowClosedPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowClosedPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowClosedPropertyInfo = Bool+ type AttrLabel DOMDOMWindowClosedPropertyInfo = "DOMDOMWindow::closed"+ attrGet _ = getDOMDOMWindowClosed+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "console"+ -- Type: TInterface "WebKit" "DOMConsole"+ -- Flags: [PropertyReadable]++getDOMDOMWindowConsole :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMConsole+getDOMDOMWindowConsole obj = liftIO $ getObjectPropertyObject obj "console" DOMConsole++data DOMDOMWindowConsolePropertyInfo+instance AttrInfo DOMDOMWindowConsolePropertyInfo where+ type AttrAllowedOps DOMDOMWindowConsolePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowConsolePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowConsolePropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowConsolePropertyInfo = DOMConsole+ type AttrLabel DOMDOMWindowConsolePropertyInfo = "DOMDOMWindow::console"+ attrGet _ = getDOMDOMWindowConsole+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "css"+ -- Type: TInterface "WebKit" "DOMDOMWindowCSS"+ -- Flags: [PropertyReadable]++getDOMDOMWindowCss :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindowCSS+getDOMDOMWindowCss obj = liftIO $ getObjectPropertyObject obj "css" DOMDOMWindowCSS++data DOMDOMWindowCssPropertyInfo+instance AttrInfo DOMDOMWindowCssPropertyInfo where+ type AttrAllowedOps DOMDOMWindowCssPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowCssPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowCssPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowCssPropertyInfo = DOMDOMWindowCSS+ type AttrLabel DOMDOMWindowCssPropertyInfo = "DOMDOMWindow::css"+ attrGet _ = getDOMDOMWindowCss+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "default-status"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMDOMWindowDefaultStatus :: (MonadIO m, DOMDOMWindowK o) => o -> m T.Text+getDOMDOMWindowDefaultStatus obj = liftIO $ getObjectPropertyString obj "default-status"++setDOMDOMWindowDefaultStatus :: (MonadIO m, DOMDOMWindowK o) => o -> T.Text -> m ()+setDOMDOMWindowDefaultStatus obj val = liftIO $ setObjectPropertyString obj "default-status" val++constructDOMDOMWindowDefaultStatus :: T.Text -> IO ([Char], GValue)+constructDOMDOMWindowDefaultStatus val = constructObjectPropertyString "default-status" val++data DOMDOMWindowDefaultStatusPropertyInfo+instance AttrInfo DOMDOMWindowDefaultStatusPropertyInfo where+ type AttrAllowedOps DOMDOMWindowDefaultStatusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowDefaultStatusPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMDOMWindowDefaultStatusPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowDefaultStatusPropertyInfo = T.Text+ type AttrLabel DOMDOMWindowDefaultStatusPropertyInfo = "DOMDOMWindow::default-status"+ attrGet _ = getDOMDOMWindowDefaultStatus+ attrSet _ = setDOMDOMWindowDefaultStatus+ attrConstruct _ = constructDOMDOMWindowDefaultStatus++-- VVV Prop "device-pixel-ratio"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getDOMDOMWindowDevicePixelRatio :: (MonadIO m, DOMDOMWindowK o) => o -> m Double+getDOMDOMWindowDevicePixelRatio obj = liftIO $ getObjectPropertyDouble obj "device-pixel-ratio"++data DOMDOMWindowDevicePixelRatioPropertyInfo+instance AttrInfo DOMDOMWindowDevicePixelRatioPropertyInfo where+ type AttrAllowedOps DOMDOMWindowDevicePixelRatioPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowDevicePixelRatioPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowDevicePixelRatioPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowDevicePixelRatioPropertyInfo = Double+ type AttrLabel DOMDOMWindowDevicePixelRatioPropertyInfo = "DOMDOMWindow::device-pixel-ratio"+ attrGet _ = getDOMDOMWindowDevicePixelRatio+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "document"+ -- Type: TInterface "WebKit" "DOMDocument"+ -- Flags: [PropertyReadable]++getDOMDOMWindowDocument :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDocument+getDOMDOMWindowDocument obj = liftIO $ getObjectPropertyObject obj "document" DOMDocument++data DOMDOMWindowDocumentPropertyInfo+instance AttrInfo DOMDOMWindowDocumentPropertyInfo where+ type AttrAllowedOps DOMDOMWindowDocumentPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowDocumentPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowDocumentPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowDocumentPropertyInfo = DOMDocument+ type AttrLabel DOMDOMWindowDocumentPropertyInfo = "DOMDOMWindow::document"+ attrGet _ = getDOMDOMWindowDocument+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "frame-element"+ -- Type: TInterface "WebKit" "DOMElement"+ -- Flags: [PropertyReadable]++getDOMDOMWindowFrameElement :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMElement+getDOMDOMWindowFrameElement obj = liftIO $ getObjectPropertyObject obj "frame-element" DOMElement++data DOMDOMWindowFrameElementPropertyInfo+instance AttrInfo DOMDOMWindowFrameElementPropertyInfo where+ type AttrAllowedOps DOMDOMWindowFrameElementPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowFrameElementPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowFrameElementPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowFrameElementPropertyInfo = DOMElement+ type AttrLabel DOMDOMWindowFrameElementPropertyInfo = "DOMDOMWindow::frame-element"+ attrGet _ = getDOMDOMWindowFrameElement+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "frames"+ -- Type: TInterface "WebKit" "DOMDOMWindow"+ -- Flags: [PropertyReadable]++getDOMDOMWindowFrames :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow+getDOMDOMWindowFrames obj = liftIO $ getObjectPropertyObject obj "frames" DOMDOMWindow++data DOMDOMWindowFramesPropertyInfo+instance AttrInfo DOMDOMWindowFramesPropertyInfo where+ type AttrAllowedOps DOMDOMWindowFramesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowFramesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowFramesPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowFramesPropertyInfo = DOMDOMWindow+ type AttrLabel DOMDOMWindowFramesPropertyInfo = "DOMDOMWindow::frames"+ attrGet _ = getDOMDOMWindowFrames+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "history"+ -- Type: TInterface "WebKit" "DOMHistory"+ -- Flags: [PropertyReadable]++getDOMDOMWindowHistory :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMHistory+getDOMDOMWindowHistory obj = liftIO $ getObjectPropertyObject obj "history" DOMHistory++data DOMDOMWindowHistoryPropertyInfo+instance AttrInfo DOMDOMWindowHistoryPropertyInfo where+ type AttrAllowedOps DOMDOMWindowHistoryPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowHistoryPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowHistoryPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowHistoryPropertyInfo = DOMHistory+ type AttrLabel DOMDOMWindowHistoryPropertyInfo = "DOMDOMWindow::history"+ attrGet _ = getDOMDOMWindowHistory+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "inner-height"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMWindowInnerHeight :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64+getDOMDOMWindowInnerHeight obj = liftIO $ getObjectPropertyInt64 obj "inner-height"++data DOMDOMWindowInnerHeightPropertyInfo+instance AttrInfo DOMDOMWindowInnerHeightPropertyInfo where+ type AttrAllowedOps DOMDOMWindowInnerHeightPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowInnerHeightPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowInnerHeightPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowInnerHeightPropertyInfo = Int64+ type AttrLabel DOMDOMWindowInnerHeightPropertyInfo = "DOMDOMWindow::inner-height"+ attrGet _ = getDOMDOMWindowInnerHeight+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "inner-width"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMWindowInnerWidth :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64+getDOMDOMWindowInnerWidth obj = liftIO $ getObjectPropertyInt64 obj "inner-width"++data DOMDOMWindowInnerWidthPropertyInfo+instance AttrInfo DOMDOMWindowInnerWidthPropertyInfo where+ type AttrAllowedOps DOMDOMWindowInnerWidthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowInnerWidthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowInnerWidthPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowInnerWidthPropertyInfo = Int64+ type AttrLabel DOMDOMWindowInnerWidthPropertyInfo = "DOMDOMWindow::inner-width"+ attrGet _ = getDOMDOMWindowInnerWidth+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMDOMWindowLength :: (MonadIO m, DOMDOMWindowK o) => o -> m Word64+getDOMDOMWindowLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMDOMWindowLengthPropertyInfo+instance AttrInfo DOMDOMWindowLengthPropertyInfo where+ type AttrAllowedOps DOMDOMWindowLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowLengthPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowLengthPropertyInfo = Word64+ type AttrLabel DOMDOMWindowLengthPropertyInfo = "DOMDOMWindow::length"+ attrGet _ = getDOMDOMWindowLength+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "local-storage"+ -- Type: TInterface "WebKit" "DOMStorage"+ -- Flags: [PropertyReadable]++getDOMDOMWindowLocalStorage :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMStorage+getDOMDOMWindowLocalStorage obj = liftIO $ getObjectPropertyObject obj "local-storage" DOMStorage++data DOMDOMWindowLocalStoragePropertyInfo+instance AttrInfo DOMDOMWindowLocalStoragePropertyInfo where+ type AttrAllowedOps DOMDOMWindowLocalStoragePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowLocalStoragePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowLocalStoragePropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowLocalStoragePropertyInfo = DOMStorage+ type AttrLabel DOMDOMWindowLocalStoragePropertyInfo = "DOMDOMWindow::local-storage"+ attrGet _ = getDOMDOMWindowLocalStorage+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "locationbar"+ -- Type: TInterface "WebKit" "DOMBarProp"+ -- Flags: [PropertyReadable]++getDOMDOMWindowLocationbar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp+getDOMDOMWindowLocationbar obj = liftIO $ getObjectPropertyObject obj "locationbar" DOMBarProp++data DOMDOMWindowLocationbarPropertyInfo+instance AttrInfo DOMDOMWindowLocationbarPropertyInfo where+ type AttrAllowedOps DOMDOMWindowLocationbarPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowLocationbarPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowLocationbarPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowLocationbarPropertyInfo = DOMBarProp+ type AttrLabel DOMDOMWindowLocationbarPropertyInfo = "DOMDOMWindow::locationbar"+ attrGet _ = getDOMDOMWindowLocationbar+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "menubar"+ -- Type: TInterface "WebKit" "DOMBarProp"+ -- Flags: [PropertyReadable]++getDOMDOMWindowMenubar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp+getDOMDOMWindowMenubar obj = liftIO $ getObjectPropertyObject obj "menubar" DOMBarProp++data DOMDOMWindowMenubarPropertyInfo+instance AttrInfo DOMDOMWindowMenubarPropertyInfo where+ type AttrAllowedOps DOMDOMWindowMenubarPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowMenubarPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowMenubarPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowMenubarPropertyInfo = DOMBarProp+ type AttrLabel DOMDOMWindowMenubarPropertyInfo = "DOMDOMWindow::menubar"+ attrGet _ = getDOMDOMWindowMenubar+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMDOMWindowName :: (MonadIO m, DOMDOMWindowK o) => o -> m T.Text+getDOMDOMWindowName obj = liftIO $ getObjectPropertyString obj "name"++setDOMDOMWindowName :: (MonadIO m, DOMDOMWindowK o) => o -> T.Text -> m ()+setDOMDOMWindowName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMDOMWindowName :: T.Text -> IO ([Char], GValue)+constructDOMDOMWindowName val = constructObjectPropertyString "name" val++data DOMDOMWindowNamePropertyInfo+instance AttrInfo DOMDOMWindowNamePropertyInfo where+ type AttrAllowedOps DOMDOMWindowNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMDOMWindowNamePropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowNamePropertyInfo = T.Text+ type AttrLabel DOMDOMWindowNamePropertyInfo = "DOMDOMWindow::name"+ attrGet _ = getDOMDOMWindowName+ attrSet _ = setDOMDOMWindowName+ attrConstruct _ = constructDOMDOMWindowName++-- VVV Prop "navigator"+ -- Type: TInterface "WebKit" "DOMNavigator"+ -- Flags: [PropertyReadable]++getDOMDOMWindowNavigator :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMNavigator+getDOMDOMWindowNavigator obj = liftIO $ getObjectPropertyObject obj "navigator" DOMNavigator++data DOMDOMWindowNavigatorPropertyInfo+instance AttrInfo DOMDOMWindowNavigatorPropertyInfo where+ type AttrAllowedOps DOMDOMWindowNavigatorPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowNavigatorPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowNavigatorPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowNavigatorPropertyInfo = DOMNavigator+ type AttrLabel DOMDOMWindowNavigatorPropertyInfo = "DOMDOMWindow::navigator"+ attrGet _ = getDOMDOMWindowNavigator+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "offscreen-buffering"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMDOMWindowOffscreenBuffering :: (MonadIO m, DOMDOMWindowK o) => o -> m Bool+getDOMDOMWindowOffscreenBuffering obj = liftIO $ getObjectPropertyBool obj "offscreen-buffering"++data DOMDOMWindowOffscreenBufferingPropertyInfo+instance AttrInfo DOMDOMWindowOffscreenBufferingPropertyInfo where+ type AttrAllowedOps DOMDOMWindowOffscreenBufferingPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowOffscreenBufferingPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowOffscreenBufferingPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowOffscreenBufferingPropertyInfo = Bool+ type AttrLabel DOMDOMWindowOffscreenBufferingPropertyInfo = "DOMDOMWindow::offscreen-buffering"+ attrGet _ = getDOMDOMWindowOffscreenBuffering+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "opener"+ -- Type: TInterface "WebKit" "DOMDOMWindow"+ -- Flags: [PropertyReadable]++getDOMDOMWindowOpener :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow+getDOMDOMWindowOpener obj = liftIO $ getObjectPropertyObject obj "opener" DOMDOMWindow++data DOMDOMWindowOpenerPropertyInfo+instance AttrInfo DOMDOMWindowOpenerPropertyInfo where+ type AttrAllowedOps DOMDOMWindowOpenerPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowOpenerPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowOpenerPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowOpenerPropertyInfo = DOMDOMWindow+ type AttrLabel DOMDOMWindowOpenerPropertyInfo = "DOMDOMWindow::opener"+ attrGet _ = getDOMDOMWindowOpener+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "outer-height"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMWindowOuterHeight :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64+getDOMDOMWindowOuterHeight obj = liftIO $ getObjectPropertyInt64 obj "outer-height"++data DOMDOMWindowOuterHeightPropertyInfo+instance AttrInfo DOMDOMWindowOuterHeightPropertyInfo where+ type AttrAllowedOps DOMDOMWindowOuterHeightPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowOuterHeightPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowOuterHeightPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowOuterHeightPropertyInfo = Int64+ type AttrLabel DOMDOMWindowOuterHeightPropertyInfo = "DOMDOMWindow::outer-height"+ attrGet _ = getDOMDOMWindowOuterHeight+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "outer-width"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMWindowOuterWidth :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64+getDOMDOMWindowOuterWidth obj = liftIO $ getObjectPropertyInt64 obj "outer-width"++data DOMDOMWindowOuterWidthPropertyInfo+instance AttrInfo DOMDOMWindowOuterWidthPropertyInfo where+ type AttrAllowedOps DOMDOMWindowOuterWidthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowOuterWidthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowOuterWidthPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowOuterWidthPropertyInfo = Int64+ type AttrLabel DOMDOMWindowOuterWidthPropertyInfo = "DOMDOMWindow::outer-width"+ attrGet _ = getDOMDOMWindowOuterWidth+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "page-x-offset"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMWindowPageXOffset :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64+getDOMDOMWindowPageXOffset obj = liftIO $ getObjectPropertyInt64 obj "page-x-offset"++data DOMDOMWindowPageXOffsetPropertyInfo+instance AttrInfo DOMDOMWindowPageXOffsetPropertyInfo where+ type AttrAllowedOps DOMDOMWindowPageXOffsetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowPageXOffsetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowPageXOffsetPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowPageXOffsetPropertyInfo = Int64+ type AttrLabel DOMDOMWindowPageXOffsetPropertyInfo = "DOMDOMWindow::page-x-offset"+ attrGet _ = getDOMDOMWindowPageXOffset+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "page-y-offset"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMWindowPageYOffset :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64+getDOMDOMWindowPageYOffset obj = liftIO $ getObjectPropertyInt64 obj "page-y-offset"++data DOMDOMWindowPageYOffsetPropertyInfo+instance AttrInfo DOMDOMWindowPageYOffsetPropertyInfo where+ type AttrAllowedOps DOMDOMWindowPageYOffsetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowPageYOffsetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowPageYOffsetPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowPageYOffsetPropertyInfo = Int64+ type AttrLabel DOMDOMWindowPageYOffsetPropertyInfo = "DOMDOMWindow::page-y-offset"+ attrGet _ = getDOMDOMWindowPageYOffset+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "parent"+ -- Type: TInterface "WebKit" "DOMDOMWindow"+ -- Flags: [PropertyReadable]++getDOMDOMWindowParent :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow+getDOMDOMWindowParent obj = liftIO $ getObjectPropertyObject obj "parent" DOMDOMWindow++data DOMDOMWindowParentPropertyInfo+instance AttrInfo DOMDOMWindowParentPropertyInfo where+ type AttrAllowedOps DOMDOMWindowParentPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowParentPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowParentPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowParentPropertyInfo = DOMDOMWindow+ type AttrLabel DOMDOMWindowParentPropertyInfo = "DOMDOMWindow::parent"+ attrGet _ = getDOMDOMWindowParent+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "performance"+ -- Type: TInterface "WebKit" "DOMPerformance"+ -- Flags: [PropertyReadable]++getDOMDOMWindowPerformance :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMPerformance+getDOMDOMWindowPerformance obj = liftIO $ getObjectPropertyObject obj "performance" DOMPerformance++data DOMDOMWindowPerformancePropertyInfo+instance AttrInfo DOMDOMWindowPerformancePropertyInfo where+ type AttrAllowedOps DOMDOMWindowPerformancePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowPerformancePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowPerformancePropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowPerformancePropertyInfo = DOMPerformance+ type AttrLabel DOMDOMWindowPerformancePropertyInfo = "DOMDOMWindow::performance"+ attrGet _ = getDOMDOMWindowPerformance+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "personalbar"+ -- Type: TInterface "WebKit" "DOMBarProp"+ -- Flags: [PropertyReadable]++getDOMDOMWindowPersonalbar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp+getDOMDOMWindowPersonalbar obj = liftIO $ getObjectPropertyObject obj "personalbar" DOMBarProp++data DOMDOMWindowPersonalbarPropertyInfo+instance AttrInfo DOMDOMWindowPersonalbarPropertyInfo where+ type AttrAllowedOps DOMDOMWindowPersonalbarPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowPersonalbarPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowPersonalbarPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowPersonalbarPropertyInfo = DOMBarProp+ type AttrLabel DOMDOMWindowPersonalbarPropertyInfo = "DOMDOMWindow::personalbar"+ attrGet _ = getDOMDOMWindowPersonalbar+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "screen"+ -- Type: TInterface "WebKit" "DOMScreen"+ -- Flags: [PropertyReadable]++getDOMDOMWindowScreen :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMScreen+getDOMDOMWindowScreen obj = liftIO $ getObjectPropertyObject obj "screen" DOMScreen++data DOMDOMWindowScreenPropertyInfo+instance AttrInfo DOMDOMWindowScreenPropertyInfo where+ type AttrAllowedOps DOMDOMWindowScreenPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowScreenPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowScreenPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowScreenPropertyInfo = DOMScreen+ type AttrLabel DOMDOMWindowScreenPropertyInfo = "DOMDOMWindow::screen"+ attrGet _ = getDOMDOMWindowScreen+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "screen-left"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMWindowScreenLeft :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64+getDOMDOMWindowScreenLeft obj = liftIO $ getObjectPropertyInt64 obj "screen-left"++data DOMDOMWindowScreenLeftPropertyInfo+instance AttrInfo DOMDOMWindowScreenLeftPropertyInfo where+ type AttrAllowedOps DOMDOMWindowScreenLeftPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowScreenLeftPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowScreenLeftPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowScreenLeftPropertyInfo = Int64+ type AttrLabel DOMDOMWindowScreenLeftPropertyInfo = "DOMDOMWindow::screen-left"+ attrGet _ = getDOMDOMWindowScreenLeft+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "screen-top"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMWindowScreenTop :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64+getDOMDOMWindowScreenTop obj = liftIO $ getObjectPropertyInt64 obj "screen-top"++data DOMDOMWindowScreenTopPropertyInfo+instance AttrInfo DOMDOMWindowScreenTopPropertyInfo where+ type AttrAllowedOps DOMDOMWindowScreenTopPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowScreenTopPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowScreenTopPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowScreenTopPropertyInfo = Int64+ type AttrLabel DOMDOMWindowScreenTopPropertyInfo = "DOMDOMWindow::screen-top"+ attrGet _ = getDOMDOMWindowScreenTop+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "screen-x"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMWindowScreenX :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64+getDOMDOMWindowScreenX obj = liftIO $ getObjectPropertyInt64 obj "screen-x"++data DOMDOMWindowScreenXPropertyInfo+instance AttrInfo DOMDOMWindowScreenXPropertyInfo where+ type AttrAllowedOps DOMDOMWindowScreenXPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowScreenXPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowScreenXPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowScreenXPropertyInfo = Int64+ type AttrLabel DOMDOMWindowScreenXPropertyInfo = "DOMDOMWindow::screen-x"+ attrGet _ = getDOMDOMWindowScreenX+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "screen-y"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMWindowScreenY :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64+getDOMDOMWindowScreenY obj = liftIO $ getObjectPropertyInt64 obj "screen-y"++data DOMDOMWindowScreenYPropertyInfo+instance AttrInfo DOMDOMWindowScreenYPropertyInfo where+ type AttrAllowedOps DOMDOMWindowScreenYPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowScreenYPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowScreenYPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowScreenYPropertyInfo = Int64+ type AttrLabel DOMDOMWindowScreenYPropertyInfo = "DOMDOMWindow::screen-y"+ attrGet _ = getDOMDOMWindowScreenY+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "scroll-x"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMWindowScrollX :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64+getDOMDOMWindowScrollX obj = liftIO $ getObjectPropertyInt64 obj "scroll-x"++data DOMDOMWindowScrollXPropertyInfo+instance AttrInfo DOMDOMWindowScrollXPropertyInfo where+ type AttrAllowedOps DOMDOMWindowScrollXPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowScrollXPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowScrollXPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowScrollXPropertyInfo = Int64+ type AttrLabel DOMDOMWindowScrollXPropertyInfo = "DOMDOMWindow::scroll-x"+ attrGet _ = getDOMDOMWindowScrollX+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "scroll-y"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMDOMWindowScrollY :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64+getDOMDOMWindowScrollY obj = liftIO $ getObjectPropertyInt64 obj "scroll-y"++data DOMDOMWindowScrollYPropertyInfo+instance AttrInfo DOMDOMWindowScrollYPropertyInfo where+ type AttrAllowedOps DOMDOMWindowScrollYPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowScrollYPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowScrollYPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowScrollYPropertyInfo = Int64+ type AttrLabel DOMDOMWindowScrollYPropertyInfo = "DOMDOMWindow::scroll-y"+ attrGet _ = getDOMDOMWindowScrollY+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "scrollbars"+ -- Type: TInterface "WebKit" "DOMBarProp"+ -- Flags: [PropertyReadable]++getDOMDOMWindowScrollbars :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp+getDOMDOMWindowScrollbars obj = liftIO $ getObjectPropertyObject obj "scrollbars" DOMBarProp++data DOMDOMWindowScrollbarsPropertyInfo+instance AttrInfo DOMDOMWindowScrollbarsPropertyInfo where+ type AttrAllowedOps DOMDOMWindowScrollbarsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowScrollbarsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowScrollbarsPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowScrollbarsPropertyInfo = DOMBarProp+ type AttrLabel DOMDOMWindowScrollbarsPropertyInfo = "DOMDOMWindow::scrollbars"+ attrGet _ = getDOMDOMWindowScrollbars+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "self"+ -- Type: TInterface "WebKit" "DOMDOMWindow"+ -- Flags: [PropertyReadable]++getDOMDOMWindowSelf :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow+getDOMDOMWindowSelf obj = liftIO $ getObjectPropertyObject obj "self" DOMDOMWindow++data DOMDOMWindowSelfPropertyInfo+instance AttrInfo DOMDOMWindowSelfPropertyInfo where+ type AttrAllowedOps DOMDOMWindowSelfPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowSelfPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowSelfPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowSelfPropertyInfo = DOMDOMWindow+ type AttrLabel DOMDOMWindowSelfPropertyInfo = "DOMDOMWindow::self"+ attrGet _ = getDOMDOMWindowSelf+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "session-storage"+ -- Type: TInterface "WebKit" "DOMStorage"+ -- Flags: [PropertyReadable]++getDOMDOMWindowSessionStorage :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMStorage+getDOMDOMWindowSessionStorage obj = liftIO $ getObjectPropertyObject obj "session-storage" DOMStorage++data DOMDOMWindowSessionStoragePropertyInfo+instance AttrInfo DOMDOMWindowSessionStoragePropertyInfo where+ type AttrAllowedOps DOMDOMWindowSessionStoragePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowSessionStoragePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowSessionStoragePropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowSessionStoragePropertyInfo = DOMStorage+ type AttrLabel DOMDOMWindowSessionStoragePropertyInfo = "DOMDOMWindow::session-storage"+ attrGet _ = getDOMDOMWindowSessionStorage+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "status"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMDOMWindowStatus :: (MonadIO m, DOMDOMWindowK o) => o -> m T.Text+getDOMDOMWindowStatus obj = liftIO $ getObjectPropertyString obj "status"++setDOMDOMWindowStatus :: (MonadIO m, DOMDOMWindowK o) => o -> T.Text -> m ()+setDOMDOMWindowStatus obj val = liftIO $ setObjectPropertyString obj "status" val++constructDOMDOMWindowStatus :: T.Text -> IO ([Char], GValue)+constructDOMDOMWindowStatus val = constructObjectPropertyString "status" val++data DOMDOMWindowStatusPropertyInfo+instance AttrInfo DOMDOMWindowStatusPropertyInfo where+ type AttrAllowedOps DOMDOMWindowStatusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowStatusPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMDOMWindowStatusPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowStatusPropertyInfo = T.Text+ type AttrLabel DOMDOMWindowStatusPropertyInfo = "DOMDOMWindow::status"+ attrGet _ = getDOMDOMWindowStatus+ attrSet _ = setDOMDOMWindowStatus+ attrConstruct _ = constructDOMDOMWindowStatus++-- VVV Prop "statusbar"+ -- Type: TInterface "WebKit" "DOMBarProp"+ -- Flags: [PropertyReadable]++getDOMDOMWindowStatusbar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp+getDOMDOMWindowStatusbar obj = liftIO $ getObjectPropertyObject obj "statusbar" DOMBarProp++data DOMDOMWindowStatusbarPropertyInfo+instance AttrInfo DOMDOMWindowStatusbarPropertyInfo where+ type AttrAllowedOps DOMDOMWindowStatusbarPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowStatusbarPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowStatusbarPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowStatusbarPropertyInfo = DOMBarProp+ type AttrLabel DOMDOMWindowStatusbarPropertyInfo = "DOMDOMWindow::statusbar"+ attrGet _ = getDOMDOMWindowStatusbar+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "style-media"+ -- Type: TInterface "WebKit" "DOMStyleMedia"+ -- Flags: [PropertyReadable]++getDOMDOMWindowStyleMedia :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMStyleMedia+getDOMDOMWindowStyleMedia obj = liftIO $ getObjectPropertyObject obj "style-media" DOMStyleMedia++data DOMDOMWindowStyleMediaPropertyInfo+instance AttrInfo DOMDOMWindowStyleMediaPropertyInfo where+ type AttrAllowedOps DOMDOMWindowStyleMediaPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowStyleMediaPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowStyleMediaPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowStyleMediaPropertyInfo = DOMStyleMedia+ type AttrLabel DOMDOMWindowStyleMediaPropertyInfo = "DOMDOMWindow::style-media"+ attrGet _ = getDOMDOMWindowStyleMedia+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "toolbar"+ -- Type: TInterface "WebKit" "DOMBarProp"+ -- Flags: [PropertyReadable]++getDOMDOMWindowToolbar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp+getDOMDOMWindowToolbar obj = liftIO $ getObjectPropertyObject obj "toolbar" DOMBarProp++data DOMDOMWindowToolbarPropertyInfo+instance AttrInfo DOMDOMWindowToolbarPropertyInfo where+ type AttrAllowedOps DOMDOMWindowToolbarPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowToolbarPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowToolbarPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowToolbarPropertyInfo = DOMBarProp+ type AttrLabel DOMDOMWindowToolbarPropertyInfo = "DOMDOMWindow::toolbar"+ attrGet _ = getDOMDOMWindowToolbar+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "top"+ -- Type: TInterface "WebKit" "DOMDOMWindow"+ -- Flags: [PropertyReadable]++getDOMDOMWindowTop :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow+getDOMDOMWindowTop obj = liftIO $ getObjectPropertyObject obj "top" DOMDOMWindow++data DOMDOMWindowTopPropertyInfo+instance AttrInfo DOMDOMWindowTopPropertyInfo where+ type AttrAllowedOps DOMDOMWindowTopPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowTopPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowTopPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowTopPropertyInfo = DOMDOMWindow+ type AttrLabel DOMDOMWindowTopPropertyInfo = "DOMDOMWindow::top"+ attrGet _ = getDOMDOMWindowTop+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-storage-info"+ -- Type: TInterface "WebKit" "DOMStorageInfo"+ -- Flags: [PropertyReadable]++getDOMDOMWindowWebkitStorageInfo :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMStorageInfo+getDOMDOMWindowWebkitStorageInfo obj = liftIO $ getObjectPropertyObject obj "webkit-storage-info" DOMStorageInfo++data DOMDOMWindowWebkitStorageInfoPropertyInfo+instance AttrInfo DOMDOMWindowWebkitStorageInfoPropertyInfo where+ type AttrAllowedOps DOMDOMWindowWebkitStorageInfoPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowWebkitStorageInfoPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowWebkitStorageInfoPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowWebkitStorageInfoPropertyInfo = DOMStorageInfo+ type AttrLabel DOMDOMWindowWebkitStorageInfoPropertyInfo = "DOMDOMWindow::webkit-storage-info"+ attrGet _ = getDOMDOMWindowWebkitStorageInfo+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "window"+ -- Type: TInterface "WebKit" "DOMDOMWindow"+ -- Flags: [PropertyReadable]++getDOMDOMWindowWindow :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow+getDOMDOMWindowWindow obj = liftIO $ getObjectPropertyObject obj "window" DOMDOMWindow++data DOMDOMWindowWindowPropertyInfo+instance AttrInfo DOMDOMWindowWindowPropertyInfo where+ type AttrAllowedOps DOMDOMWindowWindowPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDOMWindowWindowPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDOMWindowWindowPropertyInfo = DOMDOMWindowK+ type AttrGetType DOMDOMWindowWindowPropertyInfo = DOMDOMWindow+ type AttrLabel DOMDOMWindowWindowPropertyInfo = "DOMDOMWindow::window"+ attrGet _ = getDOMDOMWindowWindow+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMDOMWindow = '[ '("application-cache", DOMDOMWindowApplicationCachePropertyInfo), '("client-information", DOMDOMWindowClientInformationPropertyInfo), '("closed", DOMDOMWindowClosedPropertyInfo), '("console", DOMDOMWindowConsolePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("css", DOMDOMWindowCssPropertyInfo), '("default-status", DOMDOMWindowDefaultStatusPropertyInfo), '("device-pixel-ratio", DOMDOMWindowDevicePixelRatioPropertyInfo), '("document", DOMDOMWindowDocumentPropertyInfo), '("frame-element", DOMDOMWindowFrameElementPropertyInfo), '("frames", DOMDOMWindowFramesPropertyInfo), '("history", DOMDOMWindowHistoryPropertyInfo), '("inner-height", DOMDOMWindowInnerHeightPropertyInfo), '("inner-width", DOMDOMWindowInnerWidthPropertyInfo), '("length", DOMDOMWindowLengthPropertyInfo), '("local-storage", DOMDOMWindowLocalStoragePropertyInfo), '("locationbar", DOMDOMWindowLocationbarPropertyInfo), '("menubar", DOMDOMWindowMenubarPropertyInfo), '("name", DOMDOMWindowNamePropertyInfo), '("navigator", DOMDOMWindowNavigatorPropertyInfo), '("offscreen-buffering", DOMDOMWindowOffscreenBufferingPropertyInfo), '("opener", DOMDOMWindowOpenerPropertyInfo), '("outer-height", DOMDOMWindowOuterHeightPropertyInfo), '("outer-width", DOMDOMWindowOuterWidthPropertyInfo), '("page-x-offset", DOMDOMWindowPageXOffsetPropertyInfo), '("page-y-offset", DOMDOMWindowPageYOffsetPropertyInfo), '("parent", DOMDOMWindowParentPropertyInfo), '("performance", DOMDOMWindowPerformancePropertyInfo), '("personalbar", DOMDOMWindowPersonalbarPropertyInfo), '("screen", DOMDOMWindowScreenPropertyInfo), '("screen-left", DOMDOMWindowScreenLeftPropertyInfo), '("screen-top", DOMDOMWindowScreenTopPropertyInfo), '("screen-x", DOMDOMWindowScreenXPropertyInfo), '("screen-y", DOMDOMWindowScreenYPropertyInfo), '("scroll-x", DOMDOMWindowScrollXPropertyInfo), '("scroll-y", DOMDOMWindowScrollYPropertyInfo), '("scrollbars", DOMDOMWindowScrollbarsPropertyInfo), '("self", DOMDOMWindowSelfPropertyInfo), '("session-storage", DOMDOMWindowSessionStoragePropertyInfo), '("status", DOMDOMWindowStatusPropertyInfo), '("statusbar", DOMDOMWindowStatusbarPropertyInfo), '("style-media", DOMDOMWindowStyleMediaPropertyInfo), '("toolbar", DOMDOMWindowToolbarPropertyInfo), '("top", DOMDOMWindowTopPropertyInfo), '("webkit-storage-info", DOMDOMWindowWebkitStorageInfoPropertyInfo), '("window", DOMDOMWindowWindowPropertyInfo)]++type instance AttributeList DOMDOMWindowCSS = '[ '("core-object", DOMObjectCoreObjectPropertyInfo)]++-- VVV Prop "version"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDatabaseVersion :: (MonadIO m, DOMDatabaseK o) => o -> m T.Text+getDOMDatabaseVersion obj = liftIO $ getObjectPropertyString obj "version"++data DOMDatabaseVersionPropertyInfo+instance AttrInfo DOMDatabaseVersionPropertyInfo where+ type AttrAllowedOps DOMDatabaseVersionPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDatabaseVersionPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDatabaseVersionPropertyInfo = DOMDatabaseK+ type AttrGetType DOMDatabaseVersionPropertyInfo = T.Text+ type AttrLabel DOMDatabaseVersionPropertyInfo = "DOMDatabase::version"+ attrGet _ = getDOMDatabaseVersion+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMDatabase = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("version", DOMDatabaseVersionPropertyInfo)]++-- VVV Prop "anchors"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMDocumentAnchors :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection+getDOMDocumentAnchors obj = liftIO $ getObjectPropertyObject obj "anchors" DOMHTMLCollection++data DOMDocumentAnchorsPropertyInfo+instance AttrInfo DOMDocumentAnchorsPropertyInfo where+ type AttrAllowedOps DOMDocumentAnchorsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentAnchorsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentAnchorsPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentAnchorsPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMDocumentAnchorsPropertyInfo = "DOMDocument::anchors"+ attrGet _ = getDOMDocumentAnchors+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "applets"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMDocumentApplets :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection+getDOMDocumentApplets obj = liftIO $ getObjectPropertyObject obj "applets" DOMHTMLCollection++data DOMDocumentAppletsPropertyInfo+instance AttrInfo DOMDocumentAppletsPropertyInfo where+ type AttrAllowedOps DOMDocumentAppletsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentAppletsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentAppletsPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentAppletsPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMDocumentAppletsPropertyInfo = "DOMDocument::applets"+ attrGet _ = getDOMDocumentApplets+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "body"+ -- Type: TInterface "WebKit" "DOMHTMLElement"+ -- Flags: [PropertyReadable]++getDOMDocumentBody :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLElement+getDOMDocumentBody obj = liftIO $ getObjectPropertyObject obj "body" DOMHTMLElement++data DOMDocumentBodyPropertyInfo+instance AttrInfo DOMDocumentBodyPropertyInfo where+ type AttrAllowedOps DOMDocumentBodyPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentBodyPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentBodyPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentBodyPropertyInfo = DOMHTMLElement+ type AttrLabel DOMDocumentBodyPropertyInfo = "DOMDocument::body"+ attrGet _ = getDOMDocumentBody+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "character-set"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDocumentCharacterSet :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentCharacterSet obj = liftIO $ getObjectPropertyString obj "character-set"++data DOMDocumentCharacterSetPropertyInfo+instance AttrInfo DOMDocumentCharacterSetPropertyInfo where+ type AttrAllowedOps DOMDocumentCharacterSetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentCharacterSetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentCharacterSetPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentCharacterSetPropertyInfo = T.Text+ type AttrLabel DOMDocumentCharacterSetPropertyInfo = "DOMDocument::character-set"+ attrGet _ = getDOMDocumentCharacterSet+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "charset"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMDocumentCharset :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentCharset obj = liftIO $ getObjectPropertyString obj "charset"++setDOMDocumentCharset :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m ()+setDOMDocumentCharset obj val = liftIO $ setObjectPropertyString obj "charset" val++constructDOMDocumentCharset :: T.Text -> IO ([Char], GValue)+constructDOMDocumentCharset val = constructObjectPropertyString "charset" val++data DOMDocumentCharsetPropertyInfo+instance AttrInfo DOMDocumentCharsetPropertyInfo where+ type AttrAllowedOps DOMDocumentCharsetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentCharsetPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMDocumentCharsetPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentCharsetPropertyInfo = T.Text+ type AttrLabel DOMDocumentCharsetPropertyInfo = "DOMDocument::charset"+ attrGet _ = getDOMDocumentCharset+ attrSet _ = setDOMDocumentCharset+ attrConstruct _ = constructDOMDocumentCharset++-- VVV Prop "compat-mode"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDocumentCompatMode :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentCompatMode obj = liftIO $ getObjectPropertyString obj "compat-mode"++data DOMDocumentCompatModePropertyInfo+instance AttrInfo DOMDocumentCompatModePropertyInfo where+ type AttrAllowedOps DOMDocumentCompatModePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentCompatModePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentCompatModePropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentCompatModePropertyInfo = T.Text+ type AttrLabel DOMDocumentCompatModePropertyInfo = "DOMDocument::compat-mode"+ attrGet _ = getDOMDocumentCompatMode+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "cookie"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMDocumentCookie :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentCookie obj = liftIO $ getObjectPropertyString obj "cookie"++setDOMDocumentCookie :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m ()+setDOMDocumentCookie obj val = liftIO $ setObjectPropertyString obj "cookie" val++constructDOMDocumentCookie :: T.Text -> IO ([Char], GValue)+constructDOMDocumentCookie val = constructObjectPropertyString "cookie" val++data DOMDocumentCookiePropertyInfo+instance AttrInfo DOMDocumentCookiePropertyInfo where+ type AttrAllowedOps DOMDocumentCookiePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentCookiePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMDocumentCookiePropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentCookiePropertyInfo = T.Text+ type AttrLabel DOMDocumentCookiePropertyInfo = "DOMDocument::cookie"+ attrGet _ = getDOMDocumentCookie+ attrSet _ = setDOMDocumentCookie+ attrConstruct _ = constructDOMDocumentCookie++-- VVV Prop "current-script"+ -- Type: TInterface "WebKit" "DOMHTMLScriptElement"+ -- Flags: [PropertyReadable]++getDOMDocumentCurrentScript :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLScriptElement+getDOMDocumentCurrentScript obj = liftIO $ getObjectPropertyObject obj "current-script" DOMHTMLScriptElement++data DOMDocumentCurrentScriptPropertyInfo+instance AttrInfo DOMDocumentCurrentScriptPropertyInfo where+ type AttrAllowedOps DOMDocumentCurrentScriptPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentCurrentScriptPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentCurrentScriptPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentCurrentScriptPropertyInfo = DOMHTMLScriptElement+ type AttrLabel DOMDocumentCurrentScriptPropertyInfo = "DOMDocument::current-script"+ attrGet _ = getDOMDocumentCurrentScript+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "default-charset"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDocumentDefaultCharset :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentDefaultCharset obj = liftIO $ getObjectPropertyString obj "default-charset"++data DOMDocumentDefaultCharsetPropertyInfo+instance AttrInfo DOMDocumentDefaultCharsetPropertyInfo where+ type AttrAllowedOps DOMDocumentDefaultCharsetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentDefaultCharsetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentDefaultCharsetPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentDefaultCharsetPropertyInfo = T.Text+ type AttrLabel DOMDocumentDefaultCharsetPropertyInfo = "DOMDocument::default-charset"+ attrGet _ = getDOMDocumentDefaultCharset+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "default-view"+ -- Type: TInterface "WebKit" "DOMDOMWindow"+ -- Flags: [PropertyReadable]++getDOMDocumentDefaultView :: (MonadIO m, DOMDocumentK o) => o -> m DOMDOMWindow+getDOMDocumentDefaultView obj = liftIO $ getObjectPropertyObject obj "default-view" DOMDOMWindow++data DOMDocumentDefaultViewPropertyInfo+instance AttrInfo DOMDocumentDefaultViewPropertyInfo where+ type AttrAllowedOps DOMDocumentDefaultViewPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentDefaultViewPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentDefaultViewPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentDefaultViewPropertyInfo = DOMDOMWindow+ type AttrLabel DOMDocumentDefaultViewPropertyInfo = "DOMDocument::default-view"+ attrGet _ = getDOMDocumentDefaultView+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "doctype"+ -- Type: TInterface "WebKit" "DOMDocumentType"+ -- Flags: [PropertyReadable]++getDOMDocumentDoctype :: (MonadIO m, DOMDocumentK o) => o -> m DOMDocumentType+getDOMDocumentDoctype obj = liftIO $ getObjectPropertyObject obj "doctype" DOMDocumentType++data DOMDocumentDoctypePropertyInfo+instance AttrInfo DOMDocumentDoctypePropertyInfo where+ type AttrAllowedOps DOMDocumentDoctypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentDoctypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentDoctypePropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentDoctypePropertyInfo = DOMDocumentType+ type AttrLabel DOMDocumentDoctypePropertyInfo = "DOMDocument::doctype"+ attrGet _ = getDOMDocumentDoctype+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "document-element"+ -- Type: TInterface "WebKit" "DOMElement"+ -- Flags: [PropertyReadable]++getDOMDocumentDocumentElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement+getDOMDocumentDocumentElement obj = liftIO $ getObjectPropertyObject obj "document-element" DOMElement++data DOMDocumentDocumentElementPropertyInfo+instance AttrInfo DOMDocumentDocumentElementPropertyInfo where+ type AttrAllowedOps DOMDocumentDocumentElementPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentDocumentElementPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentDocumentElementPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentDocumentElementPropertyInfo = DOMElement+ type AttrLabel DOMDocumentDocumentElementPropertyInfo = "DOMDocument::document-element"+ attrGet _ = getDOMDocumentDocumentElement+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "document-uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMDocumentDocumentUri :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentDocumentUri obj = liftIO $ getObjectPropertyString obj "document-uri"++setDOMDocumentDocumentUri :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m ()+setDOMDocumentDocumentUri obj val = liftIO $ setObjectPropertyString obj "document-uri" val++constructDOMDocumentDocumentUri :: T.Text -> IO ([Char], GValue)+constructDOMDocumentDocumentUri val = constructObjectPropertyString "document-uri" val++data DOMDocumentDocumentUriPropertyInfo+instance AttrInfo DOMDocumentDocumentUriPropertyInfo where+ type AttrAllowedOps DOMDocumentDocumentUriPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentDocumentUriPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMDocumentDocumentUriPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentDocumentUriPropertyInfo = T.Text+ type AttrLabel DOMDocumentDocumentUriPropertyInfo = "DOMDocument::document-uri"+ attrGet _ = getDOMDocumentDocumentUri+ attrSet _ = setDOMDocumentDocumentUri+ attrConstruct _ = constructDOMDocumentDocumentUri++-- VVV Prop "domain"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDocumentDomain :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentDomain obj = liftIO $ getObjectPropertyString obj "domain"++data DOMDocumentDomainPropertyInfo+instance AttrInfo DOMDocumentDomainPropertyInfo where+ type AttrAllowedOps DOMDocumentDomainPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentDomainPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentDomainPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentDomainPropertyInfo = T.Text+ type AttrLabel DOMDocumentDomainPropertyInfo = "DOMDocument::domain"+ attrGet _ = getDOMDocumentDomain+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "forms"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMDocumentForms :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection+getDOMDocumentForms obj = liftIO $ getObjectPropertyObject obj "forms" DOMHTMLCollection++data DOMDocumentFormsPropertyInfo+instance AttrInfo DOMDocumentFormsPropertyInfo where+ type AttrAllowedOps DOMDocumentFormsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentFormsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentFormsPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentFormsPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMDocumentFormsPropertyInfo = "DOMDocument::forms"+ attrGet _ = getDOMDocumentForms+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "head"+ -- Type: TInterface "WebKit" "DOMHTMLHeadElement"+ -- Flags: [PropertyReadable]++getDOMDocumentHead :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLHeadElement+getDOMDocumentHead obj = liftIO $ getObjectPropertyObject obj "head" DOMHTMLHeadElement++data DOMDocumentHeadPropertyInfo+instance AttrInfo DOMDocumentHeadPropertyInfo where+ type AttrAllowedOps DOMDocumentHeadPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentHeadPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentHeadPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentHeadPropertyInfo = DOMHTMLHeadElement+ type AttrLabel DOMDocumentHeadPropertyInfo = "DOMDocument::head"+ attrGet _ = getDOMDocumentHead+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "hidden"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMDocumentHidden :: (MonadIO m, DOMDocumentK o) => o -> m Bool+getDOMDocumentHidden obj = liftIO $ getObjectPropertyBool obj "hidden"++data DOMDocumentHiddenPropertyInfo+instance AttrInfo DOMDocumentHiddenPropertyInfo where+ type AttrAllowedOps DOMDocumentHiddenPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentHiddenPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentHiddenPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentHiddenPropertyInfo = Bool+ type AttrLabel DOMDocumentHiddenPropertyInfo = "DOMDocument::hidden"+ attrGet _ = getDOMDocumentHidden+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "images"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMDocumentImages :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection+getDOMDocumentImages obj = liftIO $ getObjectPropertyObject obj "images" DOMHTMLCollection++data DOMDocumentImagesPropertyInfo+instance AttrInfo DOMDocumentImagesPropertyInfo where+ type AttrAllowedOps DOMDocumentImagesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentImagesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentImagesPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentImagesPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMDocumentImagesPropertyInfo = "DOMDocument::images"+ attrGet _ = getDOMDocumentImages+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "implementation"+ -- Type: TInterface "WebKit" "DOMDOMImplementation"+ -- Flags: [PropertyReadable]++getDOMDocumentImplementation :: (MonadIO m, DOMDocumentK o) => o -> m DOMDOMImplementation+getDOMDocumentImplementation obj = liftIO $ getObjectPropertyObject obj "implementation" DOMDOMImplementation++data DOMDocumentImplementationPropertyInfo+instance AttrInfo DOMDocumentImplementationPropertyInfo where+ type AttrAllowedOps DOMDocumentImplementationPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentImplementationPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentImplementationPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentImplementationPropertyInfo = DOMDOMImplementation+ type AttrLabel DOMDocumentImplementationPropertyInfo = "DOMDocument::implementation"+ attrGet _ = getDOMDocumentImplementation+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "input-encoding"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDocumentInputEncoding :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentInputEncoding obj = liftIO $ getObjectPropertyString obj "input-encoding"++data DOMDocumentInputEncodingPropertyInfo+instance AttrInfo DOMDocumentInputEncodingPropertyInfo where+ type AttrAllowedOps DOMDocumentInputEncodingPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentInputEncodingPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentInputEncodingPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentInputEncodingPropertyInfo = T.Text+ type AttrLabel DOMDocumentInputEncodingPropertyInfo = "DOMDocument::input-encoding"+ attrGet _ = getDOMDocumentInputEncoding+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "last-modified"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDocumentLastModified :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentLastModified obj = liftIO $ getObjectPropertyString obj "last-modified"++data DOMDocumentLastModifiedPropertyInfo+instance AttrInfo DOMDocumentLastModifiedPropertyInfo where+ type AttrAllowedOps DOMDocumentLastModifiedPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentLastModifiedPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentLastModifiedPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentLastModifiedPropertyInfo = T.Text+ type AttrLabel DOMDocumentLastModifiedPropertyInfo = "DOMDocument::last-modified"+ attrGet _ = getDOMDocumentLastModified+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "links"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMDocumentLinks :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection+getDOMDocumentLinks obj = liftIO $ getObjectPropertyObject obj "links" DOMHTMLCollection++data DOMDocumentLinksPropertyInfo+instance AttrInfo DOMDocumentLinksPropertyInfo where+ type AttrAllowedOps DOMDocumentLinksPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentLinksPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentLinksPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentLinksPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMDocumentLinksPropertyInfo = "DOMDocument::links"+ attrGet _ = getDOMDocumentLinks+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "preferred-stylesheet-set"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDocumentPreferredStylesheetSet :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentPreferredStylesheetSet obj = liftIO $ getObjectPropertyString obj "preferred-stylesheet-set"++data DOMDocumentPreferredStylesheetSetPropertyInfo+instance AttrInfo DOMDocumentPreferredStylesheetSetPropertyInfo where+ type AttrAllowedOps DOMDocumentPreferredStylesheetSetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentPreferredStylesheetSetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentPreferredStylesheetSetPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentPreferredStylesheetSetPropertyInfo = T.Text+ type AttrLabel DOMDocumentPreferredStylesheetSetPropertyInfo = "DOMDocument::preferred-stylesheet-set"+ attrGet _ = getDOMDocumentPreferredStylesheetSet+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "ready-state"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDocumentReadyState :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentReadyState obj = liftIO $ getObjectPropertyString obj "ready-state"++data DOMDocumentReadyStatePropertyInfo+instance AttrInfo DOMDocumentReadyStatePropertyInfo where+ type AttrAllowedOps DOMDocumentReadyStatePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentReadyStatePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentReadyStatePropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentReadyStatePropertyInfo = T.Text+ type AttrLabel DOMDocumentReadyStatePropertyInfo = "DOMDocument::ready-state"+ attrGet _ = getDOMDocumentReadyState+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "referrer"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDocumentReferrer :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentReferrer obj = liftIO $ getObjectPropertyString obj "referrer"++data DOMDocumentReferrerPropertyInfo+instance AttrInfo DOMDocumentReferrerPropertyInfo where+ type AttrAllowedOps DOMDocumentReferrerPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentReferrerPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentReferrerPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentReferrerPropertyInfo = T.Text+ type AttrLabel DOMDocumentReferrerPropertyInfo = "DOMDocument::referrer"+ attrGet _ = getDOMDocumentReferrer+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "security-policy"+ -- Type: TInterface "WebKit" "DOMDOMSecurityPolicy"+ -- Flags: [PropertyReadable]++getDOMDocumentSecurityPolicy :: (MonadIO m, DOMDocumentK o) => o -> m DOMDOMSecurityPolicy+getDOMDocumentSecurityPolicy obj = liftIO $ getObjectPropertyObject obj "security-policy" DOMDOMSecurityPolicy++data DOMDocumentSecurityPolicyPropertyInfo+instance AttrInfo DOMDocumentSecurityPolicyPropertyInfo where+ type AttrAllowedOps DOMDocumentSecurityPolicyPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentSecurityPolicyPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentSecurityPolicyPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentSecurityPolicyPropertyInfo = DOMDOMSecurityPolicy+ type AttrLabel DOMDocumentSecurityPolicyPropertyInfo = "DOMDocument::security-policy"+ attrGet _ = getDOMDocumentSecurityPolicy+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "selected-stylesheet-set"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMDocumentSelectedStylesheetSet :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentSelectedStylesheetSet obj = liftIO $ getObjectPropertyString obj "selected-stylesheet-set"++setDOMDocumentSelectedStylesheetSet :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m ()+setDOMDocumentSelectedStylesheetSet obj val = liftIO $ setObjectPropertyString obj "selected-stylesheet-set" val++constructDOMDocumentSelectedStylesheetSet :: T.Text -> IO ([Char], GValue)+constructDOMDocumentSelectedStylesheetSet val = constructObjectPropertyString "selected-stylesheet-set" val++data DOMDocumentSelectedStylesheetSetPropertyInfo+instance AttrInfo DOMDocumentSelectedStylesheetSetPropertyInfo where+ type AttrAllowedOps DOMDocumentSelectedStylesheetSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentSelectedStylesheetSetPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMDocumentSelectedStylesheetSetPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentSelectedStylesheetSetPropertyInfo = T.Text+ type AttrLabel DOMDocumentSelectedStylesheetSetPropertyInfo = "DOMDocument::selected-stylesheet-set"+ attrGet _ = getDOMDocumentSelectedStylesheetSet+ attrSet _ = setDOMDocumentSelectedStylesheetSet+ attrConstruct _ = constructDOMDocumentSelectedStylesheetSet++-- VVV Prop "style-sheets"+ -- Type: TInterface "WebKit" "DOMStyleSheetList"+ -- Flags: [PropertyReadable]++getDOMDocumentStyleSheets :: (MonadIO m, DOMDocumentK o) => o -> m DOMStyleSheetList+getDOMDocumentStyleSheets obj = liftIO $ getObjectPropertyObject obj "style-sheets" DOMStyleSheetList++data DOMDocumentStyleSheetsPropertyInfo+instance AttrInfo DOMDocumentStyleSheetsPropertyInfo where+ type AttrAllowedOps DOMDocumentStyleSheetsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentStyleSheetsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentStyleSheetsPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentStyleSheetsPropertyInfo = DOMStyleSheetList+ type AttrLabel DOMDocumentStyleSheetsPropertyInfo = "DOMDocument::style-sheets"+ attrGet _ = getDOMDocumentStyleSheets+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "title"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMDocumentTitle :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentTitle obj = liftIO $ getObjectPropertyString obj "title"++setDOMDocumentTitle :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m ()+setDOMDocumentTitle obj val = liftIO $ setObjectPropertyString obj "title" val++constructDOMDocumentTitle :: T.Text -> IO ([Char], GValue)+constructDOMDocumentTitle val = constructObjectPropertyString "title" val++data DOMDocumentTitlePropertyInfo+instance AttrInfo DOMDocumentTitlePropertyInfo where+ type AttrAllowedOps DOMDocumentTitlePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentTitlePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMDocumentTitlePropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentTitlePropertyInfo = T.Text+ type AttrLabel DOMDocumentTitlePropertyInfo = "DOMDocument::title"+ attrGet _ = getDOMDocumentTitle+ attrSet _ = setDOMDocumentTitle+ attrConstruct _ = constructDOMDocumentTitle++-- VVV Prop "url"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDocumentUrl :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentUrl obj = liftIO $ getObjectPropertyString obj "url"++data DOMDocumentUrlPropertyInfo+instance AttrInfo DOMDocumentUrlPropertyInfo where+ type AttrAllowedOps DOMDocumentUrlPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentUrlPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentUrlPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentUrlPropertyInfo = T.Text+ type AttrLabel DOMDocumentUrlPropertyInfo = "DOMDocument::url"+ attrGet _ = getDOMDocumentUrl+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "visibility-state"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDocumentVisibilityState :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentVisibilityState obj = liftIO $ getObjectPropertyString obj "visibility-state"++data DOMDocumentVisibilityStatePropertyInfo+instance AttrInfo DOMDocumentVisibilityStatePropertyInfo where+ type AttrAllowedOps DOMDocumentVisibilityStatePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentVisibilityStatePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentVisibilityStatePropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentVisibilityStatePropertyInfo = T.Text+ type AttrLabel DOMDocumentVisibilityStatePropertyInfo = "DOMDocument::visibility-state"+ attrGet _ = getDOMDocumentVisibilityState+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-current-full-screen-element"+ -- Type: TInterface "WebKit" "DOMElement"+ -- Flags: [PropertyReadable]++getDOMDocumentWebkitCurrentFullScreenElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement+getDOMDocumentWebkitCurrentFullScreenElement obj = liftIO $ getObjectPropertyObject obj "webkit-current-full-screen-element" DOMElement++data DOMDocumentWebkitCurrentFullScreenElementPropertyInfo+instance AttrInfo DOMDocumentWebkitCurrentFullScreenElementPropertyInfo where+ type AttrAllowedOps DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = DOMElement+ type AttrLabel DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = "DOMDocument::webkit-current-full-screen-element"+ attrGet _ = getDOMDocumentWebkitCurrentFullScreenElement+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-full-screen-keyboard-input-allowed"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMDocumentWebkitFullScreenKeyboardInputAllowed :: (MonadIO m, DOMDocumentK o) => o -> m Bool+getDOMDocumentWebkitFullScreenKeyboardInputAllowed obj = liftIO $ getObjectPropertyBool obj "webkit-full-screen-keyboard-input-allowed"++data DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo+instance AttrInfo DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo where+ type AttrAllowedOps DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = Bool+ type AttrLabel DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = "DOMDocument::webkit-full-screen-keyboard-input-allowed"+ attrGet _ = getDOMDocumentWebkitFullScreenKeyboardInputAllowed+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-fullscreen-element"+ -- Type: TInterface "WebKit" "DOMElement"+ -- Flags: [PropertyReadable]++getDOMDocumentWebkitFullscreenElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement+getDOMDocumentWebkitFullscreenElement obj = liftIO $ getObjectPropertyObject obj "webkit-fullscreen-element" DOMElement++data DOMDocumentWebkitFullscreenElementPropertyInfo+instance AttrInfo DOMDocumentWebkitFullscreenElementPropertyInfo where+ type AttrAllowedOps DOMDocumentWebkitFullscreenElementPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentWebkitFullscreenElementPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentWebkitFullscreenElementPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentWebkitFullscreenElementPropertyInfo = DOMElement+ type AttrLabel DOMDocumentWebkitFullscreenElementPropertyInfo = "DOMDocument::webkit-fullscreen-element"+ attrGet _ = getDOMDocumentWebkitFullscreenElement+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-fullscreen-enabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMDocumentWebkitFullscreenEnabled :: (MonadIO m, DOMDocumentK o) => o -> m Bool+getDOMDocumentWebkitFullscreenEnabled obj = liftIO $ getObjectPropertyBool obj "webkit-fullscreen-enabled"++data DOMDocumentWebkitFullscreenEnabledPropertyInfo+instance AttrInfo DOMDocumentWebkitFullscreenEnabledPropertyInfo where+ type AttrAllowedOps DOMDocumentWebkitFullscreenEnabledPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentWebkitFullscreenEnabledPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentWebkitFullscreenEnabledPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentWebkitFullscreenEnabledPropertyInfo = Bool+ type AttrLabel DOMDocumentWebkitFullscreenEnabledPropertyInfo = "DOMDocument::webkit-fullscreen-enabled"+ attrGet _ = getDOMDocumentWebkitFullscreenEnabled+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-is-full-screen"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMDocumentWebkitIsFullScreen :: (MonadIO m, DOMDocumentK o) => o -> m Bool+getDOMDocumentWebkitIsFullScreen obj = liftIO $ getObjectPropertyBool obj "webkit-is-full-screen"++data DOMDocumentWebkitIsFullScreenPropertyInfo+instance AttrInfo DOMDocumentWebkitIsFullScreenPropertyInfo where+ type AttrAllowedOps DOMDocumentWebkitIsFullScreenPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentWebkitIsFullScreenPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentWebkitIsFullScreenPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentWebkitIsFullScreenPropertyInfo = Bool+ type AttrLabel DOMDocumentWebkitIsFullScreenPropertyInfo = "DOMDocument::webkit-is-full-screen"+ attrGet _ = getDOMDocumentWebkitIsFullScreen+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-pointer-lock-element"+ -- Type: TInterface "WebKit" "DOMElement"+ -- Flags: [PropertyReadable]++getDOMDocumentWebkitPointerLockElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement+getDOMDocumentWebkitPointerLockElement obj = liftIO $ getObjectPropertyObject obj "webkit-pointer-lock-element" DOMElement++data DOMDocumentWebkitPointerLockElementPropertyInfo+instance AttrInfo DOMDocumentWebkitPointerLockElementPropertyInfo where+ type AttrAllowedOps DOMDocumentWebkitPointerLockElementPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentWebkitPointerLockElementPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentWebkitPointerLockElementPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentWebkitPointerLockElementPropertyInfo = DOMElement+ type AttrLabel DOMDocumentWebkitPointerLockElementPropertyInfo = "DOMDocument::webkit-pointer-lock-element"+ attrGet _ = getDOMDocumentWebkitPointerLockElement+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "xml-encoding"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDocumentXmlEncoding :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentXmlEncoding obj = liftIO $ getObjectPropertyString obj "xml-encoding"++data DOMDocumentXmlEncodingPropertyInfo+instance AttrInfo DOMDocumentXmlEncodingPropertyInfo where+ type AttrAllowedOps DOMDocumentXmlEncodingPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentXmlEncodingPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentXmlEncodingPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentXmlEncodingPropertyInfo = T.Text+ type AttrLabel DOMDocumentXmlEncodingPropertyInfo = "DOMDocument::xml-encoding"+ attrGet _ = getDOMDocumentXmlEncoding+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "xml-standalone"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMDocumentXmlStandalone :: (MonadIO m, DOMDocumentK o) => o -> m Bool+getDOMDocumentXmlStandalone obj = liftIO $ getObjectPropertyBool obj "xml-standalone"++setDOMDocumentXmlStandalone :: (MonadIO m, DOMDocumentK o) => o -> Bool -> m ()+setDOMDocumentXmlStandalone obj val = liftIO $ setObjectPropertyBool obj "xml-standalone" val++constructDOMDocumentXmlStandalone :: Bool -> IO ([Char], GValue)+constructDOMDocumentXmlStandalone val = constructObjectPropertyBool "xml-standalone" val++data DOMDocumentXmlStandalonePropertyInfo+instance AttrInfo DOMDocumentXmlStandalonePropertyInfo where+ type AttrAllowedOps DOMDocumentXmlStandalonePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentXmlStandalonePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMDocumentXmlStandalonePropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentXmlStandalonePropertyInfo = Bool+ type AttrLabel DOMDocumentXmlStandalonePropertyInfo = "DOMDocument::xml-standalone"+ attrGet _ = getDOMDocumentXmlStandalone+ attrSet _ = setDOMDocumentXmlStandalone+ attrConstruct _ = constructDOMDocumentXmlStandalone++-- VVV Prop "xml-version"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMDocumentXmlVersion :: (MonadIO m, DOMDocumentK o) => o -> m T.Text+getDOMDocumentXmlVersion obj = liftIO $ getObjectPropertyString obj "xml-version"++setDOMDocumentXmlVersion :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m ()+setDOMDocumentXmlVersion obj val = liftIO $ setObjectPropertyString obj "xml-version" val++constructDOMDocumentXmlVersion :: T.Text -> IO ([Char], GValue)+constructDOMDocumentXmlVersion val = constructObjectPropertyString "xml-version" val++data DOMDocumentXmlVersionPropertyInfo+instance AttrInfo DOMDocumentXmlVersionPropertyInfo where+ type AttrAllowedOps DOMDocumentXmlVersionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentXmlVersionPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMDocumentXmlVersionPropertyInfo = DOMDocumentK+ type AttrGetType DOMDocumentXmlVersionPropertyInfo = T.Text+ type AttrLabel DOMDocumentXmlVersionPropertyInfo = "DOMDocument::xml-version"+ attrGet _ = getDOMDocumentXmlVersion+ attrSet _ = setDOMDocumentXmlVersion+ attrConstruct _ = constructDOMDocumentXmlVersion++type instance AttributeList DOMDocument = '[ '("anchors", DOMDocumentAnchorsPropertyInfo), '("applets", DOMDocumentAppletsPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("body", DOMDocumentBodyPropertyInfo), '("character-set", DOMDocumentCharacterSetPropertyInfo), '("charset", DOMDocumentCharsetPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("compat-mode", DOMDocumentCompatModePropertyInfo), '("cookie", DOMDocumentCookiePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-script", DOMDocumentCurrentScriptPropertyInfo), '("default-charset", DOMDocumentDefaultCharsetPropertyInfo), '("default-view", DOMDocumentDefaultViewPropertyInfo), '("doctype", DOMDocumentDoctypePropertyInfo), '("document-element", DOMDocumentDocumentElementPropertyInfo), '("document-uri", DOMDocumentDocumentUriPropertyInfo), '("domain", DOMDocumentDomainPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("forms", DOMDocumentFormsPropertyInfo), '("head", DOMDocumentHeadPropertyInfo), '("hidden", DOMDocumentHiddenPropertyInfo), '("images", DOMDocumentImagesPropertyInfo), '("implementation", DOMDocumentImplementationPropertyInfo), '("input-encoding", DOMDocumentInputEncodingPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-modified", DOMDocumentLastModifiedPropertyInfo), '("links", DOMDocumentLinksPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("preferred-stylesheet-set", DOMDocumentPreferredStylesheetSetPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("ready-state", DOMDocumentReadyStatePropertyInfo), '("referrer", DOMDocumentReferrerPropertyInfo), '("security-policy", DOMDocumentSecurityPolicyPropertyInfo), '("selected-stylesheet-set", DOMDocumentSelectedStylesheetSetPropertyInfo), '("style-sheets", DOMDocumentStyleSheetsPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMDocumentTitlePropertyInfo), '("url", DOMDocumentUrlPropertyInfo), '("visibility-state", DOMDocumentVisibilityStatePropertyInfo), '("webkit-current-full-screen-element", DOMDocumentWebkitCurrentFullScreenElementPropertyInfo), '("webkit-full-screen-keyboard-input-allowed", DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo), '("webkit-fullscreen-element", DOMDocumentWebkitFullscreenElementPropertyInfo), '("webkit-fullscreen-enabled", DOMDocumentWebkitFullscreenEnabledPropertyInfo), '("webkit-is-full-screen", DOMDocumentWebkitIsFullScreenPropertyInfo), '("webkit-pointer-lock-element", DOMDocumentWebkitPointerLockElementPropertyInfo), '("xml-encoding", DOMDocumentXmlEncodingPropertyInfo), '("xml-standalone", DOMDocumentXmlStandalonePropertyInfo), '("xml-version", DOMDocumentXmlVersionPropertyInfo)]++type instance AttributeList DOMDocumentFragment = '[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo)]++-- VVV Prop "entities"+ -- Type: TInterface "WebKit" "DOMNamedNodeMap"+ -- Flags: [PropertyReadable]++getDOMDocumentTypeEntities :: (MonadIO m, DOMDocumentTypeK o) => o -> m DOMNamedNodeMap+getDOMDocumentTypeEntities obj = liftIO $ getObjectPropertyObject obj "entities" DOMNamedNodeMap++data DOMDocumentTypeEntitiesPropertyInfo+instance AttrInfo DOMDocumentTypeEntitiesPropertyInfo where+ type AttrAllowedOps DOMDocumentTypeEntitiesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentTypeEntitiesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentTypeEntitiesPropertyInfo = DOMDocumentTypeK+ type AttrGetType DOMDocumentTypeEntitiesPropertyInfo = DOMNamedNodeMap+ type AttrLabel DOMDocumentTypeEntitiesPropertyInfo = "DOMDocumentType::entities"+ attrGet _ = getDOMDocumentTypeEntities+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "internal-subset"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDocumentTypeInternalSubset :: (MonadIO m, DOMDocumentTypeK o) => o -> m T.Text+getDOMDocumentTypeInternalSubset obj = liftIO $ getObjectPropertyString obj "internal-subset"++data DOMDocumentTypeInternalSubsetPropertyInfo+instance AttrInfo DOMDocumentTypeInternalSubsetPropertyInfo where+ type AttrAllowedOps DOMDocumentTypeInternalSubsetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentTypeInternalSubsetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentTypeInternalSubsetPropertyInfo = DOMDocumentTypeK+ type AttrGetType DOMDocumentTypeInternalSubsetPropertyInfo = T.Text+ type AttrLabel DOMDocumentTypeInternalSubsetPropertyInfo = "DOMDocumentType::internal-subset"+ attrGet _ = getDOMDocumentTypeInternalSubset+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDocumentTypeName :: (MonadIO m, DOMDocumentTypeK o) => o -> m T.Text+getDOMDocumentTypeName obj = liftIO $ getObjectPropertyString obj "name"++data DOMDocumentTypeNamePropertyInfo+instance AttrInfo DOMDocumentTypeNamePropertyInfo where+ type AttrAllowedOps DOMDocumentTypeNamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentTypeNamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentTypeNamePropertyInfo = DOMDocumentTypeK+ type AttrGetType DOMDocumentTypeNamePropertyInfo = T.Text+ type AttrLabel DOMDocumentTypeNamePropertyInfo = "DOMDocumentType::name"+ attrGet _ = getDOMDocumentTypeName+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "notations"+ -- Type: TInterface "WebKit" "DOMNamedNodeMap"+ -- Flags: [PropertyReadable]++getDOMDocumentTypeNotations :: (MonadIO m, DOMDocumentTypeK o) => o -> m DOMNamedNodeMap+getDOMDocumentTypeNotations obj = liftIO $ getObjectPropertyObject obj "notations" DOMNamedNodeMap++data DOMDocumentTypeNotationsPropertyInfo+instance AttrInfo DOMDocumentTypeNotationsPropertyInfo where+ type AttrAllowedOps DOMDocumentTypeNotationsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentTypeNotationsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentTypeNotationsPropertyInfo = DOMDocumentTypeK+ type AttrGetType DOMDocumentTypeNotationsPropertyInfo = DOMNamedNodeMap+ type AttrLabel DOMDocumentTypeNotationsPropertyInfo = "DOMDocumentType::notations"+ attrGet _ = getDOMDocumentTypeNotations+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "public-id"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDocumentTypePublicId :: (MonadIO m, DOMDocumentTypeK o) => o -> m T.Text+getDOMDocumentTypePublicId obj = liftIO $ getObjectPropertyString obj "public-id"++data DOMDocumentTypePublicIdPropertyInfo+instance AttrInfo DOMDocumentTypePublicIdPropertyInfo where+ type AttrAllowedOps DOMDocumentTypePublicIdPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentTypePublicIdPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentTypePublicIdPropertyInfo = DOMDocumentTypeK+ type AttrGetType DOMDocumentTypePublicIdPropertyInfo = T.Text+ type AttrLabel DOMDocumentTypePublicIdPropertyInfo = "DOMDocumentType::public-id"+ attrGet _ = getDOMDocumentTypePublicId+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "system-id"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMDocumentTypeSystemId :: (MonadIO m, DOMDocumentTypeK o) => o -> m T.Text+getDOMDocumentTypeSystemId obj = liftIO $ getObjectPropertyString obj "system-id"++data DOMDocumentTypeSystemIdPropertyInfo+instance AttrInfo DOMDocumentTypeSystemIdPropertyInfo where+ type AttrAllowedOps DOMDocumentTypeSystemIdPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMDocumentTypeSystemIdPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMDocumentTypeSystemIdPropertyInfo = DOMDocumentTypeK+ type AttrGetType DOMDocumentTypeSystemIdPropertyInfo = T.Text+ type AttrLabel DOMDocumentTypeSystemIdPropertyInfo = "DOMDocumentType::system-id"+ attrGet _ = getDOMDocumentTypeSystemId+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMDocumentType = '[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("entities", DOMDocumentTypeEntitiesPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("internal-subset", DOMDocumentTypeInternalSubsetPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMDocumentTypeNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("notations", DOMDocumentTypeNotationsPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("public-id", DOMDocumentTypePublicIdPropertyInfo), '("system-id", DOMDocumentTypeSystemIdPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo)]++-- VVV Prop "attributes"+ -- Type: TInterface "WebKit" "DOMNamedNodeMap"+ -- Flags: [PropertyReadable]++getDOMElementAttributes :: (MonadIO m, DOMElementK o) => o -> m DOMNamedNodeMap+getDOMElementAttributes obj = liftIO $ getObjectPropertyObject obj "attributes" DOMNamedNodeMap++data DOMElementAttributesPropertyInfo+instance AttrInfo DOMElementAttributesPropertyInfo where+ type AttrAllowedOps DOMElementAttributesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementAttributesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementAttributesPropertyInfo = DOMElementK+ type AttrGetType DOMElementAttributesPropertyInfo = DOMNamedNodeMap+ type AttrLabel DOMElementAttributesPropertyInfo = "DOMElement::attributes"+ attrGet _ = getDOMElementAttributes+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "child-element-count"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMElementChildElementCount :: (MonadIO m, DOMElementK o) => o -> m Word64+getDOMElementChildElementCount obj = liftIO $ getObjectPropertyUInt64 obj "child-element-count"++data DOMElementChildElementCountPropertyInfo+instance AttrInfo DOMElementChildElementCountPropertyInfo where+ type AttrAllowedOps DOMElementChildElementCountPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementChildElementCountPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementChildElementCountPropertyInfo = DOMElementK+ type AttrGetType DOMElementChildElementCountPropertyInfo = Word64+ type AttrLabel DOMElementChildElementCountPropertyInfo = "DOMElement::child-element-count"+ attrGet _ = getDOMElementChildElementCount+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "class-list"+ -- Type: TInterface "WebKit" "DOMDOMTokenList"+ -- Flags: [PropertyReadable]++getDOMElementClassList :: (MonadIO m, DOMElementK o) => o -> m DOMDOMTokenList+getDOMElementClassList obj = liftIO $ getObjectPropertyObject obj "class-list" DOMDOMTokenList++data DOMElementClassListPropertyInfo+instance AttrInfo DOMElementClassListPropertyInfo where+ type AttrAllowedOps DOMElementClassListPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementClassListPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementClassListPropertyInfo = DOMElementK+ type AttrGetType DOMElementClassListPropertyInfo = DOMDOMTokenList+ type AttrLabel DOMElementClassListPropertyInfo = "DOMElement::class-list"+ attrGet _ = getDOMElementClassList+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "class-name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMElementClassName :: (MonadIO m, DOMElementK o) => o -> m T.Text+getDOMElementClassName obj = liftIO $ getObjectPropertyString obj "class-name"++setDOMElementClassName :: (MonadIO m, DOMElementK o) => o -> T.Text -> m ()+setDOMElementClassName obj val = liftIO $ setObjectPropertyString obj "class-name" val++constructDOMElementClassName :: T.Text -> IO ([Char], GValue)+constructDOMElementClassName val = constructObjectPropertyString "class-name" val++data DOMElementClassNamePropertyInfo+instance AttrInfo DOMElementClassNamePropertyInfo where+ type AttrAllowedOps DOMElementClassNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMElementClassNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMElementClassNamePropertyInfo = DOMElementK+ type AttrGetType DOMElementClassNamePropertyInfo = T.Text+ type AttrLabel DOMElementClassNamePropertyInfo = "DOMElement::class-name"+ attrGet _ = getDOMElementClassName+ attrSet _ = setDOMElementClassName+ attrConstruct _ = constructDOMElementClassName++-- VVV Prop "client-height"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMElementClientHeight :: (MonadIO m, DOMElementK o) => o -> m Int64+getDOMElementClientHeight obj = liftIO $ getObjectPropertyInt64 obj "client-height"++data DOMElementClientHeightPropertyInfo+instance AttrInfo DOMElementClientHeightPropertyInfo where+ type AttrAllowedOps DOMElementClientHeightPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementClientHeightPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementClientHeightPropertyInfo = DOMElementK+ type AttrGetType DOMElementClientHeightPropertyInfo = Int64+ type AttrLabel DOMElementClientHeightPropertyInfo = "DOMElement::client-height"+ attrGet _ = getDOMElementClientHeight+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "client-left"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMElementClientLeft :: (MonadIO m, DOMElementK o) => o -> m Int64+getDOMElementClientLeft obj = liftIO $ getObjectPropertyInt64 obj "client-left"++data DOMElementClientLeftPropertyInfo+instance AttrInfo DOMElementClientLeftPropertyInfo where+ type AttrAllowedOps DOMElementClientLeftPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementClientLeftPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementClientLeftPropertyInfo = DOMElementK+ type AttrGetType DOMElementClientLeftPropertyInfo = Int64+ type AttrLabel DOMElementClientLeftPropertyInfo = "DOMElement::client-left"+ attrGet _ = getDOMElementClientLeft+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "client-top"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMElementClientTop :: (MonadIO m, DOMElementK o) => o -> m Int64+getDOMElementClientTop obj = liftIO $ getObjectPropertyInt64 obj "client-top"++data DOMElementClientTopPropertyInfo+instance AttrInfo DOMElementClientTopPropertyInfo where+ type AttrAllowedOps DOMElementClientTopPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementClientTopPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementClientTopPropertyInfo = DOMElementK+ type AttrGetType DOMElementClientTopPropertyInfo = Int64+ type AttrLabel DOMElementClientTopPropertyInfo = "DOMElement::client-top"+ attrGet _ = getDOMElementClientTop+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "client-width"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMElementClientWidth :: (MonadIO m, DOMElementK o) => o -> m Int64+getDOMElementClientWidth obj = liftIO $ getObjectPropertyInt64 obj "client-width"++data DOMElementClientWidthPropertyInfo+instance AttrInfo DOMElementClientWidthPropertyInfo where+ type AttrAllowedOps DOMElementClientWidthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementClientWidthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementClientWidthPropertyInfo = DOMElementK+ type AttrGetType DOMElementClientWidthPropertyInfo = Int64+ type AttrLabel DOMElementClientWidthPropertyInfo = "DOMElement::client-width"+ attrGet _ = getDOMElementClientWidth+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "first-element-child"+ -- Type: TInterface "WebKit" "DOMElement"+ -- Flags: [PropertyReadable]++getDOMElementFirstElementChild :: (MonadIO m, DOMElementK o) => o -> m DOMElement+getDOMElementFirstElementChild obj = liftIO $ getObjectPropertyObject obj "first-element-child" DOMElement++data DOMElementFirstElementChildPropertyInfo+instance AttrInfo DOMElementFirstElementChildPropertyInfo where+ type AttrAllowedOps DOMElementFirstElementChildPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementFirstElementChildPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementFirstElementChildPropertyInfo = DOMElementK+ type AttrGetType DOMElementFirstElementChildPropertyInfo = DOMElement+ type AttrLabel DOMElementFirstElementChildPropertyInfo = "DOMElement::first-element-child"+ attrGet _ = getDOMElementFirstElementChild+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "id"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMElementId :: (MonadIO m, DOMElementK o) => o -> m T.Text+getDOMElementId obj = liftIO $ getObjectPropertyString obj "id"++setDOMElementId :: (MonadIO m, DOMElementK o) => o -> T.Text -> m ()+setDOMElementId obj val = liftIO $ setObjectPropertyString obj "id" val++constructDOMElementId :: T.Text -> IO ([Char], GValue)+constructDOMElementId val = constructObjectPropertyString "id" val++data DOMElementIdPropertyInfo+instance AttrInfo DOMElementIdPropertyInfo where+ type AttrAllowedOps DOMElementIdPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMElementIdPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMElementIdPropertyInfo = DOMElementK+ type AttrGetType DOMElementIdPropertyInfo = T.Text+ type AttrLabel DOMElementIdPropertyInfo = "DOMElement::id"+ attrGet _ = getDOMElementId+ attrSet _ = setDOMElementId+ attrConstruct _ = constructDOMElementId++-- VVV Prop "last-element-child"+ -- Type: TInterface "WebKit" "DOMElement"+ -- Flags: [PropertyReadable]++getDOMElementLastElementChild :: (MonadIO m, DOMElementK o) => o -> m DOMElement+getDOMElementLastElementChild obj = liftIO $ getObjectPropertyObject obj "last-element-child" DOMElement++data DOMElementLastElementChildPropertyInfo+instance AttrInfo DOMElementLastElementChildPropertyInfo where+ type AttrAllowedOps DOMElementLastElementChildPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementLastElementChildPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementLastElementChildPropertyInfo = DOMElementK+ type AttrGetType DOMElementLastElementChildPropertyInfo = DOMElement+ type AttrLabel DOMElementLastElementChildPropertyInfo = "DOMElement::last-element-child"+ attrGet _ = getDOMElementLastElementChild+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "next-element-sibling"+ -- Type: TInterface "WebKit" "DOMElement"+ -- Flags: [PropertyReadable]++getDOMElementNextElementSibling :: (MonadIO m, DOMElementK o) => o -> m DOMElement+getDOMElementNextElementSibling obj = liftIO $ getObjectPropertyObject obj "next-element-sibling" DOMElement++data DOMElementNextElementSiblingPropertyInfo+instance AttrInfo DOMElementNextElementSiblingPropertyInfo where+ type AttrAllowedOps DOMElementNextElementSiblingPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementNextElementSiblingPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementNextElementSiblingPropertyInfo = DOMElementK+ type AttrGetType DOMElementNextElementSiblingPropertyInfo = DOMElement+ type AttrLabel DOMElementNextElementSiblingPropertyInfo = "DOMElement::next-element-sibling"+ attrGet _ = getDOMElementNextElementSibling+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "offset-height"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMElementOffsetHeight :: (MonadIO m, DOMElementK o) => o -> m Int64+getDOMElementOffsetHeight obj = liftIO $ getObjectPropertyInt64 obj "offset-height"++data DOMElementOffsetHeightPropertyInfo+instance AttrInfo DOMElementOffsetHeightPropertyInfo where+ type AttrAllowedOps DOMElementOffsetHeightPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementOffsetHeightPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementOffsetHeightPropertyInfo = DOMElementK+ type AttrGetType DOMElementOffsetHeightPropertyInfo = Int64+ type AttrLabel DOMElementOffsetHeightPropertyInfo = "DOMElement::offset-height"+ attrGet _ = getDOMElementOffsetHeight+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "offset-left"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMElementOffsetLeft :: (MonadIO m, DOMElementK o) => o -> m Int64+getDOMElementOffsetLeft obj = liftIO $ getObjectPropertyInt64 obj "offset-left"++data DOMElementOffsetLeftPropertyInfo+instance AttrInfo DOMElementOffsetLeftPropertyInfo where+ type AttrAllowedOps DOMElementOffsetLeftPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementOffsetLeftPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementOffsetLeftPropertyInfo = DOMElementK+ type AttrGetType DOMElementOffsetLeftPropertyInfo = Int64+ type AttrLabel DOMElementOffsetLeftPropertyInfo = "DOMElement::offset-left"+ attrGet _ = getDOMElementOffsetLeft+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "offset-parent"+ -- Type: TInterface "WebKit" "DOMElement"+ -- Flags: [PropertyReadable]++getDOMElementOffsetParent :: (MonadIO m, DOMElementK o) => o -> m DOMElement+getDOMElementOffsetParent obj = liftIO $ getObjectPropertyObject obj "offset-parent" DOMElement++data DOMElementOffsetParentPropertyInfo+instance AttrInfo DOMElementOffsetParentPropertyInfo where+ type AttrAllowedOps DOMElementOffsetParentPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementOffsetParentPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementOffsetParentPropertyInfo = DOMElementK+ type AttrGetType DOMElementOffsetParentPropertyInfo = DOMElement+ type AttrLabel DOMElementOffsetParentPropertyInfo = "DOMElement::offset-parent"+ attrGet _ = getDOMElementOffsetParent+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "offset-top"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMElementOffsetTop :: (MonadIO m, DOMElementK o) => o -> m Int64+getDOMElementOffsetTop obj = liftIO $ getObjectPropertyInt64 obj "offset-top"++data DOMElementOffsetTopPropertyInfo+instance AttrInfo DOMElementOffsetTopPropertyInfo where+ type AttrAllowedOps DOMElementOffsetTopPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementOffsetTopPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementOffsetTopPropertyInfo = DOMElementK+ type AttrGetType DOMElementOffsetTopPropertyInfo = Int64+ type AttrLabel DOMElementOffsetTopPropertyInfo = "DOMElement::offset-top"+ attrGet _ = getDOMElementOffsetTop+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "offset-width"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMElementOffsetWidth :: (MonadIO m, DOMElementK o) => o -> m Int64+getDOMElementOffsetWidth obj = liftIO $ getObjectPropertyInt64 obj "offset-width"++data DOMElementOffsetWidthPropertyInfo+instance AttrInfo DOMElementOffsetWidthPropertyInfo where+ type AttrAllowedOps DOMElementOffsetWidthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementOffsetWidthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementOffsetWidthPropertyInfo = DOMElementK+ type AttrGetType DOMElementOffsetWidthPropertyInfo = Int64+ type AttrLabel DOMElementOffsetWidthPropertyInfo = "DOMElement::offset-width"+ attrGet _ = getDOMElementOffsetWidth+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "previous-element-sibling"+ -- Type: TInterface "WebKit" "DOMElement"+ -- Flags: [PropertyReadable]++getDOMElementPreviousElementSibling :: (MonadIO m, DOMElementK o) => o -> m DOMElement+getDOMElementPreviousElementSibling obj = liftIO $ getObjectPropertyObject obj "previous-element-sibling" DOMElement++data DOMElementPreviousElementSiblingPropertyInfo+instance AttrInfo DOMElementPreviousElementSiblingPropertyInfo where+ type AttrAllowedOps DOMElementPreviousElementSiblingPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementPreviousElementSiblingPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementPreviousElementSiblingPropertyInfo = DOMElementK+ type AttrGetType DOMElementPreviousElementSiblingPropertyInfo = DOMElement+ type AttrLabel DOMElementPreviousElementSiblingPropertyInfo = "DOMElement::previous-element-sibling"+ attrGet _ = getDOMElementPreviousElementSibling+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "scroll-height"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMElementScrollHeight :: (MonadIO m, DOMElementK o) => o -> m Int64+getDOMElementScrollHeight obj = liftIO $ getObjectPropertyInt64 obj "scroll-height"++data DOMElementScrollHeightPropertyInfo+instance AttrInfo DOMElementScrollHeightPropertyInfo where+ type AttrAllowedOps DOMElementScrollHeightPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementScrollHeightPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementScrollHeightPropertyInfo = DOMElementK+ type AttrGetType DOMElementScrollHeightPropertyInfo = Int64+ type AttrLabel DOMElementScrollHeightPropertyInfo = "DOMElement::scroll-height"+ attrGet _ = getDOMElementScrollHeight+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "scroll-left"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMElementScrollLeft :: (MonadIO m, DOMElementK o) => o -> m Int64+getDOMElementScrollLeft obj = liftIO $ getObjectPropertyInt64 obj "scroll-left"++setDOMElementScrollLeft :: (MonadIO m, DOMElementK o) => o -> Int64 -> m ()+setDOMElementScrollLeft obj val = liftIO $ setObjectPropertyInt64 obj "scroll-left" val++constructDOMElementScrollLeft :: Int64 -> IO ([Char], GValue)+constructDOMElementScrollLeft val = constructObjectPropertyInt64 "scroll-left" val++data DOMElementScrollLeftPropertyInfo+instance AttrInfo DOMElementScrollLeftPropertyInfo where+ type AttrAllowedOps DOMElementScrollLeftPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMElementScrollLeftPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMElementScrollLeftPropertyInfo = DOMElementK+ type AttrGetType DOMElementScrollLeftPropertyInfo = Int64+ type AttrLabel DOMElementScrollLeftPropertyInfo = "DOMElement::scroll-left"+ attrGet _ = getDOMElementScrollLeft+ attrSet _ = setDOMElementScrollLeft+ attrConstruct _ = constructDOMElementScrollLeft++-- VVV Prop "scroll-top"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMElementScrollTop :: (MonadIO m, DOMElementK o) => o -> m Int64+getDOMElementScrollTop obj = liftIO $ getObjectPropertyInt64 obj "scroll-top"++setDOMElementScrollTop :: (MonadIO m, DOMElementK o) => o -> Int64 -> m ()+setDOMElementScrollTop obj val = liftIO $ setObjectPropertyInt64 obj "scroll-top" val++constructDOMElementScrollTop :: Int64 -> IO ([Char], GValue)+constructDOMElementScrollTop val = constructObjectPropertyInt64 "scroll-top" val++data DOMElementScrollTopPropertyInfo+instance AttrInfo DOMElementScrollTopPropertyInfo where+ type AttrAllowedOps DOMElementScrollTopPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMElementScrollTopPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMElementScrollTopPropertyInfo = DOMElementK+ type AttrGetType DOMElementScrollTopPropertyInfo = Int64+ type AttrLabel DOMElementScrollTopPropertyInfo = "DOMElement::scroll-top"+ attrGet _ = getDOMElementScrollTop+ attrSet _ = setDOMElementScrollTop+ attrConstruct _ = constructDOMElementScrollTop++-- VVV Prop "scroll-width"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMElementScrollWidth :: (MonadIO m, DOMElementK o) => o -> m Int64+getDOMElementScrollWidth obj = liftIO $ getObjectPropertyInt64 obj "scroll-width"++data DOMElementScrollWidthPropertyInfo+instance AttrInfo DOMElementScrollWidthPropertyInfo where+ type AttrAllowedOps DOMElementScrollWidthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementScrollWidthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementScrollWidthPropertyInfo = DOMElementK+ type AttrGetType DOMElementScrollWidthPropertyInfo = Int64+ type AttrLabel DOMElementScrollWidthPropertyInfo = "DOMElement::scroll-width"+ attrGet _ = getDOMElementScrollWidth+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "style"+ -- Type: TInterface "WebKit" "DOMCSSStyleDeclaration"+ -- Flags: [PropertyReadable]++getDOMElementStyle :: (MonadIO m, DOMElementK o) => o -> m DOMCSSStyleDeclaration+getDOMElementStyle obj = liftIO $ getObjectPropertyObject obj "style" DOMCSSStyleDeclaration++data DOMElementStylePropertyInfo+instance AttrInfo DOMElementStylePropertyInfo where+ type AttrAllowedOps DOMElementStylePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementStylePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementStylePropertyInfo = DOMElementK+ type AttrGetType DOMElementStylePropertyInfo = DOMCSSStyleDeclaration+ type AttrLabel DOMElementStylePropertyInfo = "DOMElement::style"+ attrGet _ = getDOMElementStyle+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "tag-name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMElementTagName :: (MonadIO m, DOMElementK o) => o -> m T.Text+getDOMElementTagName obj = liftIO $ getObjectPropertyString obj "tag-name"++data DOMElementTagNamePropertyInfo+instance AttrInfo DOMElementTagNamePropertyInfo where+ type AttrAllowedOps DOMElementTagNamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementTagNamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementTagNamePropertyInfo = DOMElementK+ type AttrGetType DOMElementTagNamePropertyInfo = T.Text+ type AttrLabel DOMElementTagNamePropertyInfo = "DOMElement::tag-name"+ attrGet _ = getDOMElementTagName+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-region-overset"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMElementWebkitRegionOverset :: (MonadIO m, DOMElementK o) => o -> m T.Text+getDOMElementWebkitRegionOverset obj = liftIO $ getObjectPropertyString obj "webkit-region-overset"++data DOMElementWebkitRegionOversetPropertyInfo+instance AttrInfo DOMElementWebkitRegionOversetPropertyInfo where+ type AttrAllowedOps DOMElementWebkitRegionOversetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMElementWebkitRegionOversetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMElementWebkitRegionOversetPropertyInfo = DOMElementK+ type AttrGetType DOMElementWebkitRegionOversetPropertyInfo = T.Text+ type AttrLabel DOMElementWebkitRegionOversetPropertyInfo = "DOMElement::webkit-region-overset"+ attrGet _ = getDOMElementWebkitRegionOverset+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMElement = '[ '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("id", DOMElementIdPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo)]++type instance AttributeList DOMEntityReference = '[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo)]++-- VVV Prop "bubbles"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMEventBubbles :: (MonadIO m, DOMEventK o) => o -> m Bool+getDOMEventBubbles obj = liftIO $ getObjectPropertyBool obj "bubbles"++data DOMEventBubblesPropertyInfo+instance AttrInfo DOMEventBubblesPropertyInfo where+ type AttrAllowedOps DOMEventBubblesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMEventBubblesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMEventBubblesPropertyInfo = DOMEventK+ type AttrGetType DOMEventBubblesPropertyInfo = Bool+ type AttrLabel DOMEventBubblesPropertyInfo = "DOMEvent::bubbles"+ attrGet _ = getDOMEventBubbles+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "cancel-bubble"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMEventCancelBubble :: (MonadIO m, DOMEventK o) => o -> m Bool+getDOMEventCancelBubble obj = liftIO $ getObjectPropertyBool obj "cancel-bubble"++setDOMEventCancelBubble :: (MonadIO m, DOMEventK o) => o -> Bool -> m ()+setDOMEventCancelBubble obj val = liftIO $ setObjectPropertyBool obj "cancel-bubble" val++constructDOMEventCancelBubble :: Bool -> IO ([Char], GValue)+constructDOMEventCancelBubble val = constructObjectPropertyBool "cancel-bubble" val++data DOMEventCancelBubblePropertyInfo+instance AttrInfo DOMEventCancelBubblePropertyInfo where+ type AttrAllowedOps DOMEventCancelBubblePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMEventCancelBubblePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMEventCancelBubblePropertyInfo = DOMEventK+ type AttrGetType DOMEventCancelBubblePropertyInfo = Bool+ type AttrLabel DOMEventCancelBubblePropertyInfo = "DOMEvent::cancel-bubble"+ attrGet _ = getDOMEventCancelBubble+ attrSet _ = setDOMEventCancelBubble+ attrConstruct _ = constructDOMEventCancelBubble++-- VVV Prop "cancelable"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMEventCancelable :: (MonadIO m, DOMEventK o) => o -> m Bool+getDOMEventCancelable obj = liftIO $ getObjectPropertyBool obj "cancelable"++data DOMEventCancelablePropertyInfo+instance AttrInfo DOMEventCancelablePropertyInfo where+ type AttrAllowedOps DOMEventCancelablePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMEventCancelablePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMEventCancelablePropertyInfo = DOMEventK+ type AttrGetType DOMEventCancelablePropertyInfo = Bool+ type AttrLabel DOMEventCancelablePropertyInfo = "DOMEvent::cancelable"+ attrGet _ = getDOMEventCancelable+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "current-target"+ -- Type: TInterface "WebKit" "DOMEventTarget"+ -- Flags: [PropertyReadable]++getDOMEventCurrentTarget :: (MonadIO m, DOMEventK o) => o -> m DOMEventTarget+getDOMEventCurrentTarget obj = liftIO $ getObjectPropertyObject obj "current-target" DOMEventTarget++data DOMEventCurrentTargetPropertyInfo+instance AttrInfo DOMEventCurrentTargetPropertyInfo where+ type AttrAllowedOps DOMEventCurrentTargetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMEventCurrentTargetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMEventCurrentTargetPropertyInfo = DOMEventK+ type AttrGetType DOMEventCurrentTargetPropertyInfo = DOMEventTarget+ type AttrLabel DOMEventCurrentTargetPropertyInfo = "DOMEvent::current-target"+ attrGet _ = getDOMEventCurrentTarget+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "default-prevented"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMEventDefaultPrevented :: (MonadIO m, DOMEventK o) => o -> m Bool+getDOMEventDefaultPrevented obj = liftIO $ getObjectPropertyBool obj "default-prevented"++data DOMEventDefaultPreventedPropertyInfo+instance AttrInfo DOMEventDefaultPreventedPropertyInfo where+ type AttrAllowedOps DOMEventDefaultPreventedPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMEventDefaultPreventedPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMEventDefaultPreventedPropertyInfo = DOMEventK+ type AttrGetType DOMEventDefaultPreventedPropertyInfo = Bool+ type AttrLabel DOMEventDefaultPreventedPropertyInfo = "DOMEvent::default-prevented"+ attrGet _ = getDOMEventDefaultPrevented+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "event-phase"+ -- Type: TBasicType TUInt32+ -- Flags: [PropertyReadable]++getDOMEventEventPhase :: (MonadIO m, DOMEventK o) => o -> m Word32+getDOMEventEventPhase obj = liftIO $ getObjectPropertyCUInt obj "event-phase"++data DOMEventEventPhasePropertyInfo+instance AttrInfo DOMEventEventPhasePropertyInfo where+ type AttrAllowedOps DOMEventEventPhasePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMEventEventPhasePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMEventEventPhasePropertyInfo = DOMEventK+ type AttrGetType DOMEventEventPhasePropertyInfo = Word32+ type AttrLabel DOMEventEventPhasePropertyInfo = "DOMEvent::event-phase"+ attrGet _ = getDOMEventEventPhase+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "return-value"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMEventReturnValue :: (MonadIO m, DOMEventK o) => o -> m Bool+getDOMEventReturnValue obj = liftIO $ getObjectPropertyBool obj "return-value"++setDOMEventReturnValue :: (MonadIO m, DOMEventK o) => o -> Bool -> m ()+setDOMEventReturnValue obj val = liftIO $ setObjectPropertyBool obj "return-value" val++constructDOMEventReturnValue :: Bool -> IO ([Char], GValue)+constructDOMEventReturnValue val = constructObjectPropertyBool "return-value" val++data DOMEventReturnValuePropertyInfo+instance AttrInfo DOMEventReturnValuePropertyInfo where+ type AttrAllowedOps DOMEventReturnValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMEventReturnValuePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMEventReturnValuePropertyInfo = DOMEventK+ type AttrGetType DOMEventReturnValuePropertyInfo = Bool+ type AttrLabel DOMEventReturnValuePropertyInfo = "DOMEvent::return-value"+ attrGet _ = getDOMEventReturnValue+ attrSet _ = setDOMEventReturnValue+ attrConstruct _ = constructDOMEventReturnValue++-- VVV Prop "src-element"+ -- Type: TInterface "WebKit" "DOMEventTarget"+ -- Flags: [PropertyReadable]++getDOMEventSrcElement :: (MonadIO m, DOMEventK o) => o -> m DOMEventTarget+getDOMEventSrcElement obj = liftIO $ getObjectPropertyObject obj "src-element" DOMEventTarget++data DOMEventSrcElementPropertyInfo+instance AttrInfo DOMEventSrcElementPropertyInfo where+ type AttrAllowedOps DOMEventSrcElementPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMEventSrcElementPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMEventSrcElementPropertyInfo = DOMEventK+ type AttrGetType DOMEventSrcElementPropertyInfo = DOMEventTarget+ type AttrLabel DOMEventSrcElementPropertyInfo = "DOMEvent::src-element"+ attrGet _ = getDOMEventSrcElement+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "target"+ -- Type: TInterface "WebKit" "DOMEventTarget"+ -- Flags: [PropertyReadable]++getDOMEventTarget :: (MonadIO m, DOMEventK o) => o -> m DOMEventTarget+getDOMEventTarget obj = liftIO $ getObjectPropertyObject obj "target" DOMEventTarget++data DOMEventTargetPropertyInfo+instance AttrInfo DOMEventTargetPropertyInfo where+ type AttrAllowedOps DOMEventTargetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMEventTargetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMEventTargetPropertyInfo = DOMEventK+ type AttrGetType DOMEventTargetPropertyInfo = DOMEventTarget+ type AttrLabel DOMEventTargetPropertyInfo = "DOMEvent::target"+ attrGet _ = getDOMEventTarget+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "time-stamp"+ -- Type: TBasicType TUInt32+ -- Flags: [PropertyReadable]++getDOMEventTimeStamp :: (MonadIO m, DOMEventK o) => o -> m Word32+getDOMEventTimeStamp obj = liftIO $ getObjectPropertyCUInt obj "time-stamp"++data DOMEventTimeStampPropertyInfo+instance AttrInfo DOMEventTimeStampPropertyInfo where+ type AttrAllowedOps DOMEventTimeStampPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMEventTimeStampPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMEventTimeStampPropertyInfo = DOMEventK+ type AttrGetType DOMEventTimeStampPropertyInfo = Word32+ type AttrLabel DOMEventTimeStampPropertyInfo = "DOMEvent::time-stamp"+ attrGet _ = getDOMEventTimeStamp+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMEventType :: (MonadIO m, DOMEventK o) => o -> m T.Text+getDOMEventType obj = liftIO $ getObjectPropertyString obj "type"++data DOMEventTypePropertyInfo+instance AttrInfo DOMEventTypePropertyInfo where+ type AttrAllowedOps DOMEventTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMEventTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMEventTypePropertyInfo = DOMEventK+ type AttrGetType DOMEventTypePropertyInfo = T.Text+ type AttrLabel DOMEventTypePropertyInfo = "DOMEvent::type"+ attrGet _ = getDOMEventType+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMEvent = '[ '("bubbles", DOMEventBubblesPropertyInfo), '("cancel-bubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-target", DOMEventCurrentTargetPropertyInfo), '("default-prevented", DOMEventDefaultPreventedPropertyInfo), '("event-phase", DOMEventEventPhasePropertyInfo), '("return-value", DOMEventReturnValuePropertyInfo), '("src-element", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("time-stamp", DOMEventTimeStampPropertyInfo), '("type", DOMEventTypePropertyInfo)]++type instance AttributeList DOMEventTarget = '[ ]++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMFileName :: (MonadIO m, DOMFileK o) => o -> m T.Text+getDOMFileName obj = liftIO $ getObjectPropertyString obj "name"++data DOMFileNamePropertyInfo+instance AttrInfo DOMFileNamePropertyInfo where+ type AttrAllowedOps DOMFileNamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMFileNamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMFileNamePropertyInfo = DOMFileK+ type AttrGetType DOMFileNamePropertyInfo = T.Text+ type AttrLabel DOMFileNamePropertyInfo = "DOMFile::name"+ attrGet _ = getDOMFileName+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-relative-path"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMFileWebkitRelativePath :: (MonadIO m, DOMFileK o) => o -> m T.Text+getDOMFileWebkitRelativePath obj = liftIO $ getObjectPropertyString obj "webkit-relative-path"++data DOMFileWebkitRelativePathPropertyInfo+instance AttrInfo DOMFileWebkitRelativePathPropertyInfo where+ type AttrAllowedOps DOMFileWebkitRelativePathPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMFileWebkitRelativePathPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMFileWebkitRelativePathPropertyInfo = DOMFileK+ type AttrGetType DOMFileWebkitRelativePathPropertyInfo = T.Text+ type AttrLabel DOMFileWebkitRelativePathPropertyInfo = "DOMFile::webkit-relative-path"+ attrGet _ = getDOMFileWebkitRelativePath+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMFile = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("name", DOMFileNamePropertyInfo), '("size", DOMBlobSizePropertyInfo), '("type", DOMBlobTypePropertyInfo), '("webkit-relative-path", DOMFileWebkitRelativePathPropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMFileListLength :: (MonadIO m, DOMFileListK o) => o -> m Word64+getDOMFileListLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMFileListLengthPropertyInfo+instance AttrInfo DOMFileListLengthPropertyInfo where+ type AttrAllowedOps DOMFileListLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMFileListLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMFileListLengthPropertyInfo = DOMFileListK+ type AttrGetType DOMFileListLengthPropertyInfo = Word64+ type AttrLabel DOMFileListLengthPropertyInfo = "DOMFileList::length"+ attrGet _ = getDOMFileListLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMFileList = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMFileListLengthPropertyInfo)]++-- VVV Prop "id"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMGamepadId :: (MonadIO m, DOMGamepadK o) => o -> m T.Text+getDOMGamepadId obj = liftIO $ getObjectPropertyString obj "id"++data DOMGamepadIdPropertyInfo+instance AttrInfo DOMGamepadIdPropertyInfo where+ type AttrAllowedOps DOMGamepadIdPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMGamepadIdPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMGamepadIdPropertyInfo = DOMGamepadK+ type AttrGetType DOMGamepadIdPropertyInfo = T.Text+ type AttrLabel DOMGamepadIdPropertyInfo = "DOMGamepad::id"+ attrGet _ = getDOMGamepadId+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "index"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMGamepadIndex :: (MonadIO m, DOMGamepadK o) => o -> m Word64+getDOMGamepadIndex obj = liftIO $ getObjectPropertyUInt64 obj "index"++data DOMGamepadIndexPropertyInfo+instance AttrInfo DOMGamepadIndexPropertyInfo where+ type AttrAllowedOps DOMGamepadIndexPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMGamepadIndexPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMGamepadIndexPropertyInfo = DOMGamepadK+ type AttrGetType DOMGamepadIndexPropertyInfo = Word64+ type AttrLabel DOMGamepadIndexPropertyInfo = "DOMGamepad::index"+ attrGet _ = getDOMGamepadIndex+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "timestamp"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMGamepadTimestamp :: (MonadIO m, DOMGamepadK o) => o -> m Word64+getDOMGamepadTimestamp obj = liftIO $ getObjectPropertyUInt64 obj "timestamp"++data DOMGamepadTimestampPropertyInfo+instance AttrInfo DOMGamepadTimestampPropertyInfo where+ type AttrAllowedOps DOMGamepadTimestampPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMGamepadTimestampPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMGamepadTimestampPropertyInfo = DOMGamepadK+ type AttrGetType DOMGamepadTimestampPropertyInfo = Word64+ type AttrLabel DOMGamepadTimestampPropertyInfo = "DOMGamepad::timestamp"+ attrGet _ = getDOMGamepadTimestamp+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMGamepad = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("id", DOMGamepadIdPropertyInfo), '("index", DOMGamepadIndexPropertyInfo), '("timestamp", DOMGamepadTimestampPropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMGamepadListLength :: (MonadIO m, DOMGamepadListK o) => o -> m Word64+getDOMGamepadListLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMGamepadListLengthPropertyInfo+instance AttrInfo DOMGamepadListLengthPropertyInfo where+ type AttrAllowedOps DOMGamepadListLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMGamepadListLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMGamepadListLengthPropertyInfo = DOMGamepadListK+ type AttrGetType DOMGamepadListLengthPropertyInfo = Word64+ type AttrLabel DOMGamepadListLengthPropertyInfo = "DOMGamepadList::length"+ attrGet _ = getDOMGamepadListLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMGamepadList = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMGamepadListLengthPropertyInfo)]++type instance AttributeList DOMGeolocation = '[ '("core-object", DOMObjectCoreObjectPropertyInfo)]++-- VVV Prop "charset"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementCharset :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementCharset obj = liftIO $ getObjectPropertyString obj "charset"++setDOMHTMLAnchorElementCharset :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementCharset obj val = liftIO $ setObjectPropertyString obj "charset" val++constructDOMHTMLAnchorElementCharset :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementCharset val = constructObjectPropertyString "charset" val++data DOMHTMLAnchorElementCharsetPropertyInfo+instance AttrInfo DOMHTMLAnchorElementCharsetPropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementCharsetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementCharsetPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementCharsetPropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementCharsetPropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementCharsetPropertyInfo = "DOMHTMLAnchorElement::charset"+ attrGet _ = getDOMHTMLAnchorElementCharset+ attrSet _ = setDOMHTMLAnchorElementCharset+ attrConstruct _ = constructDOMHTMLAnchorElementCharset++-- VVV Prop "coords"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementCoords :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementCoords obj = liftIO $ getObjectPropertyString obj "coords"++setDOMHTMLAnchorElementCoords :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementCoords obj val = liftIO $ setObjectPropertyString obj "coords" val++constructDOMHTMLAnchorElementCoords :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementCoords val = constructObjectPropertyString "coords" val++data DOMHTMLAnchorElementCoordsPropertyInfo+instance AttrInfo DOMHTMLAnchorElementCoordsPropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementCoordsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementCoordsPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementCoordsPropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementCoordsPropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementCoordsPropertyInfo = "DOMHTMLAnchorElement::coords"+ attrGet _ = getDOMHTMLAnchorElementCoords+ attrSet _ = setDOMHTMLAnchorElementCoords+ attrConstruct _ = constructDOMHTMLAnchorElementCoords++-- VVV Prop "download"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementDownload :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementDownload obj = liftIO $ getObjectPropertyString obj "download"++setDOMHTMLAnchorElementDownload :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementDownload obj val = liftIO $ setObjectPropertyString obj "download" val++constructDOMHTMLAnchorElementDownload :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementDownload val = constructObjectPropertyString "download" val++data DOMHTMLAnchorElementDownloadPropertyInfo+instance AttrInfo DOMHTMLAnchorElementDownloadPropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementDownloadPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementDownloadPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementDownloadPropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementDownloadPropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementDownloadPropertyInfo = "DOMHTMLAnchorElement::download"+ attrGet _ = getDOMHTMLAnchorElementDownload+ attrSet _ = setDOMHTMLAnchorElementDownload+ attrConstruct _ = constructDOMHTMLAnchorElementDownload++-- VVV Prop "hash"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementHash :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementHash obj = liftIO $ getObjectPropertyString obj "hash"++setDOMHTMLAnchorElementHash :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementHash obj val = liftIO $ setObjectPropertyString obj "hash" val++constructDOMHTMLAnchorElementHash :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementHash val = constructObjectPropertyString "hash" val++data DOMHTMLAnchorElementHashPropertyInfo+instance AttrInfo DOMHTMLAnchorElementHashPropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementHashPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementHashPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementHashPropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementHashPropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementHashPropertyInfo = "DOMHTMLAnchorElement::hash"+ attrGet _ = getDOMHTMLAnchorElementHash+ attrSet _ = setDOMHTMLAnchorElementHash+ attrConstruct _ = constructDOMHTMLAnchorElementHash++-- VVV Prop "host"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementHost :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementHost obj = liftIO $ getObjectPropertyString obj "host"++setDOMHTMLAnchorElementHost :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementHost obj val = liftIO $ setObjectPropertyString obj "host" val++constructDOMHTMLAnchorElementHost :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementHost val = constructObjectPropertyString "host" val++data DOMHTMLAnchorElementHostPropertyInfo+instance AttrInfo DOMHTMLAnchorElementHostPropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementHostPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementHostPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementHostPropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementHostPropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementHostPropertyInfo = "DOMHTMLAnchorElement::host"+ attrGet _ = getDOMHTMLAnchorElementHost+ attrSet _ = setDOMHTMLAnchorElementHost+ attrConstruct _ = constructDOMHTMLAnchorElementHost++-- VVV Prop "hostname"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementHostname :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementHostname obj = liftIO $ getObjectPropertyString obj "hostname"++setDOMHTMLAnchorElementHostname :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementHostname obj val = liftIO $ setObjectPropertyString obj "hostname" val++constructDOMHTMLAnchorElementHostname :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementHostname val = constructObjectPropertyString "hostname" val++data DOMHTMLAnchorElementHostnamePropertyInfo+instance AttrInfo DOMHTMLAnchorElementHostnamePropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementHostnamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementHostnamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementHostnamePropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementHostnamePropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementHostnamePropertyInfo = "DOMHTMLAnchorElement::hostname"+ attrGet _ = getDOMHTMLAnchorElementHostname+ attrSet _ = setDOMHTMLAnchorElementHostname+ attrConstruct _ = constructDOMHTMLAnchorElementHostname++-- VVV Prop "href"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementHref :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementHref obj = liftIO $ getObjectPropertyString obj "href"++setDOMHTMLAnchorElementHref :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementHref obj val = liftIO $ setObjectPropertyString obj "href" val++constructDOMHTMLAnchorElementHref :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementHref val = constructObjectPropertyString "href" val++data DOMHTMLAnchorElementHrefPropertyInfo+instance AttrInfo DOMHTMLAnchorElementHrefPropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementHrefPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementHrefPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementHrefPropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementHrefPropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementHrefPropertyInfo = "DOMHTMLAnchorElement::href"+ attrGet _ = getDOMHTMLAnchorElementHref+ attrSet _ = setDOMHTMLAnchorElementHref+ attrConstruct _ = constructDOMHTMLAnchorElementHref++-- VVV Prop "hreflang"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementHreflang :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementHreflang obj = liftIO $ getObjectPropertyString obj "hreflang"++setDOMHTMLAnchorElementHreflang :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementHreflang obj val = liftIO $ setObjectPropertyString obj "hreflang" val++constructDOMHTMLAnchorElementHreflang :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementHreflang val = constructObjectPropertyString "hreflang" val++data DOMHTMLAnchorElementHreflangPropertyInfo+instance AttrInfo DOMHTMLAnchorElementHreflangPropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementHreflangPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementHreflangPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementHreflangPropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementHreflangPropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementHreflangPropertyInfo = "DOMHTMLAnchorElement::hreflang"+ attrGet _ = getDOMHTMLAnchorElementHreflang+ attrSet _ = setDOMHTMLAnchorElementHreflang+ attrConstruct _ = constructDOMHTMLAnchorElementHreflang++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementName :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLAnchorElementName :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLAnchorElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementName val = constructObjectPropertyString "name" val++data DOMHTMLAnchorElementNamePropertyInfo+instance AttrInfo DOMHTMLAnchorElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementNamePropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementNamePropertyInfo = "DOMHTMLAnchorElement::name"+ attrGet _ = getDOMHTMLAnchorElementName+ attrSet _ = setDOMHTMLAnchorElementName+ attrConstruct _ = constructDOMHTMLAnchorElementName++-- VVV Prop "origin"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLAnchorElementOrigin :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementOrigin obj = liftIO $ getObjectPropertyString obj "origin"++data DOMHTMLAnchorElementOriginPropertyInfo+instance AttrInfo DOMHTMLAnchorElementOriginPropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementOriginPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementOriginPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLAnchorElementOriginPropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementOriginPropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementOriginPropertyInfo = "DOMHTMLAnchorElement::origin"+ attrGet _ = getDOMHTMLAnchorElementOrigin+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "pathname"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementPathname :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementPathname obj = liftIO $ getObjectPropertyString obj "pathname"++setDOMHTMLAnchorElementPathname :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementPathname obj val = liftIO $ setObjectPropertyString obj "pathname" val++constructDOMHTMLAnchorElementPathname :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementPathname val = constructObjectPropertyString "pathname" val++data DOMHTMLAnchorElementPathnamePropertyInfo+instance AttrInfo DOMHTMLAnchorElementPathnamePropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementPathnamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementPathnamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementPathnamePropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementPathnamePropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementPathnamePropertyInfo = "DOMHTMLAnchorElement::pathname"+ attrGet _ = getDOMHTMLAnchorElementPathname+ attrSet _ = setDOMHTMLAnchorElementPathname+ attrConstruct _ = constructDOMHTMLAnchorElementPathname++-- VVV Prop "ping"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementPing :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementPing obj = liftIO $ getObjectPropertyString obj "ping"++setDOMHTMLAnchorElementPing :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementPing obj val = liftIO $ setObjectPropertyString obj "ping" val++constructDOMHTMLAnchorElementPing :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementPing val = constructObjectPropertyString "ping" val++data DOMHTMLAnchorElementPingPropertyInfo+instance AttrInfo DOMHTMLAnchorElementPingPropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementPingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementPingPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementPingPropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementPingPropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementPingPropertyInfo = "DOMHTMLAnchorElement::ping"+ attrGet _ = getDOMHTMLAnchorElementPing+ attrSet _ = setDOMHTMLAnchorElementPing+ attrConstruct _ = constructDOMHTMLAnchorElementPing++-- VVV Prop "port"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementPort :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementPort obj = liftIO $ getObjectPropertyString obj "port"++setDOMHTMLAnchorElementPort :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementPort obj val = liftIO $ setObjectPropertyString obj "port" val++constructDOMHTMLAnchorElementPort :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementPort val = constructObjectPropertyString "port" val++data DOMHTMLAnchorElementPortPropertyInfo+instance AttrInfo DOMHTMLAnchorElementPortPropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementPortPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementPortPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementPortPropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementPortPropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementPortPropertyInfo = "DOMHTMLAnchorElement::port"+ attrGet _ = getDOMHTMLAnchorElementPort+ attrSet _ = setDOMHTMLAnchorElementPort+ attrConstruct _ = constructDOMHTMLAnchorElementPort++-- VVV Prop "protocol"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementProtocol :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementProtocol obj = liftIO $ getObjectPropertyString obj "protocol"++setDOMHTMLAnchorElementProtocol :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementProtocol obj val = liftIO $ setObjectPropertyString obj "protocol" val++constructDOMHTMLAnchorElementProtocol :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementProtocol val = constructObjectPropertyString "protocol" val++data DOMHTMLAnchorElementProtocolPropertyInfo+instance AttrInfo DOMHTMLAnchorElementProtocolPropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementProtocolPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementProtocolPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementProtocolPropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementProtocolPropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementProtocolPropertyInfo = "DOMHTMLAnchorElement::protocol"+ attrGet _ = getDOMHTMLAnchorElementProtocol+ attrSet _ = setDOMHTMLAnchorElementProtocol+ attrConstruct _ = constructDOMHTMLAnchorElementProtocol++-- VVV Prop "rel"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementRel :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementRel obj = liftIO $ getObjectPropertyString obj "rel"++setDOMHTMLAnchorElementRel :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementRel obj val = liftIO $ setObjectPropertyString obj "rel" val++constructDOMHTMLAnchorElementRel :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementRel val = constructObjectPropertyString "rel" val++data DOMHTMLAnchorElementRelPropertyInfo+instance AttrInfo DOMHTMLAnchorElementRelPropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementRelPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementRelPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementRelPropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementRelPropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementRelPropertyInfo = "DOMHTMLAnchorElement::rel"+ attrGet _ = getDOMHTMLAnchorElementRel+ attrSet _ = setDOMHTMLAnchorElementRel+ attrConstruct _ = constructDOMHTMLAnchorElementRel++-- VVV Prop "rev"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementRev :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementRev obj = liftIO $ getObjectPropertyString obj "rev"++setDOMHTMLAnchorElementRev :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementRev obj val = liftIO $ setObjectPropertyString obj "rev" val++constructDOMHTMLAnchorElementRev :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementRev val = constructObjectPropertyString "rev" val++data DOMHTMLAnchorElementRevPropertyInfo+instance AttrInfo DOMHTMLAnchorElementRevPropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementRevPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementRevPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementRevPropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementRevPropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementRevPropertyInfo = "DOMHTMLAnchorElement::rev"+ attrGet _ = getDOMHTMLAnchorElementRev+ attrSet _ = setDOMHTMLAnchorElementRev+ attrConstruct _ = constructDOMHTMLAnchorElementRev++-- VVV Prop "search"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementSearch :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementSearch obj = liftIO $ getObjectPropertyString obj "search"++setDOMHTMLAnchorElementSearch :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementSearch obj val = liftIO $ setObjectPropertyString obj "search" val++constructDOMHTMLAnchorElementSearch :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementSearch val = constructObjectPropertyString "search" val++data DOMHTMLAnchorElementSearchPropertyInfo+instance AttrInfo DOMHTMLAnchorElementSearchPropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementSearchPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementSearchPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementSearchPropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementSearchPropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementSearchPropertyInfo = "DOMHTMLAnchorElement::search"+ attrGet _ = getDOMHTMLAnchorElementSearch+ attrSet _ = setDOMHTMLAnchorElementSearch+ attrConstruct _ = constructDOMHTMLAnchorElementSearch++-- VVV Prop "shape"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementShape :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementShape obj = liftIO $ getObjectPropertyString obj "shape"++setDOMHTMLAnchorElementShape :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementShape obj val = liftIO $ setObjectPropertyString obj "shape" val++constructDOMHTMLAnchorElementShape :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementShape val = constructObjectPropertyString "shape" val++data DOMHTMLAnchorElementShapePropertyInfo+instance AttrInfo DOMHTMLAnchorElementShapePropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementShapePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementShapePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementShapePropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementShapePropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementShapePropertyInfo = "DOMHTMLAnchorElement::shape"+ attrGet _ = getDOMHTMLAnchorElementShape+ attrSet _ = setDOMHTMLAnchorElementShape+ attrConstruct _ = constructDOMHTMLAnchorElementShape++-- VVV Prop "target"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementTarget :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementTarget obj = liftIO $ getObjectPropertyString obj "target"++setDOMHTMLAnchorElementTarget :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementTarget obj val = liftIO $ setObjectPropertyString obj "target" val++constructDOMHTMLAnchorElementTarget :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementTarget val = constructObjectPropertyString "target" val++data DOMHTMLAnchorElementTargetPropertyInfo+instance AttrInfo DOMHTMLAnchorElementTargetPropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementTargetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementTargetPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementTargetPropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementTargetPropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementTargetPropertyInfo = "DOMHTMLAnchorElement::target"+ attrGet _ = getDOMHTMLAnchorElementTarget+ attrSet _ = setDOMHTMLAnchorElementTarget+ attrConstruct _ = constructDOMHTMLAnchorElementTarget++-- VVV Prop "text"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLAnchorElementText :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementText obj = liftIO $ getObjectPropertyString obj "text"++data DOMHTMLAnchorElementTextPropertyInfo+instance AttrInfo DOMHTMLAnchorElementTextPropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementTextPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementTextPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLAnchorElementTextPropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementTextPropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementTextPropertyInfo = "DOMHTMLAnchorElement::text"+ attrGet _ = getDOMHTMLAnchorElementText+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAnchorElementType :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> m T.Text+getDOMHTMLAnchorElementType obj = liftIO $ getObjectPropertyString obj "type"++setDOMHTMLAnchorElementType :: (MonadIO m, DOMHTMLAnchorElementK o) => o -> T.Text -> m ()+setDOMHTMLAnchorElementType obj val = liftIO $ setObjectPropertyString obj "type" val++constructDOMHTMLAnchorElementType :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAnchorElementType val = constructObjectPropertyString "type" val++data DOMHTMLAnchorElementTypePropertyInfo+instance AttrInfo DOMHTMLAnchorElementTypePropertyInfo where+ type AttrAllowedOps DOMHTMLAnchorElementTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAnchorElementTypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAnchorElementTypePropertyInfo = DOMHTMLAnchorElementK+ type AttrGetType DOMHTMLAnchorElementTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLAnchorElementTypePropertyInfo = "DOMHTMLAnchorElement::type"+ attrGet _ = getDOMHTMLAnchorElementType+ attrSet _ = setDOMHTMLAnchorElementType+ attrConstruct _ = constructDOMHTMLAnchorElementType++type instance AttributeList DOMHTMLAnchorElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("charset", DOMHTMLAnchorElementCharsetPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("coords", DOMHTMLAnchorElementCoordsPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("download", DOMHTMLAnchorElementDownloadPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hash", DOMHTMLAnchorElementHashPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("host", DOMHTMLAnchorElementHostPropertyInfo), '("hostname", DOMHTMLAnchorElementHostnamePropertyInfo), '("href", DOMHTMLAnchorElementHrefPropertyInfo), '("hreflang", DOMHTMLAnchorElementHreflangPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLAnchorElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("origin", DOMHTMLAnchorElementOriginPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("pathname", DOMHTMLAnchorElementPathnamePropertyInfo), '("ping", DOMHTMLAnchorElementPingPropertyInfo), '("port", DOMHTMLAnchorElementPortPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("protocol", DOMHTMLAnchorElementProtocolPropertyInfo), '("rel", DOMHTMLAnchorElementRelPropertyInfo), '("rev", DOMHTMLAnchorElementRevPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("search", DOMHTMLAnchorElementSearchPropertyInfo), '("shape", DOMHTMLAnchorElementShapePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("target", DOMHTMLAnchorElementTargetPropertyInfo), '("text", DOMHTMLAnchorElementTextPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLAnchorElementTypePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAppletElementAlign :: (MonadIO m, DOMHTMLAppletElementK o) => o -> m T.Text+getDOMHTMLAppletElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLAppletElementAlign :: (MonadIO m, DOMHTMLAppletElementK o) => o -> T.Text -> m ()+setDOMHTMLAppletElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLAppletElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAppletElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLAppletElementAlignPropertyInfo+instance AttrInfo DOMHTMLAppletElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLAppletElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAppletElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAppletElementAlignPropertyInfo = DOMHTMLAppletElementK+ type AttrGetType DOMHTMLAppletElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLAppletElementAlignPropertyInfo = "DOMHTMLAppletElement::align"+ attrGet _ = getDOMHTMLAppletElementAlign+ attrSet _ = setDOMHTMLAppletElementAlign+ attrConstruct _ = constructDOMHTMLAppletElementAlign++-- VVV Prop "alt"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAppletElementAlt :: (MonadIO m, DOMHTMLAppletElementK o) => o -> m T.Text+getDOMHTMLAppletElementAlt obj = liftIO $ getObjectPropertyString obj "alt"++setDOMHTMLAppletElementAlt :: (MonadIO m, DOMHTMLAppletElementK o) => o -> T.Text -> m ()+setDOMHTMLAppletElementAlt obj val = liftIO $ setObjectPropertyString obj "alt" val++constructDOMHTMLAppletElementAlt :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAppletElementAlt val = constructObjectPropertyString "alt" val++data DOMHTMLAppletElementAltPropertyInfo+instance AttrInfo DOMHTMLAppletElementAltPropertyInfo where+ type AttrAllowedOps DOMHTMLAppletElementAltPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAppletElementAltPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAppletElementAltPropertyInfo = DOMHTMLAppletElementK+ type AttrGetType DOMHTMLAppletElementAltPropertyInfo = T.Text+ type AttrLabel DOMHTMLAppletElementAltPropertyInfo = "DOMHTMLAppletElement::alt"+ attrGet _ = getDOMHTMLAppletElementAlt+ attrSet _ = setDOMHTMLAppletElementAlt+ attrConstruct _ = constructDOMHTMLAppletElementAlt++-- VVV Prop "archive"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAppletElementArchive :: (MonadIO m, DOMHTMLAppletElementK o) => o -> m T.Text+getDOMHTMLAppletElementArchive obj = liftIO $ getObjectPropertyString obj "archive"++setDOMHTMLAppletElementArchive :: (MonadIO m, DOMHTMLAppletElementK o) => o -> T.Text -> m ()+setDOMHTMLAppletElementArchive obj val = liftIO $ setObjectPropertyString obj "archive" val++constructDOMHTMLAppletElementArchive :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAppletElementArchive val = constructObjectPropertyString "archive" val++data DOMHTMLAppletElementArchivePropertyInfo+instance AttrInfo DOMHTMLAppletElementArchivePropertyInfo where+ type AttrAllowedOps DOMHTMLAppletElementArchivePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAppletElementArchivePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAppletElementArchivePropertyInfo = DOMHTMLAppletElementK+ type AttrGetType DOMHTMLAppletElementArchivePropertyInfo = T.Text+ type AttrLabel DOMHTMLAppletElementArchivePropertyInfo = "DOMHTMLAppletElement::archive"+ attrGet _ = getDOMHTMLAppletElementArchive+ attrSet _ = setDOMHTMLAppletElementArchive+ attrConstruct _ = constructDOMHTMLAppletElementArchive++-- VVV Prop "code"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAppletElementCode :: (MonadIO m, DOMHTMLAppletElementK o) => o -> m T.Text+getDOMHTMLAppletElementCode obj = liftIO $ getObjectPropertyString obj "code"++setDOMHTMLAppletElementCode :: (MonadIO m, DOMHTMLAppletElementK o) => o -> T.Text -> m ()+setDOMHTMLAppletElementCode obj val = liftIO $ setObjectPropertyString obj "code" val++constructDOMHTMLAppletElementCode :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAppletElementCode val = constructObjectPropertyString "code" val++data DOMHTMLAppletElementCodePropertyInfo+instance AttrInfo DOMHTMLAppletElementCodePropertyInfo where+ type AttrAllowedOps DOMHTMLAppletElementCodePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAppletElementCodePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAppletElementCodePropertyInfo = DOMHTMLAppletElementK+ type AttrGetType DOMHTMLAppletElementCodePropertyInfo = T.Text+ type AttrLabel DOMHTMLAppletElementCodePropertyInfo = "DOMHTMLAppletElement::code"+ attrGet _ = getDOMHTMLAppletElementCode+ attrSet _ = setDOMHTMLAppletElementCode+ attrConstruct _ = constructDOMHTMLAppletElementCode++-- VVV Prop "code-base"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAppletElementCodeBase :: (MonadIO m, DOMHTMLAppletElementK o) => o -> m T.Text+getDOMHTMLAppletElementCodeBase obj = liftIO $ getObjectPropertyString obj "code-base"++setDOMHTMLAppletElementCodeBase :: (MonadIO m, DOMHTMLAppletElementK o) => o -> T.Text -> m ()+setDOMHTMLAppletElementCodeBase obj val = liftIO $ setObjectPropertyString obj "code-base" val++constructDOMHTMLAppletElementCodeBase :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAppletElementCodeBase val = constructObjectPropertyString "code-base" val++data DOMHTMLAppletElementCodeBasePropertyInfo+instance AttrInfo DOMHTMLAppletElementCodeBasePropertyInfo where+ type AttrAllowedOps DOMHTMLAppletElementCodeBasePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAppletElementCodeBasePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAppletElementCodeBasePropertyInfo = DOMHTMLAppletElementK+ type AttrGetType DOMHTMLAppletElementCodeBasePropertyInfo = T.Text+ type AttrLabel DOMHTMLAppletElementCodeBasePropertyInfo = "DOMHTMLAppletElement::code-base"+ attrGet _ = getDOMHTMLAppletElementCodeBase+ attrSet _ = setDOMHTMLAppletElementCodeBase+ attrConstruct _ = constructDOMHTMLAppletElementCodeBase++-- VVV Prop "height"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAppletElementHeight :: (MonadIO m, DOMHTMLAppletElementK o) => o -> m T.Text+getDOMHTMLAppletElementHeight obj = liftIO $ getObjectPropertyString obj "height"++setDOMHTMLAppletElementHeight :: (MonadIO m, DOMHTMLAppletElementK o) => o -> T.Text -> m ()+setDOMHTMLAppletElementHeight obj val = liftIO $ setObjectPropertyString obj "height" val++constructDOMHTMLAppletElementHeight :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAppletElementHeight val = constructObjectPropertyString "height" val++data DOMHTMLAppletElementHeightPropertyInfo+instance AttrInfo DOMHTMLAppletElementHeightPropertyInfo where+ type AttrAllowedOps DOMHTMLAppletElementHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAppletElementHeightPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAppletElementHeightPropertyInfo = DOMHTMLAppletElementK+ type AttrGetType DOMHTMLAppletElementHeightPropertyInfo = T.Text+ type AttrLabel DOMHTMLAppletElementHeightPropertyInfo = "DOMHTMLAppletElement::height"+ attrGet _ = getDOMHTMLAppletElementHeight+ attrSet _ = setDOMHTMLAppletElementHeight+ attrConstruct _ = constructDOMHTMLAppletElementHeight++-- VVV Prop "hspace"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAppletElementHspace :: (MonadIO m, DOMHTMLAppletElementK o) => o -> m Int64+getDOMHTMLAppletElementHspace obj = liftIO $ getObjectPropertyInt64 obj "hspace"++setDOMHTMLAppletElementHspace :: (MonadIO m, DOMHTMLAppletElementK o) => o -> Int64 -> m ()+setDOMHTMLAppletElementHspace obj val = liftIO $ setObjectPropertyInt64 obj "hspace" val++constructDOMHTMLAppletElementHspace :: Int64 -> IO ([Char], GValue)+constructDOMHTMLAppletElementHspace val = constructObjectPropertyInt64 "hspace" val++data DOMHTMLAppletElementHspacePropertyInfo+instance AttrInfo DOMHTMLAppletElementHspacePropertyInfo where+ type AttrAllowedOps DOMHTMLAppletElementHspacePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAppletElementHspacePropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLAppletElementHspacePropertyInfo = DOMHTMLAppletElementK+ type AttrGetType DOMHTMLAppletElementHspacePropertyInfo = Int64+ type AttrLabel DOMHTMLAppletElementHspacePropertyInfo = "DOMHTMLAppletElement::hspace"+ attrGet _ = getDOMHTMLAppletElementHspace+ attrSet _ = setDOMHTMLAppletElementHspace+ attrConstruct _ = constructDOMHTMLAppletElementHspace++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAppletElementName :: (MonadIO m, DOMHTMLAppletElementK o) => o -> m T.Text+getDOMHTMLAppletElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLAppletElementName :: (MonadIO m, DOMHTMLAppletElementK o) => o -> T.Text -> m ()+setDOMHTMLAppletElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLAppletElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAppletElementName val = constructObjectPropertyString "name" val++data DOMHTMLAppletElementNamePropertyInfo+instance AttrInfo DOMHTMLAppletElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLAppletElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAppletElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAppletElementNamePropertyInfo = DOMHTMLAppletElementK+ type AttrGetType DOMHTMLAppletElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLAppletElementNamePropertyInfo = "DOMHTMLAppletElement::name"+ attrGet _ = getDOMHTMLAppletElementName+ attrSet _ = setDOMHTMLAppletElementName+ attrConstruct _ = constructDOMHTMLAppletElementName++-- VVV Prop "object"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAppletElementObject :: (MonadIO m, DOMHTMLAppletElementK o) => o -> m T.Text+getDOMHTMLAppletElementObject obj = liftIO $ getObjectPropertyString obj "object"++setDOMHTMLAppletElementObject :: (MonadIO m, DOMHTMLAppletElementK o) => o -> T.Text -> m ()+setDOMHTMLAppletElementObject obj val = liftIO $ setObjectPropertyString obj "object" val++constructDOMHTMLAppletElementObject :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAppletElementObject val = constructObjectPropertyString "object" val++data DOMHTMLAppletElementObjectPropertyInfo+instance AttrInfo DOMHTMLAppletElementObjectPropertyInfo where+ type AttrAllowedOps DOMHTMLAppletElementObjectPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAppletElementObjectPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAppletElementObjectPropertyInfo = DOMHTMLAppletElementK+ type AttrGetType DOMHTMLAppletElementObjectPropertyInfo = T.Text+ type AttrLabel DOMHTMLAppletElementObjectPropertyInfo = "DOMHTMLAppletElement::object"+ attrGet _ = getDOMHTMLAppletElementObject+ attrSet _ = setDOMHTMLAppletElementObject+ attrConstruct _ = constructDOMHTMLAppletElementObject++-- VVV Prop "vspace"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAppletElementVspace :: (MonadIO m, DOMHTMLAppletElementK o) => o -> m Int64+getDOMHTMLAppletElementVspace obj = liftIO $ getObjectPropertyInt64 obj "vspace"++setDOMHTMLAppletElementVspace :: (MonadIO m, DOMHTMLAppletElementK o) => o -> Int64 -> m ()+setDOMHTMLAppletElementVspace obj val = liftIO $ setObjectPropertyInt64 obj "vspace" val++constructDOMHTMLAppletElementVspace :: Int64 -> IO ([Char], GValue)+constructDOMHTMLAppletElementVspace val = constructObjectPropertyInt64 "vspace" val++data DOMHTMLAppletElementVspacePropertyInfo+instance AttrInfo DOMHTMLAppletElementVspacePropertyInfo where+ type AttrAllowedOps DOMHTMLAppletElementVspacePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAppletElementVspacePropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLAppletElementVspacePropertyInfo = DOMHTMLAppletElementK+ type AttrGetType DOMHTMLAppletElementVspacePropertyInfo = Int64+ type AttrLabel DOMHTMLAppletElementVspacePropertyInfo = "DOMHTMLAppletElement::vspace"+ attrGet _ = getDOMHTMLAppletElementVspace+ attrSet _ = setDOMHTMLAppletElementVspace+ attrConstruct _ = constructDOMHTMLAppletElementVspace++-- VVV Prop "width"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAppletElementWidth :: (MonadIO m, DOMHTMLAppletElementK o) => o -> m T.Text+getDOMHTMLAppletElementWidth obj = liftIO $ getObjectPropertyString obj "width"++setDOMHTMLAppletElementWidth :: (MonadIO m, DOMHTMLAppletElementK o) => o -> T.Text -> m ()+setDOMHTMLAppletElementWidth obj val = liftIO $ setObjectPropertyString obj "width" val++constructDOMHTMLAppletElementWidth :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAppletElementWidth val = constructObjectPropertyString "width" val++data DOMHTMLAppletElementWidthPropertyInfo+instance AttrInfo DOMHTMLAppletElementWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLAppletElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAppletElementWidthPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAppletElementWidthPropertyInfo = DOMHTMLAppletElementK+ type AttrGetType DOMHTMLAppletElementWidthPropertyInfo = T.Text+ type AttrLabel DOMHTMLAppletElementWidthPropertyInfo = "DOMHTMLAppletElement::width"+ attrGet _ = getDOMHTMLAppletElementWidth+ attrSet _ = setDOMHTMLAppletElementWidth+ attrConstruct _ = constructDOMHTMLAppletElementWidth++type instance AttributeList DOMHTMLAppletElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLAppletElementAlignPropertyInfo), '("alt", DOMHTMLAppletElementAltPropertyInfo), '("archive", DOMHTMLAppletElementArchivePropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("code", DOMHTMLAppletElementCodePropertyInfo), '("code-base", DOMHTMLAppletElementCodeBasePropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLAppletElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("hspace", DOMHTMLAppletElementHspacePropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLAppletElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("object", DOMHTMLAppletElementObjectPropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("vspace", DOMHTMLAppletElementVspacePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLAppletElementWidthPropertyInfo)]++-- VVV Prop "alt"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAreaElementAlt :: (MonadIO m, DOMHTMLAreaElementK o) => o -> m T.Text+getDOMHTMLAreaElementAlt obj = liftIO $ getObjectPropertyString obj "alt"++setDOMHTMLAreaElementAlt :: (MonadIO m, DOMHTMLAreaElementK o) => o -> T.Text -> m ()+setDOMHTMLAreaElementAlt obj val = liftIO $ setObjectPropertyString obj "alt" val++constructDOMHTMLAreaElementAlt :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAreaElementAlt val = constructObjectPropertyString "alt" val++data DOMHTMLAreaElementAltPropertyInfo+instance AttrInfo DOMHTMLAreaElementAltPropertyInfo where+ type AttrAllowedOps DOMHTMLAreaElementAltPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAreaElementAltPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAreaElementAltPropertyInfo = DOMHTMLAreaElementK+ type AttrGetType DOMHTMLAreaElementAltPropertyInfo = T.Text+ type AttrLabel DOMHTMLAreaElementAltPropertyInfo = "DOMHTMLAreaElement::alt"+ attrGet _ = getDOMHTMLAreaElementAlt+ attrSet _ = setDOMHTMLAreaElementAlt+ attrConstruct _ = constructDOMHTMLAreaElementAlt++-- VVV Prop "coords"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAreaElementCoords :: (MonadIO m, DOMHTMLAreaElementK o) => o -> m T.Text+getDOMHTMLAreaElementCoords obj = liftIO $ getObjectPropertyString obj "coords"++setDOMHTMLAreaElementCoords :: (MonadIO m, DOMHTMLAreaElementK o) => o -> T.Text -> m ()+setDOMHTMLAreaElementCoords obj val = liftIO $ setObjectPropertyString obj "coords" val++constructDOMHTMLAreaElementCoords :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAreaElementCoords val = constructObjectPropertyString "coords" val++data DOMHTMLAreaElementCoordsPropertyInfo+instance AttrInfo DOMHTMLAreaElementCoordsPropertyInfo where+ type AttrAllowedOps DOMHTMLAreaElementCoordsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAreaElementCoordsPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAreaElementCoordsPropertyInfo = DOMHTMLAreaElementK+ type AttrGetType DOMHTMLAreaElementCoordsPropertyInfo = T.Text+ type AttrLabel DOMHTMLAreaElementCoordsPropertyInfo = "DOMHTMLAreaElement::coords"+ attrGet _ = getDOMHTMLAreaElementCoords+ attrSet _ = setDOMHTMLAreaElementCoords+ attrConstruct _ = constructDOMHTMLAreaElementCoords++-- VVV Prop "hash"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLAreaElementHash :: (MonadIO m, DOMHTMLAreaElementK o) => o -> m T.Text+getDOMHTMLAreaElementHash obj = liftIO $ getObjectPropertyString obj "hash"++data DOMHTMLAreaElementHashPropertyInfo+instance AttrInfo DOMHTMLAreaElementHashPropertyInfo where+ type AttrAllowedOps DOMHTMLAreaElementHashPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAreaElementHashPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLAreaElementHashPropertyInfo = DOMHTMLAreaElementK+ type AttrGetType DOMHTMLAreaElementHashPropertyInfo = T.Text+ type AttrLabel DOMHTMLAreaElementHashPropertyInfo = "DOMHTMLAreaElement::hash"+ attrGet _ = getDOMHTMLAreaElementHash+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "host"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLAreaElementHost :: (MonadIO m, DOMHTMLAreaElementK o) => o -> m T.Text+getDOMHTMLAreaElementHost obj = liftIO $ getObjectPropertyString obj "host"++data DOMHTMLAreaElementHostPropertyInfo+instance AttrInfo DOMHTMLAreaElementHostPropertyInfo where+ type AttrAllowedOps DOMHTMLAreaElementHostPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAreaElementHostPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLAreaElementHostPropertyInfo = DOMHTMLAreaElementK+ type AttrGetType DOMHTMLAreaElementHostPropertyInfo = T.Text+ type AttrLabel DOMHTMLAreaElementHostPropertyInfo = "DOMHTMLAreaElement::host"+ attrGet _ = getDOMHTMLAreaElementHost+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "hostname"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLAreaElementHostname :: (MonadIO m, DOMHTMLAreaElementK o) => o -> m T.Text+getDOMHTMLAreaElementHostname obj = liftIO $ getObjectPropertyString obj "hostname"++data DOMHTMLAreaElementHostnamePropertyInfo+instance AttrInfo DOMHTMLAreaElementHostnamePropertyInfo where+ type AttrAllowedOps DOMHTMLAreaElementHostnamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAreaElementHostnamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLAreaElementHostnamePropertyInfo = DOMHTMLAreaElementK+ type AttrGetType DOMHTMLAreaElementHostnamePropertyInfo = T.Text+ type AttrLabel DOMHTMLAreaElementHostnamePropertyInfo = "DOMHTMLAreaElement::hostname"+ attrGet _ = getDOMHTMLAreaElementHostname+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "href"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAreaElementHref :: (MonadIO m, DOMHTMLAreaElementK o) => o -> m T.Text+getDOMHTMLAreaElementHref obj = liftIO $ getObjectPropertyString obj "href"++setDOMHTMLAreaElementHref :: (MonadIO m, DOMHTMLAreaElementK o) => o -> T.Text -> m ()+setDOMHTMLAreaElementHref obj val = liftIO $ setObjectPropertyString obj "href" val++constructDOMHTMLAreaElementHref :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAreaElementHref val = constructObjectPropertyString "href" val++data DOMHTMLAreaElementHrefPropertyInfo+instance AttrInfo DOMHTMLAreaElementHrefPropertyInfo where+ type AttrAllowedOps DOMHTMLAreaElementHrefPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAreaElementHrefPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAreaElementHrefPropertyInfo = DOMHTMLAreaElementK+ type AttrGetType DOMHTMLAreaElementHrefPropertyInfo = T.Text+ type AttrLabel DOMHTMLAreaElementHrefPropertyInfo = "DOMHTMLAreaElement::href"+ attrGet _ = getDOMHTMLAreaElementHref+ attrSet _ = setDOMHTMLAreaElementHref+ attrConstruct _ = constructDOMHTMLAreaElementHref++-- VVV Prop "no-href"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAreaElementNoHref :: (MonadIO m, DOMHTMLAreaElementK o) => o -> m Bool+getDOMHTMLAreaElementNoHref obj = liftIO $ getObjectPropertyBool obj "no-href"++setDOMHTMLAreaElementNoHref :: (MonadIO m, DOMHTMLAreaElementK o) => o -> Bool -> m ()+setDOMHTMLAreaElementNoHref obj val = liftIO $ setObjectPropertyBool obj "no-href" val++constructDOMHTMLAreaElementNoHref :: Bool -> IO ([Char], GValue)+constructDOMHTMLAreaElementNoHref val = constructObjectPropertyBool "no-href" val++data DOMHTMLAreaElementNoHrefPropertyInfo+instance AttrInfo DOMHTMLAreaElementNoHrefPropertyInfo where+ type AttrAllowedOps DOMHTMLAreaElementNoHrefPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAreaElementNoHrefPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLAreaElementNoHrefPropertyInfo = DOMHTMLAreaElementK+ type AttrGetType DOMHTMLAreaElementNoHrefPropertyInfo = Bool+ type AttrLabel DOMHTMLAreaElementNoHrefPropertyInfo = "DOMHTMLAreaElement::no-href"+ attrGet _ = getDOMHTMLAreaElementNoHref+ attrSet _ = setDOMHTMLAreaElementNoHref+ attrConstruct _ = constructDOMHTMLAreaElementNoHref++-- VVV Prop "pathname"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLAreaElementPathname :: (MonadIO m, DOMHTMLAreaElementK o) => o -> m T.Text+getDOMHTMLAreaElementPathname obj = liftIO $ getObjectPropertyString obj "pathname"++data DOMHTMLAreaElementPathnamePropertyInfo+instance AttrInfo DOMHTMLAreaElementPathnamePropertyInfo where+ type AttrAllowedOps DOMHTMLAreaElementPathnamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAreaElementPathnamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLAreaElementPathnamePropertyInfo = DOMHTMLAreaElementK+ type AttrGetType DOMHTMLAreaElementPathnamePropertyInfo = T.Text+ type AttrLabel DOMHTMLAreaElementPathnamePropertyInfo = "DOMHTMLAreaElement::pathname"+ attrGet _ = getDOMHTMLAreaElementPathname+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "ping"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAreaElementPing :: (MonadIO m, DOMHTMLAreaElementK o) => o -> m T.Text+getDOMHTMLAreaElementPing obj = liftIO $ getObjectPropertyString obj "ping"++setDOMHTMLAreaElementPing :: (MonadIO m, DOMHTMLAreaElementK o) => o -> T.Text -> m ()+setDOMHTMLAreaElementPing obj val = liftIO $ setObjectPropertyString obj "ping" val++constructDOMHTMLAreaElementPing :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAreaElementPing val = constructObjectPropertyString "ping" val++data DOMHTMLAreaElementPingPropertyInfo+instance AttrInfo DOMHTMLAreaElementPingPropertyInfo where+ type AttrAllowedOps DOMHTMLAreaElementPingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAreaElementPingPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAreaElementPingPropertyInfo = DOMHTMLAreaElementK+ type AttrGetType DOMHTMLAreaElementPingPropertyInfo = T.Text+ type AttrLabel DOMHTMLAreaElementPingPropertyInfo = "DOMHTMLAreaElement::ping"+ attrGet _ = getDOMHTMLAreaElementPing+ attrSet _ = setDOMHTMLAreaElementPing+ attrConstruct _ = constructDOMHTMLAreaElementPing++-- VVV Prop "port"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLAreaElementPort :: (MonadIO m, DOMHTMLAreaElementK o) => o -> m T.Text+getDOMHTMLAreaElementPort obj = liftIO $ getObjectPropertyString obj "port"++data DOMHTMLAreaElementPortPropertyInfo+instance AttrInfo DOMHTMLAreaElementPortPropertyInfo where+ type AttrAllowedOps DOMHTMLAreaElementPortPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAreaElementPortPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLAreaElementPortPropertyInfo = DOMHTMLAreaElementK+ type AttrGetType DOMHTMLAreaElementPortPropertyInfo = T.Text+ type AttrLabel DOMHTMLAreaElementPortPropertyInfo = "DOMHTMLAreaElement::port"+ attrGet _ = getDOMHTMLAreaElementPort+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "protocol"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLAreaElementProtocol :: (MonadIO m, DOMHTMLAreaElementK o) => o -> m T.Text+getDOMHTMLAreaElementProtocol obj = liftIO $ getObjectPropertyString obj "protocol"++data DOMHTMLAreaElementProtocolPropertyInfo+instance AttrInfo DOMHTMLAreaElementProtocolPropertyInfo where+ type AttrAllowedOps DOMHTMLAreaElementProtocolPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAreaElementProtocolPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLAreaElementProtocolPropertyInfo = DOMHTMLAreaElementK+ type AttrGetType DOMHTMLAreaElementProtocolPropertyInfo = T.Text+ type AttrLabel DOMHTMLAreaElementProtocolPropertyInfo = "DOMHTMLAreaElement::protocol"+ attrGet _ = getDOMHTMLAreaElementProtocol+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "search"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLAreaElementSearch :: (MonadIO m, DOMHTMLAreaElementK o) => o -> m T.Text+getDOMHTMLAreaElementSearch obj = liftIO $ getObjectPropertyString obj "search"++data DOMHTMLAreaElementSearchPropertyInfo+instance AttrInfo DOMHTMLAreaElementSearchPropertyInfo where+ type AttrAllowedOps DOMHTMLAreaElementSearchPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAreaElementSearchPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLAreaElementSearchPropertyInfo = DOMHTMLAreaElementK+ type AttrGetType DOMHTMLAreaElementSearchPropertyInfo = T.Text+ type AttrLabel DOMHTMLAreaElementSearchPropertyInfo = "DOMHTMLAreaElement::search"+ attrGet _ = getDOMHTMLAreaElementSearch+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "shape"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAreaElementShape :: (MonadIO m, DOMHTMLAreaElementK o) => o -> m T.Text+getDOMHTMLAreaElementShape obj = liftIO $ getObjectPropertyString obj "shape"++setDOMHTMLAreaElementShape :: (MonadIO m, DOMHTMLAreaElementK o) => o -> T.Text -> m ()+setDOMHTMLAreaElementShape obj val = liftIO $ setObjectPropertyString obj "shape" val++constructDOMHTMLAreaElementShape :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAreaElementShape val = constructObjectPropertyString "shape" val++data DOMHTMLAreaElementShapePropertyInfo+instance AttrInfo DOMHTMLAreaElementShapePropertyInfo where+ type AttrAllowedOps DOMHTMLAreaElementShapePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAreaElementShapePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAreaElementShapePropertyInfo = DOMHTMLAreaElementK+ type AttrGetType DOMHTMLAreaElementShapePropertyInfo = T.Text+ type AttrLabel DOMHTMLAreaElementShapePropertyInfo = "DOMHTMLAreaElement::shape"+ attrGet _ = getDOMHTMLAreaElementShape+ attrSet _ = setDOMHTMLAreaElementShape+ attrConstruct _ = constructDOMHTMLAreaElementShape++-- VVV Prop "target"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLAreaElementTarget :: (MonadIO m, DOMHTMLAreaElementK o) => o -> m T.Text+getDOMHTMLAreaElementTarget obj = liftIO $ getObjectPropertyString obj "target"++setDOMHTMLAreaElementTarget :: (MonadIO m, DOMHTMLAreaElementK o) => o -> T.Text -> m ()+setDOMHTMLAreaElementTarget obj val = liftIO $ setObjectPropertyString obj "target" val++constructDOMHTMLAreaElementTarget :: T.Text -> IO ([Char], GValue)+constructDOMHTMLAreaElementTarget val = constructObjectPropertyString "target" val++data DOMHTMLAreaElementTargetPropertyInfo+instance AttrInfo DOMHTMLAreaElementTargetPropertyInfo where+ type AttrAllowedOps DOMHTMLAreaElementTargetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLAreaElementTargetPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLAreaElementTargetPropertyInfo = DOMHTMLAreaElementK+ type AttrGetType DOMHTMLAreaElementTargetPropertyInfo = T.Text+ type AttrLabel DOMHTMLAreaElementTargetPropertyInfo = "DOMHTMLAreaElement::target"+ attrGet _ = getDOMHTMLAreaElementTarget+ attrSet _ = setDOMHTMLAreaElementTarget+ attrConstruct _ = constructDOMHTMLAreaElementTarget++type instance AttributeList DOMHTMLAreaElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("alt", DOMHTMLAreaElementAltPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("coords", DOMHTMLAreaElementCoordsPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hash", DOMHTMLAreaElementHashPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("host", DOMHTMLAreaElementHostPropertyInfo), '("hostname", DOMHTMLAreaElementHostnamePropertyInfo), '("href", DOMHTMLAreaElementHrefPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("no-href", DOMHTMLAreaElementNoHrefPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("pathname", DOMHTMLAreaElementPathnamePropertyInfo), '("ping", DOMHTMLAreaElementPingPropertyInfo), '("port", DOMHTMLAreaElementPortPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("protocol", DOMHTMLAreaElementProtocolPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("search", DOMHTMLAreaElementSearchPropertyInfo), '("shape", DOMHTMLAreaElementShapePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("target", DOMHTMLAreaElementTargetPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++type instance AttributeList DOMHTMLAudioElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("audio-tracks", DOMHTMLMediaElementAudioTracksPropertyInfo), '("autoplay", DOMHTMLMediaElementAutoplayPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("buffered", DOMHTMLMediaElementBufferedPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("controller", DOMHTMLMediaElementControllerPropertyInfo), '("controls", DOMHTMLMediaElementControlsPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-src", DOMHTMLMediaElementCurrentSrcPropertyInfo), '("current-time", DOMHTMLMediaElementCurrentTimePropertyInfo), '("default-muted", DOMHTMLMediaElementDefaultMutedPropertyInfo), '("default-playback-rate", DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("duration", DOMHTMLMediaElementDurationPropertyInfo), '("ended", DOMHTMLMediaElementEndedPropertyInfo), '("error", DOMHTMLMediaElementErrorPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("loop", DOMHTMLMediaElementLoopPropertyInfo), '("media-group", DOMHTMLMediaElementMediaGroupPropertyInfo), '("muted", DOMHTMLMediaElementMutedPropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("network-state", DOMHTMLMediaElementNetworkStatePropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("paused", DOMHTMLMediaElementPausedPropertyInfo), '("playback-rate", DOMHTMLMediaElementPlaybackRatePropertyInfo), '("played", DOMHTMLMediaElementPlayedPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("preload", DOMHTMLMediaElementPreloadPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("ready-state", DOMHTMLMediaElementReadyStatePropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("seekable", DOMHTMLMediaElementSeekablePropertyInfo), '("seeking", DOMHTMLMediaElementSeekingPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLMediaElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("text-tracks", DOMHTMLMediaElementTextTracksPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("video-tracks", DOMHTMLMediaElementVideoTracksPropertyInfo), '("volume", DOMHTMLMediaElementVolumePropertyInfo), '("webkit-audio-decoded-byte-count", DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo), '("webkit-closed-captions-visible", DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo), '("webkit-current-playback-target-is-wireless", DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo), '("webkit-has-closed-captions", DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo), '("webkit-preserves-pitch", DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkit-video-decoded-byte-count", DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "clear"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLBRElementClear :: (MonadIO m, DOMHTMLBRElementK o) => o -> m T.Text+getDOMHTMLBRElementClear obj = liftIO $ getObjectPropertyString obj "clear"++setDOMHTMLBRElementClear :: (MonadIO m, DOMHTMLBRElementK o) => o -> T.Text -> m ()+setDOMHTMLBRElementClear obj val = liftIO $ setObjectPropertyString obj "clear" val++constructDOMHTMLBRElementClear :: T.Text -> IO ([Char], GValue)+constructDOMHTMLBRElementClear val = constructObjectPropertyString "clear" val++data DOMHTMLBRElementClearPropertyInfo+instance AttrInfo DOMHTMLBRElementClearPropertyInfo where+ type AttrAllowedOps DOMHTMLBRElementClearPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLBRElementClearPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLBRElementClearPropertyInfo = DOMHTMLBRElementK+ type AttrGetType DOMHTMLBRElementClearPropertyInfo = T.Text+ type AttrLabel DOMHTMLBRElementClearPropertyInfo = "DOMHTMLBRElement::clear"+ attrGet _ = getDOMHTMLBRElementClear+ attrSet _ = setDOMHTMLBRElementClear+ attrConstruct _ = constructDOMHTMLBRElementClear++type instance AttributeList DOMHTMLBRElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("clear", DOMHTMLBRElementClearPropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "href"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLBaseElementHref :: (MonadIO m, DOMHTMLBaseElementK o) => o -> m T.Text+getDOMHTMLBaseElementHref obj = liftIO $ getObjectPropertyString obj "href"++setDOMHTMLBaseElementHref :: (MonadIO m, DOMHTMLBaseElementK o) => o -> T.Text -> m ()+setDOMHTMLBaseElementHref obj val = liftIO $ setObjectPropertyString obj "href" val++constructDOMHTMLBaseElementHref :: T.Text -> IO ([Char], GValue)+constructDOMHTMLBaseElementHref val = constructObjectPropertyString "href" val++data DOMHTMLBaseElementHrefPropertyInfo+instance AttrInfo DOMHTMLBaseElementHrefPropertyInfo where+ type AttrAllowedOps DOMHTMLBaseElementHrefPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLBaseElementHrefPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLBaseElementHrefPropertyInfo = DOMHTMLBaseElementK+ type AttrGetType DOMHTMLBaseElementHrefPropertyInfo = T.Text+ type AttrLabel DOMHTMLBaseElementHrefPropertyInfo = "DOMHTMLBaseElement::href"+ attrGet _ = getDOMHTMLBaseElementHref+ attrSet _ = setDOMHTMLBaseElementHref+ attrConstruct _ = constructDOMHTMLBaseElementHref++-- VVV Prop "target"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLBaseElementTarget :: (MonadIO m, DOMHTMLBaseElementK o) => o -> m T.Text+getDOMHTMLBaseElementTarget obj = liftIO $ getObjectPropertyString obj "target"++setDOMHTMLBaseElementTarget :: (MonadIO m, DOMHTMLBaseElementK o) => o -> T.Text -> m ()+setDOMHTMLBaseElementTarget obj val = liftIO $ setObjectPropertyString obj "target" val++constructDOMHTMLBaseElementTarget :: T.Text -> IO ([Char], GValue)+constructDOMHTMLBaseElementTarget val = constructObjectPropertyString "target" val++data DOMHTMLBaseElementTargetPropertyInfo+instance AttrInfo DOMHTMLBaseElementTargetPropertyInfo where+ type AttrAllowedOps DOMHTMLBaseElementTargetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLBaseElementTargetPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLBaseElementTargetPropertyInfo = DOMHTMLBaseElementK+ type AttrGetType DOMHTMLBaseElementTargetPropertyInfo = T.Text+ type AttrLabel DOMHTMLBaseElementTargetPropertyInfo = "DOMHTMLBaseElement::target"+ attrGet _ = getDOMHTMLBaseElementTarget+ attrSet _ = setDOMHTMLBaseElementTarget+ attrConstruct _ = constructDOMHTMLBaseElementTarget++type instance AttributeList DOMHTMLBaseElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("href", DOMHTMLBaseElementHrefPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("target", DOMHTMLBaseElementTargetPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "color"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLBaseFontElementColor :: (MonadIO m, DOMHTMLBaseFontElementK o) => o -> m T.Text+getDOMHTMLBaseFontElementColor obj = liftIO $ getObjectPropertyString obj "color"++setDOMHTMLBaseFontElementColor :: (MonadIO m, DOMHTMLBaseFontElementK o) => o -> T.Text -> m ()+setDOMHTMLBaseFontElementColor obj val = liftIO $ setObjectPropertyString obj "color" val++constructDOMHTMLBaseFontElementColor :: T.Text -> IO ([Char], GValue)+constructDOMHTMLBaseFontElementColor val = constructObjectPropertyString "color" val++data DOMHTMLBaseFontElementColorPropertyInfo+instance AttrInfo DOMHTMLBaseFontElementColorPropertyInfo where+ type AttrAllowedOps DOMHTMLBaseFontElementColorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLBaseFontElementColorPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLBaseFontElementColorPropertyInfo = DOMHTMLBaseFontElementK+ type AttrGetType DOMHTMLBaseFontElementColorPropertyInfo = T.Text+ type AttrLabel DOMHTMLBaseFontElementColorPropertyInfo = "DOMHTMLBaseFontElement::color"+ attrGet _ = getDOMHTMLBaseFontElementColor+ attrSet _ = setDOMHTMLBaseFontElementColor+ attrConstruct _ = constructDOMHTMLBaseFontElementColor++-- VVV Prop "face"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLBaseFontElementFace :: (MonadIO m, DOMHTMLBaseFontElementK o) => o -> m T.Text+getDOMHTMLBaseFontElementFace obj = liftIO $ getObjectPropertyString obj "face"++setDOMHTMLBaseFontElementFace :: (MonadIO m, DOMHTMLBaseFontElementK o) => o -> T.Text -> m ()+setDOMHTMLBaseFontElementFace obj val = liftIO $ setObjectPropertyString obj "face" val++constructDOMHTMLBaseFontElementFace :: T.Text -> IO ([Char], GValue)+constructDOMHTMLBaseFontElementFace val = constructObjectPropertyString "face" val++data DOMHTMLBaseFontElementFacePropertyInfo+instance AttrInfo DOMHTMLBaseFontElementFacePropertyInfo where+ type AttrAllowedOps DOMHTMLBaseFontElementFacePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLBaseFontElementFacePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLBaseFontElementFacePropertyInfo = DOMHTMLBaseFontElementK+ type AttrGetType DOMHTMLBaseFontElementFacePropertyInfo = T.Text+ type AttrLabel DOMHTMLBaseFontElementFacePropertyInfo = "DOMHTMLBaseFontElement::face"+ attrGet _ = getDOMHTMLBaseFontElementFace+ attrSet _ = setDOMHTMLBaseFontElementFace+ attrConstruct _ = constructDOMHTMLBaseFontElementFace++-- VVV Prop "size"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLBaseFontElementSize :: (MonadIO m, DOMHTMLBaseFontElementK o) => o -> m Int64+getDOMHTMLBaseFontElementSize obj = liftIO $ getObjectPropertyInt64 obj "size"++setDOMHTMLBaseFontElementSize :: (MonadIO m, DOMHTMLBaseFontElementK o) => o -> Int64 -> m ()+setDOMHTMLBaseFontElementSize obj val = liftIO $ setObjectPropertyInt64 obj "size" val++constructDOMHTMLBaseFontElementSize :: Int64 -> IO ([Char], GValue)+constructDOMHTMLBaseFontElementSize val = constructObjectPropertyInt64 "size" val++data DOMHTMLBaseFontElementSizePropertyInfo+instance AttrInfo DOMHTMLBaseFontElementSizePropertyInfo where+ type AttrAllowedOps DOMHTMLBaseFontElementSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLBaseFontElementSizePropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLBaseFontElementSizePropertyInfo = DOMHTMLBaseFontElementK+ type AttrGetType DOMHTMLBaseFontElementSizePropertyInfo = Int64+ type AttrLabel DOMHTMLBaseFontElementSizePropertyInfo = "DOMHTMLBaseFontElement::size"+ attrGet _ = getDOMHTMLBaseFontElementSize+ attrSet _ = setDOMHTMLBaseFontElementSize+ attrConstruct _ = constructDOMHTMLBaseFontElementSize++type instance AttributeList DOMHTMLBaseFontElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("color", DOMHTMLBaseFontElementColorPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("face", DOMHTMLBaseFontElementFacePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("size", DOMHTMLBaseFontElementSizePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "a-link"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLBodyElementALink :: (MonadIO m, DOMHTMLBodyElementK o) => o -> m T.Text+getDOMHTMLBodyElementALink obj = liftIO $ getObjectPropertyString obj "a-link"++setDOMHTMLBodyElementALink :: (MonadIO m, DOMHTMLBodyElementK o) => o -> T.Text -> m ()+setDOMHTMLBodyElementALink obj val = liftIO $ setObjectPropertyString obj "a-link" val++constructDOMHTMLBodyElementALink :: T.Text -> IO ([Char], GValue)+constructDOMHTMLBodyElementALink val = constructObjectPropertyString "a-link" val++data DOMHTMLBodyElementALinkPropertyInfo+instance AttrInfo DOMHTMLBodyElementALinkPropertyInfo where+ type AttrAllowedOps DOMHTMLBodyElementALinkPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLBodyElementALinkPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLBodyElementALinkPropertyInfo = DOMHTMLBodyElementK+ type AttrGetType DOMHTMLBodyElementALinkPropertyInfo = T.Text+ type AttrLabel DOMHTMLBodyElementALinkPropertyInfo = "DOMHTMLBodyElement::a-link"+ attrGet _ = getDOMHTMLBodyElementALink+ attrSet _ = setDOMHTMLBodyElementALink+ attrConstruct _ = constructDOMHTMLBodyElementALink++-- VVV Prop "background"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLBodyElementBackground :: (MonadIO m, DOMHTMLBodyElementK o) => o -> m T.Text+getDOMHTMLBodyElementBackground obj = liftIO $ getObjectPropertyString obj "background"++setDOMHTMLBodyElementBackground :: (MonadIO m, DOMHTMLBodyElementK o) => o -> T.Text -> m ()+setDOMHTMLBodyElementBackground obj val = liftIO $ setObjectPropertyString obj "background" val++constructDOMHTMLBodyElementBackground :: T.Text -> IO ([Char], GValue)+constructDOMHTMLBodyElementBackground val = constructObjectPropertyString "background" val++data DOMHTMLBodyElementBackgroundPropertyInfo+instance AttrInfo DOMHTMLBodyElementBackgroundPropertyInfo where+ type AttrAllowedOps DOMHTMLBodyElementBackgroundPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLBodyElementBackgroundPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLBodyElementBackgroundPropertyInfo = DOMHTMLBodyElementK+ type AttrGetType DOMHTMLBodyElementBackgroundPropertyInfo = T.Text+ type AttrLabel DOMHTMLBodyElementBackgroundPropertyInfo = "DOMHTMLBodyElement::background"+ attrGet _ = getDOMHTMLBodyElementBackground+ attrSet _ = setDOMHTMLBodyElementBackground+ attrConstruct _ = constructDOMHTMLBodyElementBackground++-- VVV Prop "bg-color"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLBodyElementBgColor :: (MonadIO m, DOMHTMLBodyElementK o) => o -> m T.Text+getDOMHTMLBodyElementBgColor obj = liftIO $ getObjectPropertyString obj "bg-color"++setDOMHTMLBodyElementBgColor :: (MonadIO m, DOMHTMLBodyElementK o) => o -> T.Text -> m ()+setDOMHTMLBodyElementBgColor obj val = liftIO $ setObjectPropertyString obj "bg-color" val++constructDOMHTMLBodyElementBgColor :: T.Text -> IO ([Char], GValue)+constructDOMHTMLBodyElementBgColor val = constructObjectPropertyString "bg-color" val++data DOMHTMLBodyElementBgColorPropertyInfo+instance AttrInfo DOMHTMLBodyElementBgColorPropertyInfo where+ type AttrAllowedOps DOMHTMLBodyElementBgColorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLBodyElementBgColorPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLBodyElementBgColorPropertyInfo = DOMHTMLBodyElementK+ type AttrGetType DOMHTMLBodyElementBgColorPropertyInfo = T.Text+ type AttrLabel DOMHTMLBodyElementBgColorPropertyInfo = "DOMHTMLBodyElement::bg-color"+ attrGet _ = getDOMHTMLBodyElementBgColor+ attrSet _ = setDOMHTMLBodyElementBgColor+ attrConstruct _ = constructDOMHTMLBodyElementBgColor++-- VVV Prop "link"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLBodyElementLink :: (MonadIO m, DOMHTMLBodyElementK o) => o -> m T.Text+getDOMHTMLBodyElementLink obj = liftIO $ getObjectPropertyString obj "link"++setDOMHTMLBodyElementLink :: (MonadIO m, DOMHTMLBodyElementK o) => o -> T.Text -> m ()+setDOMHTMLBodyElementLink obj val = liftIO $ setObjectPropertyString obj "link" val++constructDOMHTMLBodyElementLink :: T.Text -> IO ([Char], GValue)+constructDOMHTMLBodyElementLink val = constructObjectPropertyString "link" val++data DOMHTMLBodyElementLinkPropertyInfo+instance AttrInfo DOMHTMLBodyElementLinkPropertyInfo where+ type AttrAllowedOps DOMHTMLBodyElementLinkPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLBodyElementLinkPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLBodyElementLinkPropertyInfo = DOMHTMLBodyElementK+ type AttrGetType DOMHTMLBodyElementLinkPropertyInfo = T.Text+ type AttrLabel DOMHTMLBodyElementLinkPropertyInfo = "DOMHTMLBodyElement::link"+ attrGet _ = getDOMHTMLBodyElementLink+ attrSet _ = setDOMHTMLBodyElementLink+ attrConstruct _ = constructDOMHTMLBodyElementLink++-- VVV Prop "text"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLBodyElementText :: (MonadIO m, DOMHTMLBodyElementK o) => o -> m T.Text+getDOMHTMLBodyElementText obj = liftIO $ getObjectPropertyString obj "text"++setDOMHTMLBodyElementText :: (MonadIO m, DOMHTMLBodyElementK o) => o -> T.Text -> m ()+setDOMHTMLBodyElementText obj val = liftIO $ setObjectPropertyString obj "text" val++constructDOMHTMLBodyElementText :: T.Text -> IO ([Char], GValue)+constructDOMHTMLBodyElementText val = constructObjectPropertyString "text" val++data DOMHTMLBodyElementTextPropertyInfo+instance AttrInfo DOMHTMLBodyElementTextPropertyInfo where+ type AttrAllowedOps DOMHTMLBodyElementTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLBodyElementTextPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLBodyElementTextPropertyInfo = DOMHTMLBodyElementK+ type AttrGetType DOMHTMLBodyElementTextPropertyInfo = T.Text+ type AttrLabel DOMHTMLBodyElementTextPropertyInfo = "DOMHTMLBodyElement::text"+ attrGet _ = getDOMHTMLBodyElementText+ attrSet _ = setDOMHTMLBodyElementText+ attrConstruct _ = constructDOMHTMLBodyElementText++-- VVV Prop "v-link"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLBodyElementVLink :: (MonadIO m, DOMHTMLBodyElementK o) => o -> m T.Text+getDOMHTMLBodyElementVLink obj = liftIO $ getObjectPropertyString obj "v-link"++setDOMHTMLBodyElementVLink :: (MonadIO m, DOMHTMLBodyElementK o) => o -> T.Text -> m ()+setDOMHTMLBodyElementVLink obj val = liftIO $ setObjectPropertyString obj "v-link" val++constructDOMHTMLBodyElementVLink :: T.Text -> IO ([Char], GValue)+constructDOMHTMLBodyElementVLink val = constructObjectPropertyString "v-link" val++data DOMHTMLBodyElementVLinkPropertyInfo+instance AttrInfo DOMHTMLBodyElementVLinkPropertyInfo where+ type AttrAllowedOps DOMHTMLBodyElementVLinkPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLBodyElementVLinkPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLBodyElementVLinkPropertyInfo = DOMHTMLBodyElementK+ type AttrGetType DOMHTMLBodyElementVLinkPropertyInfo = T.Text+ type AttrLabel DOMHTMLBodyElementVLinkPropertyInfo = "DOMHTMLBodyElement::v-link"+ attrGet _ = getDOMHTMLBodyElementVLink+ attrSet _ = setDOMHTMLBodyElementVLink+ attrConstruct _ = constructDOMHTMLBodyElementVLink++type instance AttributeList DOMHTMLBodyElement = '[ '("a-link", DOMHTMLBodyElementALinkPropertyInfo), '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("background", DOMHTMLBodyElementBackgroundPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("bg-color", DOMHTMLBodyElementBgColorPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("link", DOMHTMLBodyElementLinkPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text", DOMHTMLBodyElementTextPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("v-link", DOMHTMLBodyElementVLinkPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "autofocus"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLButtonElementAutofocus :: (MonadIO m, DOMHTMLButtonElementK o) => o -> m Bool+getDOMHTMLButtonElementAutofocus obj = liftIO $ getObjectPropertyBool obj "autofocus"++setDOMHTMLButtonElementAutofocus :: (MonadIO m, DOMHTMLButtonElementK o) => o -> Bool -> m ()+setDOMHTMLButtonElementAutofocus obj val = liftIO $ setObjectPropertyBool obj "autofocus" val++constructDOMHTMLButtonElementAutofocus :: Bool -> IO ([Char], GValue)+constructDOMHTMLButtonElementAutofocus val = constructObjectPropertyBool "autofocus" val++data DOMHTMLButtonElementAutofocusPropertyInfo+instance AttrInfo DOMHTMLButtonElementAutofocusPropertyInfo where+ type AttrAllowedOps DOMHTMLButtonElementAutofocusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLButtonElementAutofocusPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLButtonElementAutofocusPropertyInfo = DOMHTMLButtonElementK+ type AttrGetType DOMHTMLButtonElementAutofocusPropertyInfo = Bool+ type AttrLabel DOMHTMLButtonElementAutofocusPropertyInfo = "DOMHTMLButtonElement::autofocus"+ attrGet _ = getDOMHTMLButtonElementAutofocus+ attrSet _ = setDOMHTMLButtonElementAutofocus+ attrConstruct _ = constructDOMHTMLButtonElementAutofocus++-- VVV Prop "disabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLButtonElementDisabled :: (MonadIO m, DOMHTMLButtonElementK o) => o -> m Bool+getDOMHTMLButtonElementDisabled obj = liftIO $ getObjectPropertyBool obj "disabled"++setDOMHTMLButtonElementDisabled :: (MonadIO m, DOMHTMLButtonElementK o) => o -> Bool -> m ()+setDOMHTMLButtonElementDisabled obj val = liftIO $ setObjectPropertyBool obj "disabled" val++constructDOMHTMLButtonElementDisabled :: Bool -> IO ([Char], GValue)+constructDOMHTMLButtonElementDisabled val = constructObjectPropertyBool "disabled" val++data DOMHTMLButtonElementDisabledPropertyInfo+instance AttrInfo DOMHTMLButtonElementDisabledPropertyInfo where+ type AttrAllowedOps DOMHTMLButtonElementDisabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLButtonElementDisabledPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLButtonElementDisabledPropertyInfo = DOMHTMLButtonElementK+ type AttrGetType DOMHTMLButtonElementDisabledPropertyInfo = Bool+ type AttrLabel DOMHTMLButtonElementDisabledPropertyInfo = "DOMHTMLButtonElement::disabled"+ attrGet _ = getDOMHTMLButtonElementDisabled+ attrSet _ = setDOMHTMLButtonElementDisabled+ attrConstruct _ = constructDOMHTMLButtonElementDisabled++-- VVV Prop "form"+ -- Type: TInterface "WebKit" "DOMHTMLFormElement"+ -- Flags: [PropertyReadable]++getDOMHTMLButtonElementForm :: (MonadIO m, DOMHTMLButtonElementK o) => o -> m DOMHTMLFormElement+getDOMHTMLButtonElementForm obj = liftIO $ getObjectPropertyObject obj "form" DOMHTMLFormElement++data DOMHTMLButtonElementFormPropertyInfo+instance AttrInfo DOMHTMLButtonElementFormPropertyInfo where+ type AttrAllowedOps DOMHTMLButtonElementFormPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLButtonElementFormPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLButtonElementFormPropertyInfo = DOMHTMLButtonElementK+ type AttrGetType DOMHTMLButtonElementFormPropertyInfo = DOMHTMLFormElement+ type AttrLabel DOMHTMLButtonElementFormPropertyInfo = "DOMHTMLButtonElement::form"+ attrGet _ = getDOMHTMLButtonElementForm+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "form-action"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLButtonElementFormAction :: (MonadIO m, DOMHTMLButtonElementK o) => o -> m T.Text+getDOMHTMLButtonElementFormAction obj = liftIO $ getObjectPropertyString obj "form-action"++setDOMHTMLButtonElementFormAction :: (MonadIO m, DOMHTMLButtonElementK o) => o -> T.Text -> m ()+setDOMHTMLButtonElementFormAction obj val = liftIO $ setObjectPropertyString obj "form-action" val++constructDOMHTMLButtonElementFormAction :: T.Text -> IO ([Char], GValue)+constructDOMHTMLButtonElementFormAction val = constructObjectPropertyString "form-action" val++data DOMHTMLButtonElementFormActionPropertyInfo+instance AttrInfo DOMHTMLButtonElementFormActionPropertyInfo where+ type AttrAllowedOps DOMHTMLButtonElementFormActionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLButtonElementFormActionPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLButtonElementFormActionPropertyInfo = DOMHTMLButtonElementK+ type AttrGetType DOMHTMLButtonElementFormActionPropertyInfo = T.Text+ type AttrLabel DOMHTMLButtonElementFormActionPropertyInfo = "DOMHTMLButtonElement::form-action"+ attrGet _ = getDOMHTMLButtonElementFormAction+ attrSet _ = setDOMHTMLButtonElementFormAction+ attrConstruct _ = constructDOMHTMLButtonElementFormAction++-- VVV Prop "form-enctype"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLButtonElementFormEnctype :: (MonadIO m, DOMHTMLButtonElementK o) => o -> m T.Text+getDOMHTMLButtonElementFormEnctype obj = liftIO $ getObjectPropertyString obj "form-enctype"++setDOMHTMLButtonElementFormEnctype :: (MonadIO m, DOMHTMLButtonElementK o) => o -> T.Text -> m ()+setDOMHTMLButtonElementFormEnctype obj val = liftIO $ setObjectPropertyString obj "form-enctype" val++constructDOMHTMLButtonElementFormEnctype :: T.Text -> IO ([Char], GValue)+constructDOMHTMLButtonElementFormEnctype val = constructObjectPropertyString "form-enctype" val++data DOMHTMLButtonElementFormEnctypePropertyInfo+instance AttrInfo DOMHTMLButtonElementFormEnctypePropertyInfo where+ type AttrAllowedOps DOMHTMLButtonElementFormEnctypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLButtonElementFormEnctypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLButtonElementFormEnctypePropertyInfo = DOMHTMLButtonElementK+ type AttrGetType DOMHTMLButtonElementFormEnctypePropertyInfo = T.Text+ type AttrLabel DOMHTMLButtonElementFormEnctypePropertyInfo = "DOMHTMLButtonElement::form-enctype"+ attrGet _ = getDOMHTMLButtonElementFormEnctype+ attrSet _ = setDOMHTMLButtonElementFormEnctype+ attrConstruct _ = constructDOMHTMLButtonElementFormEnctype++-- VVV Prop "form-method"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLButtonElementFormMethod :: (MonadIO m, DOMHTMLButtonElementK o) => o -> m T.Text+getDOMHTMLButtonElementFormMethod obj = liftIO $ getObjectPropertyString obj "form-method"++setDOMHTMLButtonElementFormMethod :: (MonadIO m, DOMHTMLButtonElementK o) => o -> T.Text -> m ()+setDOMHTMLButtonElementFormMethod obj val = liftIO $ setObjectPropertyString obj "form-method" val++constructDOMHTMLButtonElementFormMethod :: T.Text -> IO ([Char], GValue)+constructDOMHTMLButtonElementFormMethod val = constructObjectPropertyString "form-method" val++data DOMHTMLButtonElementFormMethodPropertyInfo+instance AttrInfo DOMHTMLButtonElementFormMethodPropertyInfo where+ type AttrAllowedOps DOMHTMLButtonElementFormMethodPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLButtonElementFormMethodPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLButtonElementFormMethodPropertyInfo = DOMHTMLButtonElementK+ type AttrGetType DOMHTMLButtonElementFormMethodPropertyInfo = T.Text+ type AttrLabel DOMHTMLButtonElementFormMethodPropertyInfo = "DOMHTMLButtonElement::form-method"+ attrGet _ = getDOMHTMLButtonElementFormMethod+ attrSet _ = setDOMHTMLButtonElementFormMethod+ attrConstruct _ = constructDOMHTMLButtonElementFormMethod++-- VVV Prop "form-no-validate"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLButtonElementFormNoValidate :: (MonadIO m, DOMHTMLButtonElementK o) => o -> m Bool+getDOMHTMLButtonElementFormNoValidate obj = liftIO $ getObjectPropertyBool obj "form-no-validate"++setDOMHTMLButtonElementFormNoValidate :: (MonadIO m, DOMHTMLButtonElementK o) => o -> Bool -> m ()+setDOMHTMLButtonElementFormNoValidate obj val = liftIO $ setObjectPropertyBool obj "form-no-validate" val++constructDOMHTMLButtonElementFormNoValidate :: Bool -> IO ([Char], GValue)+constructDOMHTMLButtonElementFormNoValidate val = constructObjectPropertyBool "form-no-validate" val++data DOMHTMLButtonElementFormNoValidatePropertyInfo+instance AttrInfo DOMHTMLButtonElementFormNoValidatePropertyInfo where+ type AttrAllowedOps DOMHTMLButtonElementFormNoValidatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLButtonElementFormNoValidatePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLButtonElementFormNoValidatePropertyInfo = DOMHTMLButtonElementK+ type AttrGetType DOMHTMLButtonElementFormNoValidatePropertyInfo = Bool+ type AttrLabel DOMHTMLButtonElementFormNoValidatePropertyInfo = "DOMHTMLButtonElement::form-no-validate"+ attrGet _ = getDOMHTMLButtonElementFormNoValidate+ attrSet _ = setDOMHTMLButtonElementFormNoValidate+ attrConstruct _ = constructDOMHTMLButtonElementFormNoValidate++-- VVV Prop "form-target"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLButtonElementFormTarget :: (MonadIO m, DOMHTMLButtonElementK o) => o -> m T.Text+getDOMHTMLButtonElementFormTarget obj = liftIO $ getObjectPropertyString obj "form-target"++setDOMHTMLButtonElementFormTarget :: (MonadIO m, DOMHTMLButtonElementK o) => o -> T.Text -> m ()+setDOMHTMLButtonElementFormTarget obj val = liftIO $ setObjectPropertyString obj "form-target" val++constructDOMHTMLButtonElementFormTarget :: T.Text -> IO ([Char], GValue)+constructDOMHTMLButtonElementFormTarget val = constructObjectPropertyString "form-target" val++data DOMHTMLButtonElementFormTargetPropertyInfo+instance AttrInfo DOMHTMLButtonElementFormTargetPropertyInfo where+ type AttrAllowedOps DOMHTMLButtonElementFormTargetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLButtonElementFormTargetPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLButtonElementFormTargetPropertyInfo = DOMHTMLButtonElementK+ type AttrGetType DOMHTMLButtonElementFormTargetPropertyInfo = T.Text+ type AttrLabel DOMHTMLButtonElementFormTargetPropertyInfo = "DOMHTMLButtonElement::form-target"+ attrGet _ = getDOMHTMLButtonElementFormTarget+ attrSet _ = setDOMHTMLButtonElementFormTarget+ attrConstruct _ = constructDOMHTMLButtonElementFormTarget++-- VVV Prop "labels"+ -- Type: TInterface "WebKit" "DOMNodeList"+ -- Flags: [PropertyReadable]++getDOMHTMLButtonElementLabels :: (MonadIO m, DOMHTMLButtonElementK o) => o -> m DOMNodeList+getDOMHTMLButtonElementLabels obj = liftIO $ getObjectPropertyObject obj "labels" DOMNodeList++data DOMHTMLButtonElementLabelsPropertyInfo+instance AttrInfo DOMHTMLButtonElementLabelsPropertyInfo where+ type AttrAllowedOps DOMHTMLButtonElementLabelsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLButtonElementLabelsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLButtonElementLabelsPropertyInfo = DOMHTMLButtonElementK+ type AttrGetType DOMHTMLButtonElementLabelsPropertyInfo = DOMNodeList+ type AttrLabel DOMHTMLButtonElementLabelsPropertyInfo = "DOMHTMLButtonElement::labels"+ attrGet _ = getDOMHTMLButtonElementLabels+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLButtonElementName :: (MonadIO m, DOMHTMLButtonElementK o) => o -> m T.Text+getDOMHTMLButtonElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLButtonElementName :: (MonadIO m, DOMHTMLButtonElementK o) => o -> T.Text -> m ()+setDOMHTMLButtonElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLButtonElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLButtonElementName val = constructObjectPropertyString "name" val++data DOMHTMLButtonElementNamePropertyInfo+instance AttrInfo DOMHTMLButtonElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLButtonElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLButtonElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLButtonElementNamePropertyInfo = DOMHTMLButtonElementK+ type AttrGetType DOMHTMLButtonElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLButtonElementNamePropertyInfo = "DOMHTMLButtonElement::name"+ attrGet _ = getDOMHTMLButtonElementName+ attrSet _ = setDOMHTMLButtonElementName+ attrConstruct _ = constructDOMHTMLButtonElementName++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLButtonElementType :: (MonadIO m, DOMHTMLButtonElementK o) => o -> m T.Text+getDOMHTMLButtonElementType obj = liftIO $ getObjectPropertyString obj "type"++setDOMHTMLButtonElementType :: (MonadIO m, DOMHTMLButtonElementK o) => o -> T.Text -> m ()+setDOMHTMLButtonElementType obj val = liftIO $ setObjectPropertyString obj "type" val++constructDOMHTMLButtonElementType :: T.Text -> IO ([Char], GValue)+constructDOMHTMLButtonElementType val = constructObjectPropertyString "type" val++data DOMHTMLButtonElementTypePropertyInfo+instance AttrInfo DOMHTMLButtonElementTypePropertyInfo where+ type AttrAllowedOps DOMHTMLButtonElementTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLButtonElementTypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLButtonElementTypePropertyInfo = DOMHTMLButtonElementK+ type AttrGetType DOMHTMLButtonElementTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLButtonElementTypePropertyInfo = "DOMHTMLButtonElement::type"+ attrGet _ = getDOMHTMLButtonElementType+ attrSet _ = setDOMHTMLButtonElementType+ attrConstruct _ = constructDOMHTMLButtonElementType++-- VVV Prop "validation-message"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLButtonElementValidationMessage :: (MonadIO m, DOMHTMLButtonElementK o) => o -> m T.Text+getDOMHTMLButtonElementValidationMessage obj = liftIO $ getObjectPropertyString obj "validation-message"++data DOMHTMLButtonElementValidationMessagePropertyInfo+instance AttrInfo DOMHTMLButtonElementValidationMessagePropertyInfo where+ type AttrAllowedOps DOMHTMLButtonElementValidationMessagePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLButtonElementValidationMessagePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLButtonElementValidationMessagePropertyInfo = DOMHTMLButtonElementK+ type AttrGetType DOMHTMLButtonElementValidationMessagePropertyInfo = T.Text+ type AttrLabel DOMHTMLButtonElementValidationMessagePropertyInfo = "DOMHTMLButtonElement::validation-message"+ attrGet _ = getDOMHTMLButtonElementValidationMessage+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "validity"+ -- Type: TInterface "WebKit" "DOMValidityState"+ -- Flags: [PropertyReadable]++getDOMHTMLButtonElementValidity :: (MonadIO m, DOMHTMLButtonElementK o) => o -> m DOMValidityState+getDOMHTMLButtonElementValidity obj = liftIO $ getObjectPropertyObject obj "validity" DOMValidityState++data DOMHTMLButtonElementValidityPropertyInfo+instance AttrInfo DOMHTMLButtonElementValidityPropertyInfo where+ type AttrAllowedOps DOMHTMLButtonElementValidityPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLButtonElementValidityPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLButtonElementValidityPropertyInfo = DOMHTMLButtonElementK+ type AttrGetType DOMHTMLButtonElementValidityPropertyInfo = DOMValidityState+ type AttrLabel DOMHTMLButtonElementValidityPropertyInfo = "DOMHTMLButtonElement::validity"+ attrGet _ = getDOMHTMLButtonElementValidity+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "value"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLButtonElementValue :: (MonadIO m, DOMHTMLButtonElementK o) => o -> m T.Text+getDOMHTMLButtonElementValue obj = liftIO $ getObjectPropertyString obj "value"++setDOMHTMLButtonElementValue :: (MonadIO m, DOMHTMLButtonElementK o) => o -> T.Text -> m ()+setDOMHTMLButtonElementValue obj val = liftIO $ setObjectPropertyString obj "value" val++constructDOMHTMLButtonElementValue :: T.Text -> IO ([Char], GValue)+constructDOMHTMLButtonElementValue val = constructObjectPropertyString "value" val++data DOMHTMLButtonElementValuePropertyInfo+instance AttrInfo DOMHTMLButtonElementValuePropertyInfo where+ type AttrAllowedOps DOMHTMLButtonElementValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLButtonElementValuePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLButtonElementValuePropertyInfo = DOMHTMLButtonElementK+ type AttrGetType DOMHTMLButtonElementValuePropertyInfo = T.Text+ type AttrLabel DOMHTMLButtonElementValuePropertyInfo = "DOMHTMLButtonElement::value"+ attrGet _ = getDOMHTMLButtonElementValue+ attrSet _ = setDOMHTMLButtonElementValue+ attrConstruct _ = constructDOMHTMLButtonElementValue++-- VVV Prop "will-validate"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMHTMLButtonElementWillValidate :: (MonadIO m, DOMHTMLButtonElementK o) => o -> m Bool+getDOMHTMLButtonElementWillValidate obj = liftIO $ getObjectPropertyBool obj "will-validate"++data DOMHTMLButtonElementWillValidatePropertyInfo+instance AttrInfo DOMHTMLButtonElementWillValidatePropertyInfo where+ type AttrAllowedOps DOMHTMLButtonElementWillValidatePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLButtonElementWillValidatePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLButtonElementWillValidatePropertyInfo = DOMHTMLButtonElementK+ type AttrGetType DOMHTMLButtonElementWillValidatePropertyInfo = Bool+ type AttrLabel DOMHTMLButtonElementWillValidatePropertyInfo = "DOMHTMLButtonElement::will-validate"+ attrGet _ = getDOMHTMLButtonElementWillValidate+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMHTMLButtonElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autofocus", DOMHTMLButtonElementAutofocusPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLButtonElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLButtonElementFormPropertyInfo), '("form-action", DOMHTMLButtonElementFormActionPropertyInfo), '("form-enctype", DOMHTMLButtonElementFormEnctypePropertyInfo), '("form-method", DOMHTMLButtonElementFormMethodPropertyInfo), '("form-no-validate", DOMHTMLButtonElementFormNoValidatePropertyInfo), '("form-target", DOMHTMLButtonElementFormTargetPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("labels", DOMHTMLButtonElementLabelsPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLButtonElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLButtonElementTypePropertyInfo), '("validation-message", DOMHTMLButtonElementValidationMessagePropertyInfo), '("validity", DOMHTMLButtonElementValidityPropertyInfo), '("value", DOMHTMLButtonElementValuePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("will-validate", DOMHTMLButtonElementWillValidatePropertyInfo)]++-- VVV Prop "height"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLCanvasElementHeight :: (MonadIO m, DOMHTMLCanvasElementK o) => o -> m Int64+getDOMHTMLCanvasElementHeight obj = liftIO $ getObjectPropertyInt64 obj "height"++setDOMHTMLCanvasElementHeight :: (MonadIO m, DOMHTMLCanvasElementK o) => o -> Int64 -> m ()+setDOMHTMLCanvasElementHeight obj val = liftIO $ setObjectPropertyInt64 obj "height" val++constructDOMHTMLCanvasElementHeight :: Int64 -> IO ([Char], GValue)+constructDOMHTMLCanvasElementHeight val = constructObjectPropertyInt64 "height" val++data DOMHTMLCanvasElementHeightPropertyInfo+instance AttrInfo DOMHTMLCanvasElementHeightPropertyInfo where+ type AttrAllowedOps DOMHTMLCanvasElementHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLCanvasElementHeightPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLCanvasElementHeightPropertyInfo = DOMHTMLCanvasElementK+ type AttrGetType DOMHTMLCanvasElementHeightPropertyInfo = Int64+ type AttrLabel DOMHTMLCanvasElementHeightPropertyInfo = "DOMHTMLCanvasElement::height"+ attrGet _ = getDOMHTMLCanvasElementHeight+ attrSet _ = setDOMHTMLCanvasElementHeight+ attrConstruct _ = constructDOMHTMLCanvasElementHeight++-- VVV Prop "width"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLCanvasElementWidth :: (MonadIO m, DOMHTMLCanvasElementK o) => o -> m Int64+getDOMHTMLCanvasElementWidth obj = liftIO $ getObjectPropertyInt64 obj "width"++setDOMHTMLCanvasElementWidth :: (MonadIO m, DOMHTMLCanvasElementK o) => o -> Int64 -> m ()+setDOMHTMLCanvasElementWidth obj val = liftIO $ setObjectPropertyInt64 obj "width" val++constructDOMHTMLCanvasElementWidth :: Int64 -> IO ([Char], GValue)+constructDOMHTMLCanvasElementWidth val = constructObjectPropertyInt64 "width" val++data DOMHTMLCanvasElementWidthPropertyInfo+instance AttrInfo DOMHTMLCanvasElementWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLCanvasElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLCanvasElementWidthPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLCanvasElementWidthPropertyInfo = DOMHTMLCanvasElementK+ type AttrGetType DOMHTMLCanvasElementWidthPropertyInfo = Int64+ type AttrLabel DOMHTMLCanvasElementWidthPropertyInfo = "DOMHTMLCanvasElement::width"+ attrGet _ = getDOMHTMLCanvasElementWidth+ attrSet _ = setDOMHTMLCanvasElementWidth+ attrConstruct _ = constructDOMHTMLCanvasElementWidth++type instance AttributeList DOMHTMLCanvasElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLCanvasElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLCanvasElementWidthPropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMHTMLCollectionLength :: (MonadIO m, DOMHTMLCollectionK o) => o -> m Word64+getDOMHTMLCollectionLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMHTMLCollectionLengthPropertyInfo+instance AttrInfo DOMHTMLCollectionLengthPropertyInfo where+ type AttrAllowedOps DOMHTMLCollectionLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLCollectionLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLCollectionLengthPropertyInfo = DOMHTMLCollectionK+ type AttrGetType DOMHTMLCollectionLengthPropertyInfo = Word64+ type AttrLabel DOMHTMLCollectionLengthPropertyInfo = "DOMHTMLCollection::length"+ attrGet _ = getDOMHTMLCollectionLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMHTMLCollection = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMHTMLCollectionLengthPropertyInfo)]++-- VVV Prop "compact"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLDListElementCompact :: (MonadIO m, DOMHTMLDListElementK o) => o -> m Bool+getDOMHTMLDListElementCompact obj = liftIO $ getObjectPropertyBool obj "compact"++setDOMHTMLDListElementCompact :: (MonadIO m, DOMHTMLDListElementK o) => o -> Bool -> m ()+setDOMHTMLDListElementCompact obj val = liftIO $ setObjectPropertyBool obj "compact" val++constructDOMHTMLDListElementCompact :: Bool -> IO ([Char], GValue)+constructDOMHTMLDListElementCompact val = constructObjectPropertyBool "compact" val++data DOMHTMLDListElementCompactPropertyInfo+instance AttrInfo DOMHTMLDListElementCompactPropertyInfo where+ type AttrAllowedOps DOMHTMLDListElementCompactPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDListElementCompactPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLDListElementCompactPropertyInfo = DOMHTMLDListElementK+ type AttrGetType DOMHTMLDListElementCompactPropertyInfo = Bool+ type AttrLabel DOMHTMLDListElementCompactPropertyInfo = "DOMHTMLDListElement::compact"+ attrGet _ = getDOMHTMLDListElementCompact+ attrSet _ = setDOMHTMLDListElementCompact+ attrConstruct _ = constructDOMHTMLDListElementCompact++type instance AttributeList DOMHTMLDListElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("compact", DOMHTMLDListElementCompactPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "open"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLDetailsElementOpen :: (MonadIO m, DOMHTMLDetailsElementK o) => o -> m Bool+getDOMHTMLDetailsElementOpen obj = liftIO $ getObjectPropertyBool obj "open"++setDOMHTMLDetailsElementOpen :: (MonadIO m, DOMHTMLDetailsElementK o) => o -> Bool -> m ()+setDOMHTMLDetailsElementOpen obj val = liftIO $ setObjectPropertyBool obj "open" val++constructDOMHTMLDetailsElementOpen :: Bool -> IO ([Char], GValue)+constructDOMHTMLDetailsElementOpen val = constructObjectPropertyBool "open" val++data DOMHTMLDetailsElementOpenPropertyInfo+instance AttrInfo DOMHTMLDetailsElementOpenPropertyInfo where+ type AttrAllowedOps DOMHTMLDetailsElementOpenPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDetailsElementOpenPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLDetailsElementOpenPropertyInfo = DOMHTMLDetailsElementK+ type AttrGetType DOMHTMLDetailsElementOpenPropertyInfo = Bool+ type AttrLabel DOMHTMLDetailsElementOpenPropertyInfo = "DOMHTMLDetailsElement::open"+ attrGet _ = getDOMHTMLDetailsElementOpen+ attrSet _ = setDOMHTMLDetailsElementOpen+ attrConstruct _ = constructDOMHTMLDetailsElementOpen++type instance AttributeList DOMHTMLDetailsElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("open", DOMHTMLDetailsElementOpenPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "compact"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLDirectoryElementCompact :: (MonadIO m, DOMHTMLDirectoryElementK o) => o -> m Bool+getDOMHTMLDirectoryElementCompact obj = liftIO $ getObjectPropertyBool obj "compact"++setDOMHTMLDirectoryElementCompact :: (MonadIO m, DOMHTMLDirectoryElementK o) => o -> Bool -> m ()+setDOMHTMLDirectoryElementCompact obj val = liftIO $ setObjectPropertyBool obj "compact" val++constructDOMHTMLDirectoryElementCompact :: Bool -> IO ([Char], GValue)+constructDOMHTMLDirectoryElementCompact val = constructObjectPropertyBool "compact" val++data DOMHTMLDirectoryElementCompactPropertyInfo+instance AttrInfo DOMHTMLDirectoryElementCompactPropertyInfo where+ type AttrAllowedOps DOMHTMLDirectoryElementCompactPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDirectoryElementCompactPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLDirectoryElementCompactPropertyInfo = DOMHTMLDirectoryElementK+ type AttrGetType DOMHTMLDirectoryElementCompactPropertyInfo = Bool+ type AttrLabel DOMHTMLDirectoryElementCompactPropertyInfo = "DOMHTMLDirectoryElement::compact"+ attrGet _ = getDOMHTMLDirectoryElementCompact+ attrSet _ = setDOMHTMLDirectoryElementCompact+ attrConstruct _ = constructDOMHTMLDirectoryElementCompact++type instance AttributeList DOMHTMLDirectoryElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("compact", DOMHTMLDirectoryElementCompactPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLDivElementAlign :: (MonadIO m, DOMHTMLDivElementK o) => o -> m T.Text+getDOMHTMLDivElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLDivElementAlign :: (MonadIO m, DOMHTMLDivElementK o) => o -> T.Text -> m ()+setDOMHTMLDivElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLDivElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLDivElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLDivElementAlignPropertyInfo+instance AttrInfo DOMHTMLDivElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLDivElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDivElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLDivElementAlignPropertyInfo = DOMHTMLDivElementK+ type AttrGetType DOMHTMLDivElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLDivElementAlignPropertyInfo = "DOMHTMLDivElement::align"+ attrGet _ = getDOMHTMLDivElementAlign+ attrSet _ = setDOMHTMLDivElementAlign+ attrConstruct _ = constructDOMHTMLDivElementAlign++type instance AttributeList DOMHTMLDivElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLDivElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "active-element"+ -- Type: TInterface "WebKit" "DOMElement"+ -- Flags: [PropertyReadable]++getDOMHTMLDocumentActiveElement :: (MonadIO m, DOMHTMLDocumentK o) => o -> m DOMElement+getDOMHTMLDocumentActiveElement obj = liftIO $ getObjectPropertyObject obj "active-element" DOMElement++data DOMHTMLDocumentActiveElementPropertyInfo+instance AttrInfo DOMHTMLDocumentActiveElementPropertyInfo where+ type AttrAllowedOps DOMHTMLDocumentActiveElementPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDocumentActiveElementPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLDocumentActiveElementPropertyInfo = DOMHTMLDocumentK+ type AttrGetType DOMHTMLDocumentActiveElementPropertyInfo = DOMElement+ type AttrLabel DOMHTMLDocumentActiveElementPropertyInfo = "DOMHTMLDocument::active-element"+ attrGet _ = getDOMHTMLDocumentActiveElement+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "alink-color"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLDocumentAlinkColor :: (MonadIO m, DOMHTMLDocumentK o) => o -> m T.Text+getDOMHTMLDocumentAlinkColor obj = liftIO $ getObjectPropertyString obj "alink-color"++setDOMHTMLDocumentAlinkColor :: (MonadIO m, DOMHTMLDocumentK o) => o -> T.Text -> m ()+setDOMHTMLDocumentAlinkColor obj val = liftIO $ setObjectPropertyString obj "alink-color" val++constructDOMHTMLDocumentAlinkColor :: T.Text -> IO ([Char], GValue)+constructDOMHTMLDocumentAlinkColor val = constructObjectPropertyString "alink-color" val++data DOMHTMLDocumentAlinkColorPropertyInfo+instance AttrInfo DOMHTMLDocumentAlinkColorPropertyInfo where+ type AttrAllowedOps DOMHTMLDocumentAlinkColorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDocumentAlinkColorPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLDocumentAlinkColorPropertyInfo = DOMHTMLDocumentK+ type AttrGetType DOMHTMLDocumentAlinkColorPropertyInfo = T.Text+ type AttrLabel DOMHTMLDocumentAlinkColorPropertyInfo = "DOMHTMLDocument::alink-color"+ attrGet _ = getDOMHTMLDocumentAlinkColor+ attrSet _ = setDOMHTMLDocumentAlinkColor+ attrConstruct _ = constructDOMHTMLDocumentAlinkColor++-- VVV Prop "bg-color"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLDocumentBgColor :: (MonadIO m, DOMHTMLDocumentK o) => o -> m T.Text+getDOMHTMLDocumentBgColor obj = liftIO $ getObjectPropertyString obj "bg-color"++setDOMHTMLDocumentBgColor :: (MonadIO m, DOMHTMLDocumentK o) => o -> T.Text -> m ()+setDOMHTMLDocumentBgColor obj val = liftIO $ setObjectPropertyString obj "bg-color" val++constructDOMHTMLDocumentBgColor :: T.Text -> IO ([Char], GValue)+constructDOMHTMLDocumentBgColor val = constructObjectPropertyString "bg-color" val++data DOMHTMLDocumentBgColorPropertyInfo+instance AttrInfo DOMHTMLDocumentBgColorPropertyInfo where+ type AttrAllowedOps DOMHTMLDocumentBgColorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDocumentBgColorPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLDocumentBgColorPropertyInfo = DOMHTMLDocumentK+ type AttrGetType DOMHTMLDocumentBgColorPropertyInfo = T.Text+ type AttrLabel DOMHTMLDocumentBgColorPropertyInfo = "DOMHTMLDocument::bg-color"+ attrGet _ = getDOMHTMLDocumentBgColor+ attrSet _ = setDOMHTMLDocumentBgColor+ attrConstruct _ = constructDOMHTMLDocumentBgColor++-- VVV Prop "compat-mode"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLDocumentCompatMode :: (MonadIO m, DOMHTMLDocumentK o) => o -> m T.Text+getDOMHTMLDocumentCompatMode obj = liftIO $ getObjectPropertyString obj "compat-mode"++data DOMHTMLDocumentCompatModePropertyInfo+instance AttrInfo DOMHTMLDocumentCompatModePropertyInfo where+ type AttrAllowedOps DOMHTMLDocumentCompatModePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDocumentCompatModePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLDocumentCompatModePropertyInfo = DOMHTMLDocumentK+ type AttrGetType DOMHTMLDocumentCompatModePropertyInfo = T.Text+ type AttrLabel DOMHTMLDocumentCompatModePropertyInfo = "DOMHTMLDocument::compat-mode"+ attrGet _ = getDOMHTMLDocumentCompatMode+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "design-mode"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLDocumentDesignMode :: (MonadIO m, DOMHTMLDocumentK o) => o -> m T.Text+getDOMHTMLDocumentDesignMode obj = liftIO $ getObjectPropertyString obj "design-mode"++setDOMHTMLDocumentDesignMode :: (MonadIO m, DOMHTMLDocumentK o) => o -> T.Text -> m ()+setDOMHTMLDocumentDesignMode obj val = liftIO $ setObjectPropertyString obj "design-mode" val++constructDOMHTMLDocumentDesignMode :: T.Text -> IO ([Char], GValue)+constructDOMHTMLDocumentDesignMode val = constructObjectPropertyString "design-mode" val++data DOMHTMLDocumentDesignModePropertyInfo+instance AttrInfo DOMHTMLDocumentDesignModePropertyInfo where+ type AttrAllowedOps DOMHTMLDocumentDesignModePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDocumentDesignModePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLDocumentDesignModePropertyInfo = DOMHTMLDocumentK+ type AttrGetType DOMHTMLDocumentDesignModePropertyInfo = T.Text+ type AttrLabel DOMHTMLDocumentDesignModePropertyInfo = "DOMHTMLDocument::design-mode"+ attrGet _ = getDOMHTMLDocumentDesignMode+ attrSet _ = setDOMHTMLDocumentDesignMode+ attrConstruct _ = constructDOMHTMLDocumentDesignMode++-- VVV Prop "dir"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLDocumentDir :: (MonadIO m, DOMHTMLDocumentK o) => o -> m T.Text+getDOMHTMLDocumentDir obj = liftIO $ getObjectPropertyString obj "dir"++setDOMHTMLDocumentDir :: (MonadIO m, DOMHTMLDocumentK o) => o -> T.Text -> m ()+setDOMHTMLDocumentDir obj val = liftIO $ setObjectPropertyString obj "dir" val++constructDOMHTMLDocumentDir :: T.Text -> IO ([Char], GValue)+constructDOMHTMLDocumentDir val = constructObjectPropertyString "dir" val++data DOMHTMLDocumentDirPropertyInfo+instance AttrInfo DOMHTMLDocumentDirPropertyInfo where+ type AttrAllowedOps DOMHTMLDocumentDirPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDocumentDirPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLDocumentDirPropertyInfo = DOMHTMLDocumentK+ type AttrGetType DOMHTMLDocumentDirPropertyInfo = T.Text+ type AttrLabel DOMHTMLDocumentDirPropertyInfo = "DOMHTMLDocument::dir"+ attrGet _ = getDOMHTMLDocumentDir+ attrSet _ = setDOMHTMLDocumentDir+ attrConstruct _ = constructDOMHTMLDocumentDir++-- VVV Prop "embeds"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMHTMLDocumentEmbeds :: (MonadIO m, DOMHTMLDocumentK o) => o -> m DOMHTMLCollection+getDOMHTMLDocumentEmbeds obj = liftIO $ getObjectPropertyObject obj "embeds" DOMHTMLCollection++data DOMHTMLDocumentEmbedsPropertyInfo+instance AttrInfo DOMHTMLDocumentEmbedsPropertyInfo where+ type AttrAllowedOps DOMHTMLDocumentEmbedsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDocumentEmbedsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLDocumentEmbedsPropertyInfo = DOMHTMLDocumentK+ type AttrGetType DOMHTMLDocumentEmbedsPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMHTMLDocumentEmbedsPropertyInfo = "DOMHTMLDocument::embeds"+ attrGet _ = getDOMHTMLDocumentEmbeds+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "fg-color"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLDocumentFgColor :: (MonadIO m, DOMHTMLDocumentK o) => o -> m T.Text+getDOMHTMLDocumentFgColor obj = liftIO $ getObjectPropertyString obj "fg-color"++setDOMHTMLDocumentFgColor :: (MonadIO m, DOMHTMLDocumentK o) => o -> T.Text -> m ()+setDOMHTMLDocumentFgColor obj val = liftIO $ setObjectPropertyString obj "fg-color" val++constructDOMHTMLDocumentFgColor :: T.Text -> IO ([Char], GValue)+constructDOMHTMLDocumentFgColor val = constructObjectPropertyString "fg-color" val++data DOMHTMLDocumentFgColorPropertyInfo+instance AttrInfo DOMHTMLDocumentFgColorPropertyInfo where+ type AttrAllowedOps DOMHTMLDocumentFgColorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDocumentFgColorPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLDocumentFgColorPropertyInfo = DOMHTMLDocumentK+ type AttrGetType DOMHTMLDocumentFgColorPropertyInfo = T.Text+ type AttrLabel DOMHTMLDocumentFgColorPropertyInfo = "DOMHTMLDocument::fg-color"+ attrGet _ = getDOMHTMLDocumentFgColor+ attrSet _ = setDOMHTMLDocumentFgColor+ attrConstruct _ = constructDOMHTMLDocumentFgColor++-- VVV Prop "height"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMHTMLDocumentHeight :: (MonadIO m, DOMHTMLDocumentK o) => o -> m Int64+getDOMHTMLDocumentHeight obj = liftIO $ getObjectPropertyInt64 obj "height"++data DOMHTMLDocumentHeightPropertyInfo+instance AttrInfo DOMHTMLDocumentHeightPropertyInfo where+ type AttrAllowedOps DOMHTMLDocumentHeightPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDocumentHeightPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLDocumentHeightPropertyInfo = DOMHTMLDocumentK+ type AttrGetType DOMHTMLDocumentHeightPropertyInfo = Int64+ type AttrLabel DOMHTMLDocumentHeightPropertyInfo = "DOMHTMLDocument::height"+ attrGet _ = getDOMHTMLDocumentHeight+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "link-color"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLDocumentLinkColor :: (MonadIO m, DOMHTMLDocumentK o) => o -> m T.Text+getDOMHTMLDocumentLinkColor obj = liftIO $ getObjectPropertyString obj "link-color"++setDOMHTMLDocumentLinkColor :: (MonadIO m, DOMHTMLDocumentK o) => o -> T.Text -> m ()+setDOMHTMLDocumentLinkColor obj val = liftIO $ setObjectPropertyString obj "link-color" val++constructDOMHTMLDocumentLinkColor :: T.Text -> IO ([Char], GValue)+constructDOMHTMLDocumentLinkColor val = constructObjectPropertyString "link-color" val++data DOMHTMLDocumentLinkColorPropertyInfo+instance AttrInfo DOMHTMLDocumentLinkColorPropertyInfo where+ type AttrAllowedOps DOMHTMLDocumentLinkColorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDocumentLinkColorPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLDocumentLinkColorPropertyInfo = DOMHTMLDocumentK+ type AttrGetType DOMHTMLDocumentLinkColorPropertyInfo = T.Text+ type AttrLabel DOMHTMLDocumentLinkColorPropertyInfo = "DOMHTMLDocument::link-color"+ attrGet _ = getDOMHTMLDocumentLinkColor+ attrSet _ = setDOMHTMLDocumentLinkColor+ attrConstruct _ = constructDOMHTMLDocumentLinkColor++-- VVV Prop "plugins"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMHTMLDocumentPlugins :: (MonadIO m, DOMHTMLDocumentK o) => o -> m DOMHTMLCollection+getDOMHTMLDocumentPlugins obj = liftIO $ getObjectPropertyObject obj "plugins" DOMHTMLCollection++data DOMHTMLDocumentPluginsPropertyInfo+instance AttrInfo DOMHTMLDocumentPluginsPropertyInfo where+ type AttrAllowedOps DOMHTMLDocumentPluginsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDocumentPluginsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLDocumentPluginsPropertyInfo = DOMHTMLDocumentK+ type AttrGetType DOMHTMLDocumentPluginsPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMHTMLDocumentPluginsPropertyInfo = "DOMHTMLDocument::plugins"+ attrGet _ = getDOMHTMLDocumentPlugins+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "scripts"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMHTMLDocumentScripts :: (MonadIO m, DOMHTMLDocumentK o) => o -> m DOMHTMLCollection+getDOMHTMLDocumentScripts obj = liftIO $ getObjectPropertyObject obj "scripts" DOMHTMLCollection++data DOMHTMLDocumentScriptsPropertyInfo+instance AttrInfo DOMHTMLDocumentScriptsPropertyInfo where+ type AttrAllowedOps DOMHTMLDocumentScriptsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDocumentScriptsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLDocumentScriptsPropertyInfo = DOMHTMLDocumentK+ type AttrGetType DOMHTMLDocumentScriptsPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMHTMLDocumentScriptsPropertyInfo = "DOMHTMLDocument::scripts"+ attrGet _ = getDOMHTMLDocumentScripts+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "vlink-color"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLDocumentVlinkColor :: (MonadIO m, DOMHTMLDocumentK o) => o -> m T.Text+getDOMHTMLDocumentVlinkColor obj = liftIO $ getObjectPropertyString obj "vlink-color"++setDOMHTMLDocumentVlinkColor :: (MonadIO m, DOMHTMLDocumentK o) => o -> T.Text -> m ()+setDOMHTMLDocumentVlinkColor obj val = liftIO $ setObjectPropertyString obj "vlink-color" val++constructDOMHTMLDocumentVlinkColor :: T.Text -> IO ([Char], GValue)+constructDOMHTMLDocumentVlinkColor val = constructObjectPropertyString "vlink-color" val++data DOMHTMLDocumentVlinkColorPropertyInfo+instance AttrInfo DOMHTMLDocumentVlinkColorPropertyInfo where+ type AttrAllowedOps DOMHTMLDocumentVlinkColorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDocumentVlinkColorPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLDocumentVlinkColorPropertyInfo = DOMHTMLDocumentK+ type AttrGetType DOMHTMLDocumentVlinkColorPropertyInfo = T.Text+ type AttrLabel DOMHTMLDocumentVlinkColorPropertyInfo = "DOMHTMLDocument::vlink-color"+ attrGet _ = getDOMHTMLDocumentVlinkColor+ attrSet _ = setDOMHTMLDocumentVlinkColor+ attrConstruct _ = constructDOMHTMLDocumentVlinkColor++-- VVV Prop "width"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMHTMLDocumentWidth :: (MonadIO m, DOMHTMLDocumentK o) => o -> m Int64+getDOMHTMLDocumentWidth obj = liftIO $ getObjectPropertyInt64 obj "width"++data DOMHTMLDocumentWidthPropertyInfo+instance AttrInfo DOMHTMLDocumentWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLDocumentWidthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLDocumentWidthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLDocumentWidthPropertyInfo = DOMHTMLDocumentK+ type AttrGetType DOMHTMLDocumentWidthPropertyInfo = Int64+ type AttrLabel DOMHTMLDocumentWidthPropertyInfo = "DOMHTMLDocument::width"+ attrGet _ = getDOMHTMLDocumentWidth+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMHTMLDocument = '[ '("active-element", DOMHTMLDocumentActiveElementPropertyInfo), '("alink-color", DOMHTMLDocumentAlinkColorPropertyInfo), '("anchors", DOMDocumentAnchorsPropertyInfo), '("applets", DOMDocumentAppletsPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("bg-color", DOMHTMLDocumentBgColorPropertyInfo), '("body", DOMDocumentBodyPropertyInfo), '("character-set", DOMDocumentCharacterSetPropertyInfo), '("charset", DOMDocumentCharsetPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("compat-mode", DOMHTMLDocumentCompatModePropertyInfo), '("cookie", DOMDocumentCookiePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-script", DOMDocumentCurrentScriptPropertyInfo), '("default-charset", DOMDocumentDefaultCharsetPropertyInfo), '("default-view", DOMDocumentDefaultViewPropertyInfo), '("design-mode", DOMHTMLDocumentDesignModePropertyInfo), '("dir", DOMHTMLDocumentDirPropertyInfo), '("doctype", DOMDocumentDoctypePropertyInfo), '("document-element", DOMDocumentDocumentElementPropertyInfo), '("document-uri", DOMDocumentDocumentUriPropertyInfo), '("domain", DOMDocumentDomainPropertyInfo), '("embeds", DOMHTMLDocumentEmbedsPropertyInfo), '("fg-color", DOMHTMLDocumentFgColorPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("forms", DOMDocumentFormsPropertyInfo), '("head", DOMDocumentHeadPropertyInfo), '("height", DOMHTMLDocumentHeightPropertyInfo), '("hidden", DOMDocumentHiddenPropertyInfo), '("images", DOMDocumentImagesPropertyInfo), '("implementation", DOMDocumentImplementationPropertyInfo), '("input-encoding", DOMDocumentInputEncodingPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-modified", DOMDocumentLastModifiedPropertyInfo), '("link-color", DOMHTMLDocumentLinkColorPropertyInfo), '("links", DOMDocumentLinksPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("plugins", DOMHTMLDocumentPluginsPropertyInfo), '("preferred-stylesheet-set", DOMDocumentPreferredStylesheetSetPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("ready-state", DOMDocumentReadyStatePropertyInfo), '("referrer", DOMDocumentReferrerPropertyInfo), '("scripts", DOMHTMLDocumentScriptsPropertyInfo), '("security-policy", DOMDocumentSecurityPolicyPropertyInfo), '("selected-stylesheet-set", DOMDocumentSelectedStylesheetSetPropertyInfo), '("style-sheets", DOMDocumentStyleSheetsPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMDocumentTitlePropertyInfo), '("url", DOMDocumentUrlPropertyInfo), '("visibility-state", DOMDocumentVisibilityStatePropertyInfo), '("vlink-color", DOMHTMLDocumentVlinkColorPropertyInfo), '("webkit-current-full-screen-element", DOMDocumentWebkitCurrentFullScreenElementPropertyInfo), '("webkit-full-screen-keyboard-input-allowed", DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo), '("webkit-fullscreen-element", DOMDocumentWebkitFullscreenElementPropertyInfo), '("webkit-fullscreen-enabled", DOMDocumentWebkitFullscreenEnabledPropertyInfo), '("webkit-is-full-screen", DOMDocumentWebkitIsFullScreenPropertyInfo), '("webkit-pointer-lock-element", DOMDocumentWebkitPointerLockElementPropertyInfo), '("width", DOMHTMLDocumentWidthPropertyInfo), '("xml-encoding", DOMDocumentXmlEncodingPropertyInfo), '("xml-standalone", DOMDocumentXmlStandalonePropertyInfo), '("xml-version", DOMDocumentXmlVersionPropertyInfo)]++-- VVV Prop "access-key"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLElementAccessKey :: (MonadIO m, DOMHTMLElementK o) => o -> m T.Text+getDOMHTMLElementAccessKey obj = liftIO $ getObjectPropertyString obj "access-key"++setDOMHTMLElementAccessKey :: (MonadIO m, DOMHTMLElementK o) => o -> T.Text -> m ()+setDOMHTMLElementAccessKey obj val = liftIO $ setObjectPropertyString obj "access-key" val++constructDOMHTMLElementAccessKey :: T.Text -> IO ([Char], GValue)+constructDOMHTMLElementAccessKey val = constructObjectPropertyString "access-key" val++data DOMHTMLElementAccessKeyPropertyInfo+instance AttrInfo DOMHTMLElementAccessKeyPropertyInfo where+ type AttrAllowedOps DOMHTMLElementAccessKeyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementAccessKeyPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLElementAccessKeyPropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementAccessKeyPropertyInfo = T.Text+ type AttrLabel DOMHTMLElementAccessKeyPropertyInfo = "DOMHTMLElement::access-key"+ attrGet _ = getDOMHTMLElementAccessKey+ attrSet _ = setDOMHTMLElementAccessKey+ attrConstruct _ = constructDOMHTMLElementAccessKey++-- VVV Prop "children"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMHTMLElementChildren :: (MonadIO m, DOMHTMLElementK o) => o -> m DOMHTMLCollection+getDOMHTMLElementChildren obj = liftIO $ getObjectPropertyObject obj "children" DOMHTMLCollection++data DOMHTMLElementChildrenPropertyInfo+instance AttrInfo DOMHTMLElementChildrenPropertyInfo where+ type AttrAllowedOps DOMHTMLElementChildrenPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementChildrenPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLElementChildrenPropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementChildrenPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMHTMLElementChildrenPropertyInfo = "DOMHTMLElement::children"+ attrGet _ = getDOMHTMLElementChildren+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "content-editable"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLElementContentEditable :: (MonadIO m, DOMHTMLElementK o) => o -> m T.Text+getDOMHTMLElementContentEditable obj = liftIO $ getObjectPropertyString obj "content-editable"++setDOMHTMLElementContentEditable :: (MonadIO m, DOMHTMLElementK o) => o -> T.Text -> m ()+setDOMHTMLElementContentEditable obj val = liftIO $ setObjectPropertyString obj "content-editable" val++constructDOMHTMLElementContentEditable :: T.Text -> IO ([Char], GValue)+constructDOMHTMLElementContentEditable val = constructObjectPropertyString "content-editable" val++data DOMHTMLElementContentEditablePropertyInfo+instance AttrInfo DOMHTMLElementContentEditablePropertyInfo where+ type AttrAllowedOps DOMHTMLElementContentEditablePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementContentEditablePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLElementContentEditablePropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementContentEditablePropertyInfo = T.Text+ type AttrLabel DOMHTMLElementContentEditablePropertyInfo = "DOMHTMLElement::content-editable"+ attrGet _ = getDOMHTMLElementContentEditable+ attrSet _ = setDOMHTMLElementContentEditable+ attrConstruct _ = constructDOMHTMLElementContentEditable++-- VVV Prop "dir"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLElementDir :: (MonadIO m, DOMHTMLElementK o) => o -> m T.Text+getDOMHTMLElementDir obj = liftIO $ getObjectPropertyString obj "dir"++setDOMHTMLElementDir :: (MonadIO m, DOMHTMLElementK o) => o -> T.Text -> m ()+setDOMHTMLElementDir obj val = liftIO $ setObjectPropertyString obj "dir" val++constructDOMHTMLElementDir :: T.Text -> IO ([Char], GValue)+constructDOMHTMLElementDir val = constructObjectPropertyString "dir" val++data DOMHTMLElementDirPropertyInfo+instance AttrInfo DOMHTMLElementDirPropertyInfo where+ type AttrAllowedOps DOMHTMLElementDirPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementDirPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLElementDirPropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementDirPropertyInfo = T.Text+ type AttrLabel DOMHTMLElementDirPropertyInfo = "DOMHTMLElement::dir"+ attrGet _ = getDOMHTMLElementDir+ attrSet _ = setDOMHTMLElementDir+ attrConstruct _ = constructDOMHTMLElementDir++-- VVV Prop "draggable"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLElementDraggable :: (MonadIO m, DOMHTMLElementK o) => o -> m Bool+getDOMHTMLElementDraggable obj = liftIO $ getObjectPropertyBool obj "draggable"++setDOMHTMLElementDraggable :: (MonadIO m, DOMHTMLElementK o) => o -> Bool -> m ()+setDOMHTMLElementDraggable obj val = liftIO $ setObjectPropertyBool obj "draggable" val++constructDOMHTMLElementDraggable :: Bool -> IO ([Char], GValue)+constructDOMHTMLElementDraggable val = constructObjectPropertyBool "draggable" val++data DOMHTMLElementDraggablePropertyInfo+instance AttrInfo DOMHTMLElementDraggablePropertyInfo where+ type AttrAllowedOps DOMHTMLElementDraggablePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementDraggablePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLElementDraggablePropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementDraggablePropertyInfo = Bool+ type AttrLabel DOMHTMLElementDraggablePropertyInfo = "DOMHTMLElement::draggable"+ attrGet _ = getDOMHTMLElementDraggable+ attrSet _ = setDOMHTMLElementDraggable+ attrConstruct _ = constructDOMHTMLElementDraggable++-- VVV Prop "hidden"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLElementHidden :: (MonadIO m, DOMHTMLElementK o) => o -> m Bool+getDOMHTMLElementHidden obj = liftIO $ getObjectPropertyBool obj "hidden"++setDOMHTMLElementHidden :: (MonadIO m, DOMHTMLElementK o) => o -> Bool -> m ()+setDOMHTMLElementHidden obj val = liftIO $ setObjectPropertyBool obj "hidden" val++constructDOMHTMLElementHidden :: Bool -> IO ([Char], GValue)+constructDOMHTMLElementHidden val = constructObjectPropertyBool "hidden" val++data DOMHTMLElementHiddenPropertyInfo+instance AttrInfo DOMHTMLElementHiddenPropertyInfo where+ type AttrAllowedOps DOMHTMLElementHiddenPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementHiddenPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLElementHiddenPropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementHiddenPropertyInfo = Bool+ type AttrLabel DOMHTMLElementHiddenPropertyInfo = "DOMHTMLElement::hidden"+ attrGet _ = getDOMHTMLElementHidden+ attrSet _ = setDOMHTMLElementHidden+ attrConstruct _ = constructDOMHTMLElementHidden++-- VVV Prop "inner-html"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLElementInnerHtml :: (MonadIO m, DOMHTMLElementK o) => o -> m T.Text+getDOMHTMLElementInnerHtml obj = liftIO $ getObjectPropertyString obj "inner-html"++setDOMHTMLElementInnerHtml :: (MonadIO m, DOMHTMLElementK o) => o -> T.Text -> m ()+setDOMHTMLElementInnerHtml obj val = liftIO $ setObjectPropertyString obj "inner-html" val++constructDOMHTMLElementInnerHtml :: T.Text -> IO ([Char], GValue)+constructDOMHTMLElementInnerHtml val = constructObjectPropertyString "inner-html" val++data DOMHTMLElementInnerHtmlPropertyInfo+instance AttrInfo DOMHTMLElementInnerHtmlPropertyInfo where+ type AttrAllowedOps DOMHTMLElementInnerHtmlPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementInnerHtmlPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLElementInnerHtmlPropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementInnerHtmlPropertyInfo = T.Text+ type AttrLabel DOMHTMLElementInnerHtmlPropertyInfo = "DOMHTMLElement::inner-html"+ attrGet _ = getDOMHTMLElementInnerHtml+ attrSet _ = setDOMHTMLElementInnerHtml+ attrConstruct _ = constructDOMHTMLElementInnerHtml++-- VVV Prop "inner-text"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLElementInnerText :: (MonadIO m, DOMHTMLElementK o) => o -> m T.Text+getDOMHTMLElementInnerText obj = liftIO $ getObjectPropertyString obj "inner-text"++setDOMHTMLElementInnerText :: (MonadIO m, DOMHTMLElementK o) => o -> T.Text -> m ()+setDOMHTMLElementInnerText obj val = liftIO $ setObjectPropertyString obj "inner-text" val++constructDOMHTMLElementInnerText :: T.Text -> IO ([Char], GValue)+constructDOMHTMLElementInnerText val = constructObjectPropertyString "inner-text" val++data DOMHTMLElementInnerTextPropertyInfo+instance AttrInfo DOMHTMLElementInnerTextPropertyInfo where+ type AttrAllowedOps DOMHTMLElementInnerTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementInnerTextPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLElementInnerTextPropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementInnerTextPropertyInfo = T.Text+ type AttrLabel DOMHTMLElementInnerTextPropertyInfo = "DOMHTMLElement::inner-text"+ attrGet _ = getDOMHTMLElementInnerText+ attrSet _ = setDOMHTMLElementInnerText+ attrConstruct _ = constructDOMHTMLElementInnerText++-- VVV Prop "is-content-editable"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMHTMLElementIsContentEditable :: (MonadIO m, DOMHTMLElementK o) => o -> m Bool+getDOMHTMLElementIsContentEditable obj = liftIO $ getObjectPropertyBool obj "is-content-editable"++data DOMHTMLElementIsContentEditablePropertyInfo+instance AttrInfo DOMHTMLElementIsContentEditablePropertyInfo where+ type AttrAllowedOps DOMHTMLElementIsContentEditablePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementIsContentEditablePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLElementIsContentEditablePropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementIsContentEditablePropertyInfo = Bool+ type AttrLabel DOMHTMLElementIsContentEditablePropertyInfo = "DOMHTMLElement::is-content-editable"+ attrGet _ = getDOMHTMLElementIsContentEditable+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "lang"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLElementLang :: (MonadIO m, DOMHTMLElementK o) => o -> m T.Text+getDOMHTMLElementLang obj = liftIO $ getObjectPropertyString obj "lang"++setDOMHTMLElementLang :: (MonadIO m, DOMHTMLElementK o) => o -> T.Text -> m ()+setDOMHTMLElementLang obj val = liftIO $ setObjectPropertyString obj "lang" val++constructDOMHTMLElementLang :: T.Text -> IO ([Char], GValue)+constructDOMHTMLElementLang val = constructObjectPropertyString "lang" val++data DOMHTMLElementLangPropertyInfo+instance AttrInfo DOMHTMLElementLangPropertyInfo where+ type AttrAllowedOps DOMHTMLElementLangPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementLangPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLElementLangPropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementLangPropertyInfo = T.Text+ type AttrLabel DOMHTMLElementLangPropertyInfo = "DOMHTMLElement::lang"+ attrGet _ = getDOMHTMLElementLang+ attrSet _ = setDOMHTMLElementLang+ attrConstruct _ = constructDOMHTMLElementLang++-- VVV Prop "outer-html"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLElementOuterHtml :: (MonadIO m, DOMHTMLElementK o) => o -> m T.Text+getDOMHTMLElementOuterHtml obj = liftIO $ getObjectPropertyString obj "outer-html"++setDOMHTMLElementOuterHtml :: (MonadIO m, DOMHTMLElementK o) => o -> T.Text -> m ()+setDOMHTMLElementOuterHtml obj val = liftIO $ setObjectPropertyString obj "outer-html" val++constructDOMHTMLElementOuterHtml :: T.Text -> IO ([Char], GValue)+constructDOMHTMLElementOuterHtml val = constructObjectPropertyString "outer-html" val++data DOMHTMLElementOuterHtmlPropertyInfo+instance AttrInfo DOMHTMLElementOuterHtmlPropertyInfo where+ type AttrAllowedOps DOMHTMLElementOuterHtmlPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementOuterHtmlPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLElementOuterHtmlPropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementOuterHtmlPropertyInfo = T.Text+ type AttrLabel DOMHTMLElementOuterHtmlPropertyInfo = "DOMHTMLElement::outer-html"+ attrGet _ = getDOMHTMLElementOuterHtml+ attrSet _ = setDOMHTMLElementOuterHtml+ attrConstruct _ = constructDOMHTMLElementOuterHtml++-- VVV Prop "outer-text"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLElementOuterText :: (MonadIO m, DOMHTMLElementK o) => o -> m T.Text+getDOMHTMLElementOuterText obj = liftIO $ getObjectPropertyString obj "outer-text"++setDOMHTMLElementOuterText :: (MonadIO m, DOMHTMLElementK o) => o -> T.Text -> m ()+setDOMHTMLElementOuterText obj val = liftIO $ setObjectPropertyString obj "outer-text" val++constructDOMHTMLElementOuterText :: T.Text -> IO ([Char], GValue)+constructDOMHTMLElementOuterText val = constructObjectPropertyString "outer-text" val++data DOMHTMLElementOuterTextPropertyInfo+instance AttrInfo DOMHTMLElementOuterTextPropertyInfo where+ type AttrAllowedOps DOMHTMLElementOuterTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementOuterTextPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLElementOuterTextPropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementOuterTextPropertyInfo = T.Text+ type AttrLabel DOMHTMLElementOuterTextPropertyInfo = "DOMHTMLElement::outer-text"+ attrGet _ = getDOMHTMLElementOuterText+ attrSet _ = setDOMHTMLElementOuterText+ attrConstruct _ = constructDOMHTMLElementOuterText++-- VVV Prop "spellcheck"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLElementSpellcheck :: (MonadIO m, DOMHTMLElementK o) => o -> m Bool+getDOMHTMLElementSpellcheck obj = liftIO $ getObjectPropertyBool obj "spellcheck"++setDOMHTMLElementSpellcheck :: (MonadIO m, DOMHTMLElementK o) => o -> Bool -> m ()+setDOMHTMLElementSpellcheck obj val = liftIO $ setObjectPropertyBool obj "spellcheck" val++constructDOMHTMLElementSpellcheck :: Bool -> IO ([Char], GValue)+constructDOMHTMLElementSpellcheck val = constructObjectPropertyBool "spellcheck" val++data DOMHTMLElementSpellcheckPropertyInfo+instance AttrInfo DOMHTMLElementSpellcheckPropertyInfo where+ type AttrAllowedOps DOMHTMLElementSpellcheckPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementSpellcheckPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLElementSpellcheckPropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementSpellcheckPropertyInfo = Bool+ type AttrLabel DOMHTMLElementSpellcheckPropertyInfo = "DOMHTMLElement::spellcheck"+ attrGet _ = getDOMHTMLElementSpellcheck+ attrSet _ = setDOMHTMLElementSpellcheck+ attrConstruct _ = constructDOMHTMLElementSpellcheck++-- VVV Prop "tab-index"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLElementTabIndex :: (MonadIO m, DOMHTMLElementK o) => o -> m Int64+getDOMHTMLElementTabIndex obj = liftIO $ getObjectPropertyInt64 obj "tab-index"++setDOMHTMLElementTabIndex :: (MonadIO m, DOMHTMLElementK o) => o -> Int64 -> m ()+setDOMHTMLElementTabIndex obj val = liftIO $ setObjectPropertyInt64 obj "tab-index" val++constructDOMHTMLElementTabIndex :: Int64 -> IO ([Char], GValue)+constructDOMHTMLElementTabIndex val = constructObjectPropertyInt64 "tab-index" val++data DOMHTMLElementTabIndexPropertyInfo+instance AttrInfo DOMHTMLElementTabIndexPropertyInfo where+ type AttrAllowedOps DOMHTMLElementTabIndexPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementTabIndexPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLElementTabIndexPropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementTabIndexPropertyInfo = Int64+ type AttrLabel DOMHTMLElementTabIndexPropertyInfo = "DOMHTMLElement::tab-index"+ attrGet _ = getDOMHTMLElementTabIndex+ attrSet _ = setDOMHTMLElementTabIndex+ attrConstruct _ = constructDOMHTMLElementTabIndex++-- VVV Prop "title"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLElementTitle :: (MonadIO m, DOMHTMLElementK o) => o -> m T.Text+getDOMHTMLElementTitle obj = liftIO $ getObjectPropertyString obj "title"++setDOMHTMLElementTitle :: (MonadIO m, DOMHTMLElementK o) => o -> T.Text -> m ()+setDOMHTMLElementTitle obj val = liftIO $ setObjectPropertyString obj "title" val++constructDOMHTMLElementTitle :: T.Text -> IO ([Char], GValue)+constructDOMHTMLElementTitle val = constructObjectPropertyString "title" val++data DOMHTMLElementTitlePropertyInfo+instance AttrInfo DOMHTMLElementTitlePropertyInfo where+ type AttrAllowedOps DOMHTMLElementTitlePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementTitlePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLElementTitlePropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementTitlePropertyInfo = T.Text+ type AttrLabel DOMHTMLElementTitlePropertyInfo = "DOMHTMLElement::title"+ attrGet _ = getDOMHTMLElementTitle+ attrSet _ = setDOMHTMLElementTitle+ attrConstruct _ = constructDOMHTMLElementTitle++-- VVV Prop "translate"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLElementTranslate :: (MonadIO m, DOMHTMLElementK o) => o -> m Bool+getDOMHTMLElementTranslate obj = liftIO $ getObjectPropertyBool obj "translate"++setDOMHTMLElementTranslate :: (MonadIO m, DOMHTMLElementK o) => o -> Bool -> m ()+setDOMHTMLElementTranslate obj val = liftIO $ setObjectPropertyBool obj "translate" val++constructDOMHTMLElementTranslate :: Bool -> IO ([Char], GValue)+constructDOMHTMLElementTranslate val = constructObjectPropertyBool "translate" val++data DOMHTMLElementTranslatePropertyInfo+instance AttrInfo DOMHTMLElementTranslatePropertyInfo where+ type AttrAllowedOps DOMHTMLElementTranslatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementTranslatePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLElementTranslatePropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementTranslatePropertyInfo = Bool+ type AttrLabel DOMHTMLElementTranslatePropertyInfo = "DOMHTMLElement::translate"+ attrGet _ = getDOMHTMLElementTranslate+ attrSet _ = setDOMHTMLElementTranslate+ attrConstruct _ = constructDOMHTMLElementTranslate++-- VVV Prop "webkitdropzone"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLElementWebkitdropzone :: (MonadIO m, DOMHTMLElementK o) => o -> m T.Text+getDOMHTMLElementWebkitdropzone obj = liftIO $ getObjectPropertyString obj "webkitdropzone"++setDOMHTMLElementWebkitdropzone :: (MonadIO m, DOMHTMLElementK o) => o -> T.Text -> m ()+setDOMHTMLElementWebkitdropzone obj val = liftIO $ setObjectPropertyString obj "webkitdropzone" val++constructDOMHTMLElementWebkitdropzone :: T.Text -> IO ([Char], GValue)+constructDOMHTMLElementWebkitdropzone val = constructObjectPropertyString "webkitdropzone" val++data DOMHTMLElementWebkitdropzonePropertyInfo+instance AttrInfo DOMHTMLElementWebkitdropzonePropertyInfo where+ type AttrAllowedOps DOMHTMLElementWebkitdropzonePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLElementWebkitdropzonePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLElementWebkitdropzonePropertyInfo = DOMHTMLElementK+ type AttrGetType DOMHTMLElementWebkitdropzonePropertyInfo = T.Text+ type AttrLabel DOMHTMLElementWebkitdropzonePropertyInfo = "DOMHTMLElement::webkitdropzone"+ attrGet _ = getDOMHTMLElementWebkitdropzone+ attrSet _ = setDOMHTMLElementWebkitdropzone+ attrConstruct _ = constructDOMHTMLElementWebkitdropzone++type instance AttributeList DOMHTMLElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLEmbedElementAlign :: (MonadIO m, DOMHTMLEmbedElementK o) => o -> m T.Text+getDOMHTMLEmbedElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLEmbedElementAlign :: (MonadIO m, DOMHTMLEmbedElementK o) => o -> T.Text -> m ()+setDOMHTMLEmbedElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLEmbedElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLEmbedElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLEmbedElementAlignPropertyInfo+instance AttrInfo DOMHTMLEmbedElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLEmbedElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLEmbedElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLEmbedElementAlignPropertyInfo = DOMHTMLEmbedElementK+ type AttrGetType DOMHTMLEmbedElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLEmbedElementAlignPropertyInfo = "DOMHTMLEmbedElement::align"+ attrGet _ = getDOMHTMLEmbedElementAlign+ attrSet _ = setDOMHTMLEmbedElementAlign+ attrConstruct _ = constructDOMHTMLEmbedElementAlign++-- VVV Prop "height"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLEmbedElementHeight :: (MonadIO m, DOMHTMLEmbedElementK o) => o -> m Int64+getDOMHTMLEmbedElementHeight obj = liftIO $ getObjectPropertyInt64 obj "height"++setDOMHTMLEmbedElementHeight :: (MonadIO m, DOMHTMLEmbedElementK o) => o -> Int64 -> m ()+setDOMHTMLEmbedElementHeight obj val = liftIO $ setObjectPropertyInt64 obj "height" val++constructDOMHTMLEmbedElementHeight :: Int64 -> IO ([Char], GValue)+constructDOMHTMLEmbedElementHeight val = constructObjectPropertyInt64 "height" val++data DOMHTMLEmbedElementHeightPropertyInfo+instance AttrInfo DOMHTMLEmbedElementHeightPropertyInfo where+ type AttrAllowedOps DOMHTMLEmbedElementHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLEmbedElementHeightPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLEmbedElementHeightPropertyInfo = DOMHTMLEmbedElementK+ type AttrGetType DOMHTMLEmbedElementHeightPropertyInfo = Int64+ type AttrLabel DOMHTMLEmbedElementHeightPropertyInfo = "DOMHTMLEmbedElement::height"+ attrGet _ = getDOMHTMLEmbedElementHeight+ attrSet _ = setDOMHTMLEmbedElementHeight+ attrConstruct _ = constructDOMHTMLEmbedElementHeight++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLEmbedElementName :: (MonadIO m, DOMHTMLEmbedElementK o) => o -> m T.Text+getDOMHTMLEmbedElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLEmbedElementName :: (MonadIO m, DOMHTMLEmbedElementK o) => o -> T.Text -> m ()+setDOMHTMLEmbedElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLEmbedElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLEmbedElementName val = constructObjectPropertyString "name" val++data DOMHTMLEmbedElementNamePropertyInfo+instance AttrInfo DOMHTMLEmbedElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLEmbedElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLEmbedElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLEmbedElementNamePropertyInfo = DOMHTMLEmbedElementK+ type AttrGetType DOMHTMLEmbedElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLEmbedElementNamePropertyInfo = "DOMHTMLEmbedElement::name"+ attrGet _ = getDOMHTMLEmbedElementName+ attrSet _ = setDOMHTMLEmbedElementName+ attrConstruct _ = constructDOMHTMLEmbedElementName++-- VVV Prop "src"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLEmbedElementSrc :: (MonadIO m, DOMHTMLEmbedElementK o) => o -> m T.Text+getDOMHTMLEmbedElementSrc obj = liftIO $ getObjectPropertyString obj "src"++setDOMHTMLEmbedElementSrc :: (MonadIO m, DOMHTMLEmbedElementK o) => o -> T.Text -> m ()+setDOMHTMLEmbedElementSrc obj val = liftIO $ setObjectPropertyString obj "src" val++constructDOMHTMLEmbedElementSrc :: T.Text -> IO ([Char], GValue)+constructDOMHTMLEmbedElementSrc val = constructObjectPropertyString "src" val++data DOMHTMLEmbedElementSrcPropertyInfo+instance AttrInfo DOMHTMLEmbedElementSrcPropertyInfo where+ type AttrAllowedOps DOMHTMLEmbedElementSrcPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLEmbedElementSrcPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLEmbedElementSrcPropertyInfo = DOMHTMLEmbedElementK+ type AttrGetType DOMHTMLEmbedElementSrcPropertyInfo = T.Text+ type AttrLabel DOMHTMLEmbedElementSrcPropertyInfo = "DOMHTMLEmbedElement::src"+ attrGet _ = getDOMHTMLEmbedElementSrc+ attrSet _ = setDOMHTMLEmbedElementSrc+ attrConstruct _ = constructDOMHTMLEmbedElementSrc++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLEmbedElementType :: (MonadIO m, DOMHTMLEmbedElementK o) => o -> m T.Text+getDOMHTMLEmbedElementType obj = liftIO $ getObjectPropertyString obj "type"++setDOMHTMLEmbedElementType :: (MonadIO m, DOMHTMLEmbedElementK o) => o -> T.Text -> m ()+setDOMHTMLEmbedElementType obj val = liftIO $ setObjectPropertyString obj "type" val++constructDOMHTMLEmbedElementType :: T.Text -> IO ([Char], GValue)+constructDOMHTMLEmbedElementType val = constructObjectPropertyString "type" val++data DOMHTMLEmbedElementTypePropertyInfo+instance AttrInfo DOMHTMLEmbedElementTypePropertyInfo where+ type AttrAllowedOps DOMHTMLEmbedElementTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLEmbedElementTypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLEmbedElementTypePropertyInfo = DOMHTMLEmbedElementK+ type AttrGetType DOMHTMLEmbedElementTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLEmbedElementTypePropertyInfo = "DOMHTMLEmbedElement::type"+ attrGet _ = getDOMHTMLEmbedElementType+ attrSet _ = setDOMHTMLEmbedElementType+ attrConstruct _ = constructDOMHTMLEmbedElementType++-- VVV Prop "width"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLEmbedElementWidth :: (MonadIO m, DOMHTMLEmbedElementK o) => o -> m Int64+getDOMHTMLEmbedElementWidth obj = liftIO $ getObjectPropertyInt64 obj "width"++setDOMHTMLEmbedElementWidth :: (MonadIO m, DOMHTMLEmbedElementK o) => o -> Int64 -> m ()+setDOMHTMLEmbedElementWidth obj val = liftIO $ setObjectPropertyInt64 obj "width" val++constructDOMHTMLEmbedElementWidth :: Int64 -> IO ([Char], GValue)+constructDOMHTMLEmbedElementWidth val = constructObjectPropertyInt64 "width" val++data DOMHTMLEmbedElementWidthPropertyInfo+instance AttrInfo DOMHTMLEmbedElementWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLEmbedElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLEmbedElementWidthPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLEmbedElementWidthPropertyInfo = DOMHTMLEmbedElementK+ type AttrGetType DOMHTMLEmbedElementWidthPropertyInfo = Int64+ type AttrLabel DOMHTMLEmbedElementWidthPropertyInfo = "DOMHTMLEmbedElement::width"+ attrGet _ = getDOMHTMLEmbedElementWidth+ attrSet _ = setDOMHTMLEmbedElementWidth+ attrConstruct _ = constructDOMHTMLEmbedElementWidth++type instance AttributeList DOMHTMLEmbedElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLEmbedElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLEmbedElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLEmbedElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLEmbedElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLEmbedElementTypePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLEmbedElementWidthPropertyInfo)]++-- VVV Prop "disabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFieldSetElementDisabled :: (MonadIO m, DOMHTMLFieldSetElementK o) => o -> m Bool+getDOMHTMLFieldSetElementDisabled obj = liftIO $ getObjectPropertyBool obj "disabled"++setDOMHTMLFieldSetElementDisabled :: (MonadIO m, DOMHTMLFieldSetElementK o) => o -> Bool -> m ()+setDOMHTMLFieldSetElementDisabled obj val = liftIO $ setObjectPropertyBool obj "disabled" val++constructDOMHTMLFieldSetElementDisabled :: Bool -> IO ([Char], GValue)+constructDOMHTMLFieldSetElementDisabled val = constructObjectPropertyBool "disabled" val++data DOMHTMLFieldSetElementDisabledPropertyInfo+instance AttrInfo DOMHTMLFieldSetElementDisabledPropertyInfo where+ type AttrAllowedOps DOMHTMLFieldSetElementDisabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFieldSetElementDisabledPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLFieldSetElementDisabledPropertyInfo = DOMHTMLFieldSetElementK+ type AttrGetType DOMHTMLFieldSetElementDisabledPropertyInfo = Bool+ type AttrLabel DOMHTMLFieldSetElementDisabledPropertyInfo = "DOMHTMLFieldSetElement::disabled"+ attrGet _ = getDOMHTMLFieldSetElementDisabled+ attrSet _ = setDOMHTMLFieldSetElementDisabled+ attrConstruct _ = constructDOMHTMLFieldSetElementDisabled++-- VVV Prop "elements"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMHTMLFieldSetElementElements :: (MonadIO m, DOMHTMLFieldSetElementK o) => o -> m DOMHTMLCollection+getDOMHTMLFieldSetElementElements obj = liftIO $ getObjectPropertyObject obj "elements" DOMHTMLCollection++data DOMHTMLFieldSetElementElementsPropertyInfo+instance AttrInfo DOMHTMLFieldSetElementElementsPropertyInfo where+ type AttrAllowedOps DOMHTMLFieldSetElementElementsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFieldSetElementElementsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLFieldSetElementElementsPropertyInfo = DOMHTMLFieldSetElementK+ type AttrGetType DOMHTMLFieldSetElementElementsPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMHTMLFieldSetElementElementsPropertyInfo = "DOMHTMLFieldSetElement::elements"+ attrGet _ = getDOMHTMLFieldSetElementElements+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "form"+ -- Type: TInterface "WebKit" "DOMHTMLFormElement"+ -- Flags: [PropertyReadable]++getDOMHTMLFieldSetElementForm :: (MonadIO m, DOMHTMLFieldSetElementK o) => o -> m DOMHTMLFormElement+getDOMHTMLFieldSetElementForm obj = liftIO $ getObjectPropertyObject obj "form" DOMHTMLFormElement++data DOMHTMLFieldSetElementFormPropertyInfo+instance AttrInfo DOMHTMLFieldSetElementFormPropertyInfo where+ type AttrAllowedOps DOMHTMLFieldSetElementFormPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFieldSetElementFormPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLFieldSetElementFormPropertyInfo = DOMHTMLFieldSetElementK+ type AttrGetType DOMHTMLFieldSetElementFormPropertyInfo = DOMHTMLFormElement+ type AttrLabel DOMHTMLFieldSetElementFormPropertyInfo = "DOMHTMLFieldSetElement::form"+ attrGet _ = getDOMHTMLFieldSetElementForm+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFieldSetElementName :: (MonadIO m, DOMHTMLFieldSetElementK o) => o -> m T.Text+getDOMHTMLFieldSetElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLFieldSetElementName :: (MonadIO m, DOMHTMLFieldSetElementK o) => o -> T.Text -> m ()+setDOMHTMLFieldSetElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLFieldSetElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFieldSetElementName val = constructObjectPropertyString "name" val++data DOMHTMLFieldSetElementNamePropertyInfo+instance AttrInfo DOMHTMLFieldSetElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLFieldSetElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFieldSetElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFieldSetElementNamePropertyInfo = DOMHTMLFieldSetElementK+ type AttrGetType DOMHTMLFieldSetElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLFieldSetElementNamePropertyInfo = "DOMHTMLFieldSetElement::name"+ attrGet _ = getDOMHTMLFieldSetElementName+ attrSet _ = setDOMHTMLFieldSetElementName+ attrConstruct _ = constructDOMHTMLFieldSetElementName++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLFieldSetElementType :: (MonadIO m, DOMHTMLFieldSetElementK o) => o -> m T.Text+getDOMHTMLFieldSetElementType obj = liftIO $ getObjectPropertyString obj "type"++data DOMHTMLFieldSetElementTypePropertyInfo+instance AttrInfo DOMHTMLFieldSetElementTypePropertyInfo where+ type AttrAllowedOps DOMHTMLFieldSetElementTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFieldSetElementTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLFieldSetElementTypePropertyInfo = DOMHTMLFieldSetElementK+ type AttrGetType DOMHTMLFieldSetElementTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLFieldSetElementTypePropertyInfo = "DOMHTMLFieldSetElement::type"+ attrGet _ = getDOMHTMLFieldSetElementType+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "validation-message"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLFieldSetElementValidationMessage :: (MonadIO m, DOMHTMLFieldSetElementK o) => o -> m T.Text+getDOMHTMLFieldSetElementValidationMessage obj = liftIO $ getObjectPropertyString obj "validation-message"++data DOMHTMLFieldSetElementValidationMessagePropertyInfo+instance AttrInfo DOMHTMLFieldSetElementValidationMessagePropertyInfo where+ type AttrAllowedOps DOMHTMLFieldSetElementValidationMessagePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFieldSetElementValidationMessagePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLFieldSetElementValidationMessagePropertyInfo = DOMHTMLFieldSetElementK+ type AttrGetType DOMHTMLFieldSetElementValidationMessagePropertyInfo = T.Text+ type AttrLabel DOMHTMLFieldSetElementValidationMessagePropertyInfo = "DOMHTMLFieldSetElement::validation-message"+ attrGet _ = getDOMHTMLFieldSetElementValidationMessage+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "validity"+ -- Type: TInterface "WebKit" "DOMValidityState"+ -- Flags: [PropertyReadable]++getDOMHTMLFieldSetElementValidity :: (MonadIO m, DOMHTMLFieldSetElementK o) => o -> m DOMValidityState+getDOMHTMLFieldSetElementValidity obj = liftIO $ getObjectPropertyObject obj "validity" DOMValidityState++data DOMHTMLFieldSetElementValidityPropertyInfo+instance AttrInfo DOMHTMLFieldSetElementValidityPropertyInfo where+ type AttrAllowedOps DOMHTMLFieldSetElementValidityPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFieldSetElementValidityPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLFieldSetElementValidityPropertyInfo = DOMHTMLFieldSetElementK+ type AttrGetType DOMHTMLFieldSetElementValidityPropertyInfo = DOMValidityState+ type AttrLabel DOMHTMLFieldSetElementValidityPropertyInfo = "DOMHTMLFieldSetElement::validity"+ attrGet _ = getDOMHTMLFieldSetElementValidity+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "will-validate"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMHTMLFieldSetElementWillValidate :: (MonadIO m, DOMHTMLFieldSetElementK o) => o -> m Bool+getDOMHTMLFieldSetElementWillValidate obj = liftIO $ getObjectPropertyBool obj "will-validate"++data DOMHTMLFieldSetElementWillValidatePropertyInfo+instance AttrInfo DOMHTMLFieldSetElementWillValidatePropertyInfo where+ type AttrAllowedOps DOMHTMLFieldSetElementWillValidatePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFieldSetElementWillValidatePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLFieldSetElementWillValidatePropertyInfo = DOMHTMLFieldSetElementK+ type AttrGetType DOMHTMLFieldSetElementWillValidatePropertyInfo = Bool+ type AttrLabel DOMHTMLFieldSetElementWillValidatePropertyInfo = "DOMHTMLFieldSetElement::will-validate"+ attrGet _ = getDOMHTMLFieldSetElementWillValidate+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMHTMLFieldSetElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLFieldSetElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("elements", DOMHTMLFieldSetElementElementsPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLFieldSetElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLFieldSetElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLFieldSetElementTypePropertyInfo), '("validation-message", DOMHTMLFieldSetElementValidationMessagePropertyInfo), '("validity", DOMHTMLFieldSetElementValidityPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("will-validate", DOMHTMLFieldSetElementWillValidatePropertyInfo)]++-- VVV Prop "color"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFontElementColor :: (MonadIO m, DOMHTMLFontElementK o) => o -> m T.Text+getDOMHTMLFontElementColor obj = liftIO $ getObjectPropertyString obj "color"++setDOMHTMLFontElementColor :: (MonadIO m, DOMHTMLFontElementK o) => o -> T.Text -> m ()+setDOMHTMLFontElementColor obj val = liftIO $ setObjectPropertyString obj "color" val++constructDOMHTMLFontElementColor :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFontElementColor val = constructObjectPropertyString "color" val++data DOMHTMLFontElementColorPropertyInfo+instance AttrInfo DOMHTMLFontElementColorPropertyInfo where+ type AttrAllowedOps DOMHTMLFontElementColorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFontElementColorPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFontElementColorPropertyInfo = DOMHTMLFontElementK+ type AttrGetType DOMHTMLFontElementColorPropertyInfo = T.Text+ type AttrLabel DOMHTMLFontElementColorPropertyInfo = "DOMHTMLFontElement::color"+ attrGet _ = getDOMHTMLFontElementColor+ attrSet _ = setDOMHTMLFontElementColor+ attrConstruct _ = constructDOMHTMLFontElementColor++-- VVV Prop "face"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFontElementFace :: (MonadIO m, DOMHTMLFontElementK o) => o -> m T.Text+getDOMHTMLFontElementFace obj = liftIO $ getObjectPropertyString obj "face"++setDOMHTMLFontElementFace :: (MonadIO m, DOMHTMLFontElementK o) => o -> T.Text -> m ()+setDOMHTMLFontElementFace obj val = liftIO $ setObjectPropertyString obj "face" val++constructDOMHTMLFontElementFace :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFontElementFace val = constructObjectPropertyString "face" val++data DOMHTMLFontElementFacePropertyInfo+instance AttrInfo DOMHTMLFontElementFacePropertyInfo where+ type AttrAllowedOps DOMHTMLFontElementFacePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFontElementFacePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFontElementFacePropertyInfo = DOMHTMLFontElementK+ type AttrGetType DOMHTMLFontElementFacePropertyInfo = T.Text+ type AttrLabel DOMHTMLFontElementFacePropertyInfo = "DOMHTMLFontElement::face"+ attrGet _ = getDOMHTMLFontElementFace+ attrSet _ = setDOMHTMLFontElementFace+ attrConstruct _ = constructDOMHTMLFontElementFace++-- VVV Prop "size"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFontElementSize :: (MonadIO m, DOMHTMLFontElementK o) => o -> m T.Text+getDOMHTMLFontElementSize obj = liftIO $ getObjectPropertyString obj "size"++setDOMHTMLFontElementSize :: (MonadIO m, DOMHTMLFontElementK o) => o -> T.Text -> m ()+setDOMHTMLFontElementSize obj val = liftIO $ setObjectPropertyString obj "size" val++constructDOMHTMLFontElementSize :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFontElementSize val = constructObjectPropertyString "size" val++data DOMHTMLFontElementSizePropertyInfo+instance AttrInfo DOMHTMLFontElementSizePropertyInfo where+ type AttrAllowedOps DOMHTMLFontElementSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFontElementSizePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFontElementSizePropertyInfo = DOMHTMLFontElementK+ type AttrGetType DOMHTMLFontElementSizePropertyInfo = T.Text+ type AttrLabel DOMHTMLFontElementSizePropertyInfo = "DOMHTMLFontElement::size"+ attrGet _ = getDOMHTMLFontElementSize+ attrSet _ = setDOMHTMLFontElementSize+ attrConstruct _ = constructDOMHTMLFontElementSize++type instance AttributeList DOMHTMLFontElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("color", DOMHTMLFontElementColorPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("face", DOMHTMLFontElementFacePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("size", DOMHTMLFontElementSizePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "accept-charset"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFormElementAcceptCharset :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text+getDOMHTMLFormElementAcceptCharset obj = liftIO $ getObjectPropertyString obj "accept-charset"++setDOMHTMLFormElementAcceptCharset :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()+setDOMHTMLFormElementAcceptCharset obj val = liftIO $ setObjectPropertyString obj "accept-charset" val++constructDOMHTMLFormElementAcceptCharset :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFormElementAcceptCharset val = constructObjectPropertyString "accept-charset" val++data DOMHTMLFormElementAcceptCharsetPropertyInfo+instance AttrInfo DOMHTMLFormElementAcceptCharsetPropertyInfo where+ type AttrAllowedOps DOMHTMLFormElementAcceptCharsetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFormElementAcceptCharsetPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFormElementAcceptCharsetPropertyInfo = DOMHTMLFormElementK+ type AttrGetType DOMHTMLFormElementAcceptCharsetPropertyInfo = T.Text+ type AttrLabel DOMHTMLFormElementAcceptCharsetPropertyInfo = "DOMHTMLFormElement::accept-charset"+ attrGet _ = getDOMHTMLFormElementAcceptCharset+ attrSet _ = setDOMHTMLFormElementAcceptCharset+ attrConstruct _ = constructDOMHTMLFormElementAcceptCharset++-- VVV Prop "action"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFormElementAction :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text+getDOMHTMLFormElementAction obj = liftIO $ getObjectPropertyString obj "action"++setDOMHTMLFormElementAction :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()+setDOMHTMLFormElementAction obj val = liftIO $ setObjectPropertyString obj "action" val++constructDOMHTMLFormElementAction :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFormElementAction val = constructObjectPropertyString "action" val++data DOMHTMLFormElementActionPropertyInfo+instance AttrInfo DOMHTMLFormElementActionPropertyInfo where+ type AttrAllowedOps DOMHTMLFormElementActionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFormElementActionPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFormElementActionPropertyInfo = DOMHTMLFormElementK+ type AttrGetType DOMHTMLFormElementActionPropertyInfo = T.Text+ type AttrLabel DOMHTMLFormElementActionPropertyInfo = "DOMHTMLFormElement::action"+ attrGet _ = getDOMHTMLFormElementAction+ attrSet _ = setDOMHTMLFormElementAction+ attrConstruct _ = constructDOMHTMLFormElementAction++-- VVV Prop "autocapitalize"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFormElementAutocapitalize :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text+getDOMHTMLFormElementAutocapitalize obj = liftIO $ getObjectPropertyString obj "autocapitalize"++setDOMHTMLFormElementAutocapitalize :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()+setDOMHTMLFormElementAutocapitalize obj val = liftIO $ setObjectPropertyString obj "autocapitalize" val++constructDOMHTMLFormElementAutocapitalize :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFormElementAutocapitalize val = constructObjectPropertyString "autocapitalize" val++data DOMHTMLFormElementAutocapitalizePropertyInfo+instance AttrInfo DOMHTMLFormElementAutocapitalizePropertyInfo where+ type AttrAllowedOps DOMHTMLFormElementAutocapitalizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFormElementAutocapitalizePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFormElementAutocapitalizePropertyInfo = DOMHTMLFormElementK+ type AttrGetType DOMHTMLFormElementAutocapitalizePropertyInfo = T.Text+ type AttrLabel DOMHTMLFormElementAutocapitalizePropertyInfo = "DOMHTMLFormElement::autocapitalize"+ attrGet _ = getDOMHTMLFormElementAutocapitalize+ attrSet _ = setDOMHTMLFormElementAutocapitalize+ attrConstruct _ = constructDOMHTMLFormElementAutocapitalize++-- VVV Prop "autocomplete"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFormElementAutocomplete :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text+getDOMHTMLFormElementAutocomplete obj = liftIO $ getObjectPropertyString obj "autocomplete"++setDOMHTMLFormElementAutocomplete :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()+setDOMHTMLFormElementAutocomplete obj val = liftIO $ setObjectPropertyString obj "autocomplete" val++constructDOMHTMLFormElementAutocomplete :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFormElementAutocomplete val = constructObjectPropertyString "autocomplete" val++data DOMHTMLFormElementAutocompletePropertyInfo+instance AttrInfo DOMHTMLFormElementAutocompletePropertyInfo where+ type AttrAllowedOps DOMHTMLFormElementAutocompletePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFormElementAutocompletePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFormElementAutocompletePropertyInfo = DOMHTMLFormElementK+ type AttrGetType DOMHTMLFormElementAutocompletePropertyInfo = T.Text+ type AttrLabel DOMHTMLFormElementAutocompletePropertyInfo = "DOMHTMLFormElement::autocomplete"+ attrGet _ = getDOMHTMLFormElementAutocomplete+ attrSet _ = setDOMHTMLFormElementAutocomplete+ attrConstruct _ = constructDOMHTMLFormElementAutocomplete++-- VVV Prop "autocorrect"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFormElementAutocorrect :: (MonadIO m, DOMHTMLFormElementK o) => o -> m Bool+getDOMHTMLFormElementAutocorrect obj = liftIO $ getObjectPropertyBool obj "autocorrect"++setDOMHTMLFormElementAutocorrect :: (MonadIO m, DOMHTMLFormElementK o) => o -> Bool -> m ()+setDOMHTMLFormElementAutocorrect obj val = liftIO $ setObjectPropertyBool obj "autocorrect" val++constructDOMHTMLFormElementAutocorrect :: Bool -> IO ([Char], GValue)+constructDOMHTMLFormElementAutocorrect val = constructObjectPropertyBool "autocorrect" val++data DOMHTMLFormElementAutocorrectPropertyInfo+instance AttrInfo DOMHTMLFormElementAutocorrectPropertyInfo where+ type AttrAllowedOps DOMHTMLFormElementAutocorrectPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFormElementAutocorrectPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLFormElementAutocorrectPropertyInfo = DOMHTMLFormElementK+ type AttrGetType DOMHTMLFormElementAutocorrectPropertyInfo = Bool+ type AttrLabel DOMHTMLFormElementAutocorrectPropertyInfo = "DOMHTMLFormElement::autocorrect"+ attrGet _ = getDOMHTMLFormElementAutocorrect+ attrSet _ = setDOMHTMLFormElementAutocorrect+ attrConstruct _ = constructDOMHTMLFormElementAutocorrect++-- VVV Prop "elements"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMHTMLFormElementElements :: (MonadIO m, DOMHTMLFormElementK o) => o -> m DOMHTMLCollection+getDOMHTMLFormElementElements obj = liftIO $ getObjectPropertyObject obj "elements" DOMHTMLCollection++data DOMHTMLFormElementElementsPropertyInfo+instance AttrInfo DOMHTMLFormElementElementsPropertyInfo where+ type AttrAllowedOps DOMHTMLFormElementElementsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFormElementElementsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLFormElementElementsPropertyInfo = DOMHTMLFormElementK+ type AttrGetType DOMHTMLFormElementElementsPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMHTMLFormElementElementsPropertyInfo = "DOMHTMLFormElement::elements"+ attrGet _ = getDOMHTMLFormElementElements+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "encoding"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFormElementEncoding :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text+getDOMHTMLFormElementEncoding obj = liftIO $ getObjectPropertyString obj "encoding"++setDOMHTMLFormElementEncoding :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()+setDOMHTMLFormElementEncoding obj val = liftIO $ setObjectPropertyString obj "encoding" val++constructDOMHTMLFormElementEncoding :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFormElementEncoding val = constructObjectPropertyString "encoding" val++data DOMHTMLFormElementEncodingPropertyInfo+instance AttrInfo DOMHTMLFormElementEncodingPropertyInfo where+ type AttrAllowedOps DOMHTMLFormElementEncodingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFormElementEncodingPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFormElementEncodingPropertyInfo = DOMHTMLFormElementK+ type AttrGetType DOMHTMLFormElementEncodingPropertyInfo = T.Text+ type AttrLabel DOMHTMLFormElementEncodingPropertyInfo = "DOMHTMLFormElement::encoding"+ attrGet _ = getDOMHTMLFormElementEncoding+ attrSet _ = setDOMHTMLFormElementEncoding+ attrConstruct _ = constructDOMHTMLFormElementEncoding++-- VVV Prop "enctype"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFormElementEnctype :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text+getDOMHTMLFormElementEnctype obj = liftIO $ getObjectPropertyString obj "enctype"++setDOMHTMLFormElementEnctype :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()+setDOMHTMLFormElementEnctype obj val = liftIO $ setObjectPropertyString obj "enctype" val++constructDOMHTMLFormElementEnctype :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFormElementEnctype val = constructObjectPropertyString "enctype" val++data DOMHTMLFormElementEnctypePropertyInfo+instance AttrInfo DOMHTMLFormElementEnctypePropertyInfo where+ type AttrAllowedOps DOMHTMLFormElementEnctypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFormElementEnctypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFormElementEnctypePropertyInfo = DOMHTMLFormElementK+ type AttrGetType DOMHTMLFormElementEnctypePropertyInfo = T.Text+ type AttrLabel DOMHTMLFormElementEnctypePropertyInfo = "DOMHTMLFormElement::enctype"+ attrGet _ = getDOMHTMLFormElementEnctype+ attrSet _ = setDOMHTMLFormElementEnctype+ attrConstruct _ = constructDOMHTMLFormElementEnctype++-- VVV Prop "length"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMHTMLFormElementLength :: (MonadIO m, DOMHTMLFormElementK o) => o -> m Int64+getDOMHTMLFormElementLength obj = liftIO $ getObjectPropertyInt64 obj "length"++data DOMHTMLFormElementLengthPropertyInfo+instance AttrInfo DOMHTMLFormElementLengthPropertyInfo where+ type AttrAllowedOps DOMHTMLFormElementLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFormElementLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLFormElementLengthPropertyInfo = DOMHTMLFormElementK+ type AttrGetType DOMHTMLFormElementLengthPropertyInfo = Int64+ type AttrLabel DOMHTMLFormElementLengthPropertyInfo = "DOMHTMLFormElement::length"+ attrGet _ = getDOMHTMLFormElementLength+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "method"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFormElementMethod :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text+getDOMHTMLFormElementMethod obj = liftIO $ getObjectPropertyString obj "method"++setDOMHTMLFormElementMethod :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()+setDOMHTMLFormElementMethod obj val = liftIO $ setObjectPropertyString obj "method" val++constructDOMHTMLFormElementMethod :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFormElementMethod val = constructObjectPropertyString "method" val++data DOMHTMLFormElementMethodPropertyInfo+instance AttrInfo DOMHTMLFormElementMethodPropertyInfo where+ type AttrAllowedOps DOMHTMLFormElementMethodPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFormElementMethodPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFormElementMethodPropertyInfo = DOMHTMLFormElementK+ type AttrGetType DOMHTMLFormElementMethodPropertyInfo = T.Text+ type AttrLabel DOMHTMLFormElementMethodPropertyInfo = "DOMHTMLFormElement::method"+ attrGet _ = getDOMHTMLFormElementMethod+ attrSet _ = setDOMHTMLFormElementMethod+ attrConstruct _ = constructDOMHTMLFormElementMethod++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFormElementName :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text+getDOMHTMLFormElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLFormElementName :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()+setDOMHTMLFormElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLFormElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFormElementName val = constructObjectPropertyString "name" val++data DOMHTMLFormElementNamePropertyInfo+instance AttrInfo DOMHTMLFormElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLFormElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFormElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFormElementNamePropertyInfo = DOMHTMLFormElementK+ type AttrGetType DOMHTMLFormElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLFormElementNamePropertyInfo = "DOMHTMLFormElement::name"+ attrGet _ = getDOMHTMLFormElementName+ attrSet _ = setDOMHTMLFormElementName+ attrConstruct _ = constructDOMHTMLFormElementName++-- VVV Prop "no-validate"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFormElementNoValidate :: (MonadIO m, DOMHTMLFormElementK o) => o -> m Bool+getDOMHTMLFormElementNoValidate obj = liftIO $ getObjectPropertyBool obj "no-validate"++setDOMHTMLFormElementNoValidate :: (MonadIO m, DOMHTMLFormElementK o) => o -> Bool -> m ()+setDOMHTMLFormElementNoValidate obj val = liftIO $ setObjectPropertyBool obj "no-validate" val++constructDOMHTMLFormElementNoValidate :: Bool -> IO ([Char], GValue)+constructDOMHTMLFormElementNoValidate val = constructObjectPropertyBool "no-validate" val++data DOMHTMLFormElementNoValidatePropertyInfo+instance AttrInfo DOMHTMLFormElementNoValidatePropertyInfo where+ type AttrAllowedOps DOMHTMLFormElementNoValidatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFormElementNoValidatePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLFormElementNoValidatePropertyInfo = DOMHTMLFormElementK+ type AttrGetType DOMHTMLFormElementNoValidatePropertyInfo = Bool+ type AttrLabel DOMHTMLFormElementNoValidatePropertyInfo = "DOMHTMLFormElement::no-validate"+ attrGet _ = getDOMHTMLFormElementNoValidate+ attrSet _ = setDOMHTMLFormElementNoValidate+ attrConstruct _ = constructDOMHTMLFormElementNoValidate++-- VVV Prop "target"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFormElementTarget :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text+getDOMHTMLFormElementTarget obj = liftIO $ getObjectPropertyString obj "target"++setDOMHTMLFormElementTarget :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()+setDOMHTMLFormElementTarget obj val = liftIO $ setObjectPropertyString obj "target" val++constructDOMHTMLFormElementTarget :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFormElementTarget val = constructObjectPropertyString "target" val++data DOMHTMLFormElementTargetPropertyInfo+instance AttrInfo DOMHTMLFormElementTargetPropertyInfo where+ type AttrAllowedOps DOMHTMLFormElementTargetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFormElementTargetPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFormElementTargetPropertyInfo = DOMHTMLFormElementK+ type AttrGetType DOMHTMLFormElementTargetPropertyInfo = T.Text+ type AttrLabel DOMHTMLFormElementTargetPropertyInfo = "DOMHTMLFormElement::target"+ attrGet _ = getDOMHTMLFormElementTarget+ attrSet _ = setDOMHTMLFormElementTarget+ attrConstruct _ = constructDOMHTMLFormElementTarget++type instance AttributeList DOMHTMLFormElement = '[ '("accept-charset", DOMHTMLFormElementAcceptCharsetPropertyInfo), '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("action", DOMHTMLFormElementActionPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autocapitalize", DOMHTMLFormElementAutocapitalizePropertyInfo), '("autocomplete", DOMHTMLFormElementAutocompletePropertyInfo), '("autocorrect", DOMHTMLFormElementAutocorrectPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("elements", DOMHTMLFormElementElementsPropertyInfo), '("encoding", DOMHTMLFormElementEncodingPropertyInfo), '("enctype", DOMHTMLFormElementEnctypePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("length", DOMHTMLFormElementLengthPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("method", DOMHTMLFormElementMethodPropertyInfo), '("name", DOMHTMLFormElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("no-validate", DOMHTMLFormElementNoValidatePropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("target", DOMHTMLFormElementTargetPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "content-document"+ -- Type: TInterface "WebKit" "DOMDocument"+ -- Flags: [PropertyReadable]++getDOMHTMLFrameElementContentDocument :: (MonadIO m, DOMHTMLFrameElementK o) => o -> m DOMDocument+getDOMHTMLFrameElementContentDocument obj = liftIO $ getObjectPropertyObject obj "content-document" DOMDocument++data DOMHTMLFrameElementContentDocumentPropertyInfo+instance AttrInfo DOMHTMLFrameElementContentDocumentPropertyInfo where+ type AttrAllowedOps DOMHTMLFrameElementContentDocumentPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFrameElementContentDocumentPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLFrameElementContentDocumentPropertyInfo = DOMHTMLFrameElementK+ type AttrGetType DOMHTMLFrameElementContentDocumentPropertyInfo = DOMDocument+ type AttrLabel DOMHTMLFrameElementContentDocumentPropertyInfo = "DOMHTMLFrameElement::content-document"+ attrGet _ = getDOMHTMLFrameElementContentDocument+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "content-window"+ -- Type: TInterface "WebKit" "DOMDOMWindow"+ -- Flags: [PropertyReadable]++getDOMHTMLFrameElementContentWindow :: (MonadIO m, DOMHTMLFrameElementK o) => o -> m DOMDOMWindow+getDOMHTMLFrameElementContentWindow obj = liftIO $ getObjectPropertyObject obj "content-window" DOMDOMWindow++data DOMHTMLFrameElementContentWindowPropertyInfo+instance AttrInfo DOMHTMLFrameElementContentWindowPropertyInfo where+ type AttrAllowedOps DOMHTMLFrameElementContentWindowPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFrameElementContentWindowPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLFrameElementContentWindowPropertyInfo = DOMHTMLFrameElementK+ type AttrGetType DOMHTMLFrameElementContentWindowPropertyInfo = DOMDOMWindow+ type AttrLabel DOMHTMLFrameElementContentWindowPropertyInfo = "DOMHTMLFrameElement::content-window"+ attrGet _ = getDOMHTMLFrameElementContentWindow+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "frame-border"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFrameElementFrameBorder :: (MonadIO m, DOMHTMLFrameElementK o) => o -> m T.Text+getDOMHTMLFrameElementFrameBorder obj = liftIO $ getObjectPropertyString obj "frame-border"++setDOMHTMLFrameElementFrameBorder :: (MonadIO m, DOMHTMLFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLFrameElementFrameBorder obj val = liftIO $ setObjectPropertyString obj "frame-border" val++constructDOMHTMLFrameElementFrameBorder :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFrameElementFrameBorder val = constructObjectPropertyString "frame-border" val++data DOMHTMLFrameElementFrameBorderPropertyInfo+instance AttrInfo DOMHTMLFrameElementFrameBorderPropertyInfo where+ type AttrAllowedOps DOMHTMLFrameElementFrameBorderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFrameElementFrameBorderPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFrameElementFrameBorderPropertyInfo = DOMHTMLFrameElementK+ type AttrGetType DOMHTMLFrameElementFrameBorderPropertyInfo = T.Text+ type AttrLabel DOMHTMLFrameElementFrameBorderPropertyInfo = "DOMHTMLFrameElement::frame-border"+ attrGet _ = getDOMHTMLFrameElementFrameBorder+ attrSet _ = setDOMHTMLFrameElementFrameBorder+ attrConstruct _ = constructDOMHTMLFrameElementFrameBorder++-- VVV Prop "height"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMHTMLFrameElementHeight :: (MonadIO m, DOMHTMLFrameElementK o) => o -> m Int64+getDOMHTMLFrameElementHeight obj = liftIO $ getObjectPropertyInt64 obj "height"++data DOMHTMLFrameElementHeightPropertyInfo+instance AttrInfo DOMHTMLFrameElementHeightPropertyInfo where+ type AttrAllowedOps DOMHTMLFrameElementHeightPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFrameElementHeightPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLFrameElementHeightPropertyInfo = DOMHTMLFrameElementK+ type AttrGetType DOMHTMLFrameElementHeightPropertyInfo = Int64+ type AttrLabel DOMHTMLFrameElementHeightPropertyInfo = "DOMHTMLFrameElement::height"+ attrGet _ = getDOMHTMLFrameElementHeight+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "long-desc"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFrameElementLongDesc :: (MonadIO m, DOMHTMLFrameElementK o) => o -> m T.Text+getDOMHTMLFrameElementLongDesc obj = liftIO $ getObjectPropertyString obj "long-desc"++setDOMHTMLFrameElementLongDesc :: (MonadIO m, DOMHTMLFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLFrameElementLongDesc obj val = liftIO $ setObjectPropertyString obj "long-desc" val++constructDOMHTMLFrameElementLongDesc :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFrameElementLongDesc val = constructObjectPropertyString "long-desc" val++data DOMHTMLFrameElementLongDescPropertyInfo+instance AttrInfo DOMHTMLFrameElementLongDescPropertyInfo where+ type AttrAllowedOps DOMHTMLFrameElementLongDescPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFrameElementLongDescPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFrameElementLongDescPropertyInfo = DOMHTMLFrameElementK+ type AttrGetType DOMHTMLFrameElementLongDescPropertyInfo = T.Text+ type AttrLabel DOMHTMLFrameElementLongDescPropertyInfo = "DOMHTMLFrameElement::long-desc"+ attrGet _ = getDOMHTMLFrameElementLongDesc+ attrSet _ = setDOMHTMLFrameElementLongDesc+ attrConstruct _ = constructDOMHTMLFrameElementLongDesc++-- VVV Prop "margin-height"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFrameElementMarginHeight :: (MonadIO m, DOMHTMLFrameElementK o) => o -> m T.Text+getDOMHTMLFrameElementMarginHeight obj = liftIO $ getObjectPropertyString obj "margin-height"++setDOMHTMLFrameElementMarginHeight :: (MonadIO m, DOMHTMLFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLFrameElementMarginHeight obj val = liftIO $ setObjectPropertyString obj "margin-height" val++constructDOMHTMLFrameElementMarginHeight :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFrameElementMarginHeight val = constructObjectPropertyString "margin-height" val++data DOMHTMLFrameElementMarginHeightPropertyInfo+instance AttrInfo DOMHTMLFrameElementMarginHeightPropertyInfo where+ type AttrAllowedOps DOMHTMLFrameElementMarginHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFrameElementMarginHeightPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFrameElementMarginHeightPropertyInfo = DOMHTMLFrameElementK+ type AttrGetType DOMHTMLFrameElementMarginHeightPropertyInfo = T.Text+ type AttrLabel DOMHTMLFrameElementMarginHeightPropertyInfo = "DOMHTMLFrameElement::margin-height"+ attrGet _ = getDOMHTMLFrameElementMarginHeight+ attrSet _ = setDOMHTMLFrameElementMarginHeight+ attrConstruct _ = constructDOMHTMLFrameElementMarginHeight++-- VVV Prop "margin-width"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFrameElementMarginWidth :: (MonadIO m, DOMHTMLFrameElementK o) => o -> m T.Text+getDOMHTMLFrameElementMarginWidth obj = liftIO $ getObjectPropertyString obj "margin-width"++setDOMHTMLFrameElementMarginWidth :: (MonadIO m, DOMHTMLFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLFrameElementMarginWidth obj val = liftIO $ setObjectPropertyString obj "margin-width" val++constructDOMHTMLFrameElementMarginWidth :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFrameElementMarginWidth val = constructObjectPropertyString "margin-width" val++data DOMHTMLFrameElementMarginWidthPropertyInfo+instance AttrInfo DOMHTMLFrameElementMarginWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLFrameElementMarginWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFrameElementMarginWidthPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFrameElementMarginWidthPropertyInfo = DOMHTMLFrameElementK+ type AttrGetType DOMHTMLFrameElementMarginWidthPropertyInfo = T.Text+ type AttrLabel DOMHTMLFrameElementMarginWidthPropertyInfo = "DOMHTMLFrameElement::margin-width"+ attrGet _ = getDOMHTMLFrameElementMarginWidth+ attrSet _ = setDOMHTMLFrameElementMarginWidth+ attrConstruct _ = constructDOMHTMLFrameElementMarginWidth++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFrameElementName :: (MonadIO m, DOMHTMLFrameElementK o) => o -> m T.Text+getDOMHTMLFrameElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLFrameElementName :: (MonadIO m, DOMHTMLFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLFrameElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLFrameElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFrameElementName val = constructObjectPropertyString "name" val++data DOMHTMLFrameElementNamePropertyInfo+instance AttrInfo DOMHTMLFrameElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLFrameElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFrameElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFrameElementNamePropertyInfo = DOMHTMLFrameElementK+ type AttrGetType DOMHTMLFrameElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLFrameElementNamePropertyInfo = "DOMHTMLFrameElement::name"+ attrGet _ = getDOMHTMLFrameElementName+ attrSet _ = setDOMHTMLFrameElementName+ attrConstruct _ = constructDOMHTMLFrameElementName++-- VVV Prop "no-resize"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFrameElementNoResize :: (MonadIO m, DOMHTMLFrameElementK o) => o -> m Bool+getDOMHTMLFrameElementNoResize obj = liftIO $ getObjectPropertyBool obj "no-resize"++setDOMHTMLFrameElementNoResize :: (MonadIO m, DOMHTMLFrameElementK o) => o -> Bool -> m ()+setDOMHTMLFrameElementNoResize obj val = liftIO $ setObjectPropertyBool obj "no-resize" val++constructDOMHTMLFrameElementNoResize :: Bool -> IO ([Char], GValue)+constructDOMHTMLFrameElementNoResize val = constructObjectPropertyBool "no-resize" val++data DOMHTMLFrameElementNoResizePropertyInfo+instance AttrInfo DOMHTMLFrameElementNoResizePropertyInfo where+ type AttrAllowedOps DOMHTMLFrameElementNoResizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFrameElementNoResizePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLFrameElementNoResizePropertyInfo = DOMHTMLFrameElementK+ type AttrGetType DOMHTMLFrameElementNoResizePropertyInfo = Bool+ type AttrLabel DOMHTMLFrameElementNoResizePropertyInfo = "DOMHTMLFrameElement::no-resize"+ attrGet _ = getDOMHTMLFrameElementNoResize+ attrSet _ = setDOMHTMLFrameElementNoResize+ attrConstruct _ = constructDOMHTMLFrameElementNoResize++-- VVV Prop "scrolling"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFrameElementScrolling :: (MonadIO m, DOMHTMLFrameElementK o) => o -> m T.Text+getDOMHTMLFrameElementScrolling obj = liftIO $ getObjectPropertyString obj "scrolling"++setDOMHTMLFrameElementScrolling :: (MonadIO m, DOMHTMLFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLFrameElementScrolling obj val = liftIO $ setObjectPropertyString obj "scrolling" val++constructDOMHTMLFrameElementScrolling :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFrameElementScrolling val = constructObjectPropertyString "scrolling" val++data DOMHTMLFrameElementScrollingPropertyInfo+instance AttrInfo DOMHTMLFrameElementScrollingPropertyInfo where+ type AttrAllowedOps DOMHTMLFrameElementScrollingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFrameElementScrollingPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFrameElementScrollingPropertyInfo = DOMHTMLFrameElementK+ type AttrGetType DOMHTMLFrameElementScrollingPropertyInfo = T.Text+ type AttrLabel DOMHTMLFrameElementScrollingPropertyInfo = "DOMHTMLFrameElement::scrolling"+ attrGet _ = getDOMHTMLFrameElementScrolling+ attrSet _ = setDOMHTMLFrameElementScrolling+ attrConstruct _ = constructDOMHTMLFrameElementScrolling++-- VVV Prop "src"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFrameElementSrc :: (MonadIO m, DOMHTMLFrameElementK o) => o -> m T.Text+getDOMHTMLFrameElementSrc obj = liftIO $ getObjectPropertyString obj "src"++setDOMHTMLFrameElementSrc :: (MonadIO m, DOMHTMLFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLFrameElementSrc obj val = liftIO $ setObjectPropertyString obj "src" val++constructDOMHTMLFrameElementSrc :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFrameElementSrc val = constructObjectPropertyString "src" val++data DOMHTMLFrameElementSrcPropertyInfo+instance AttrInfo DOMHTMLFrameElementSrcPropertyInfo where+ type AttrAllowedOps DOMHTMLFrameElementSrcPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFrameElementSrcPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFrameElementSrcPropertyInfo = DOMHTMLFrameElementK+ type AttrGetType DOMHTMLFrameElementSrcPropertyInfo = T.Text+ type AttrLabel DOMHTMLFrameElementSrcPropertyInfo = "DOMHTMLFrameElement::src"+ attrGet _ = getDOMHTMLFrameElementSrc+ attrSet _ = setDOMHTMLFrameElementSrc+ attrConstruct _ = constructDOMHTMLFrameElementSrc++-- VVV Prop "width"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMHTMLFrameElementWidth :: (MonadIO m, DOMHTMLFrameElementK o) => o -> m Int64+getDOMHTMLFrameElementWidth obj = liftIO $ getObjectPropertyInt64 obj "width"++data DOMHTMLFrameElementWidthPropertyInfo+instance AttrInfo DOMHTMLFrameElementWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLFrameElementWidthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFrameElementWidthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLFrameElementWidthPropertyInfo = DOMHTMLFrameElementK+ type AttrGetType DOMHTMLFrameElementWidthPropertyInfo = Int64+ type AttrLabel DOMHTMLFrameElementWidthPropertyInfo = "DOMHTMLFrameElement::width"+ attrGet _ = getDOMHTMLFrameElementWidth+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMHTMLFrameElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-document", DOMHTMLFrameElementContentDocumentPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("content-window", DOMHTMLFrameElementContentWindowPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("frame-border", DOMHTMLFrameElementFrameBorderPropertyInfo), '("height", DOMHTMLFrameElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("long-desc", DOMHTMLFrameElementLongDescPropertyInfo), '("margin-height", DOMHTMLFrameElementMarginHeightPropertyInfo), '("margin-width", DOMHTMLFrameElementMarginWidthPropertyInfo), '("name", DOMHTMLFrameElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("no-resize", DOMHTMLFrameElementNoResizePropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("scrolling", DOMHTMLFrameElementScrollingPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLFrameElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLFrameElementWidthPropertyInfo)]++-- VVV Prop "cols"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFrameSetElementCols :: (MonadIO m, DOMHTMLFrameSetElementK o) => o -> m T.Text+getDOMHTMLFrameSetElementCols obj = liftIO $ getObjectPropertyString obj "cols"++setDOMHTMLFrameSetElementCols :: (MonadIO m, DOMHTMLFrameSetElementK o) => o -> T.Text -> m ()+setDOMHTMLFrameSetElementCols obj val = liftIO $ setObjectPropertyString obj "cols" val++constructDOMHTMLFrameSetElementCols :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFrameSetElementCols val = constructObjectPropertyString "cols" val++data DOMHTMLFrameSetElementColsPropertyInfo+instance AttrInfo DOMHTMLFrameSetElementColsPropertyInfo where+ type AttrAllowedOps DOMHTMLFrameSetElementColsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFrameSetElementColsPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFrameSetElementColsPropertyInfo = DOMHTMLFrameSetElementK+ type AttrGetType DOMHTMLFrameSetElementColsPropertyInfo = T.Text+ type AttrLabel DOMHTMLFrameSetElementColsPropertyInfo = "DOMHTMLFrameSetElement::cols"+ attrGet _ = getDOMHTMLFrameSetElementCols+ attrSet _ = setDOMHTMLFrameSetElementCols+ attrConstruct _ = constructDOMHTMLFrameSetElementCols++-- VVV Prop "rows"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLFrameSetElementRows :: (MonadIO m, DOMHTMLFrameSetElementK o) => o -> m T.Text+getDOMHTMLFrameSetElementRows obj = liftIO $ getObjectPropertyString obj "rows"++setDOMHTMLFrameSetElementRows :: (MonadIO m, DOMHTMLFrameSetElementK o) => o -> T.Text -> m ()+setDOMHTMLFrameSetElementRows obj val = liftIO $ setObjectPropertyString obj "rows" val++constructDOMHTMLFrameSetElementRows :: T.Text -> IO ([Char], GValue)+constructDOMHTMLFrameSetElementRows val = constructObjectPropertyString "rows" val++data DOMHTMLFrameSetElementRowsPropertyInfo+instance AttrInfo DOMHTMLFrameSetElementRowsPropertyInfo where+ type AttrAllowedOps DOMHTMLFrameSetElementRowsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLFrameSetElementRowsPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLFrameSetElementRowsPropertyInfo = DOMHTMLFrameSetElementK+ type AttrGetType DOMHTMLFrameSetElementRowsPropertyInfo = T.Text+ type AttrLabel DOMHTMLFrameSetElementRowsPropertyInfo = "DOMHTMLFrameSetElement::rows"+ attrGet _ = getDOMHTMLFrameSetElementRows+ attrSet _ = setDOMHTMLFrameSetElementRows+ attrConstruct _ = constructDOMHTMLFrameSetElementRows++type instance AttributeList DOMHTMLFrameSetElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("cols", DOMHTMLFrameSetElementColsPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("rows", DOMHTMLFrameSetElementRowsPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLHRElementAlign :: (MonadIO m, DOMHTMLHRElementK o) => o -> m T.Text+getDOMHTMLHRElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLHRElementAlign :: (MonadIO m, DOMHTMLHRElementK o) => o -> T.Text -> m ()+setDOMHTMLHRElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLHRElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLHRElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLHRElementAlignPropertyInfo+instance AttrInfo DOMHTMLHRElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLHRElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLHRElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLHRElementAlignPropertyInfo = DOMHTMLHRElementK+ type AttrGetType DOMHTMLHRElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLHRElementAlignPropertyInfo = "DOMHTMLHRElement::align"+ attrGet _ = getDOMHTMLHRElementAlign+ attrSet _ = setDOMHTMLHRElementAlign+ attrConstruct _ = constructDOMHTMLHRElementAlign++-- VVV Prop "no-shade"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLHRElementNoShade :: (MonadIO m, DOMHTMLHRElementK o) => o -> m Bool+getDOMHTMLHRElementNoShade obj = liftIO $ getObjectPropertyBool obj "no-shade"++setDOMHTMLHRElementNoShade :: (MonadIO m, DOMHTMLHRElementK o) => o -> Bool -> m ()+setDOMHTMLHRElementNoShade obj val = liftIO $ setObjectPropertyBool obj "no-shade" val++constructDOMHTMLHRElementNoShade :: Bool -> IO ([Char], GValue)+constructDOMHTMLHRElementNoShade val = constructObjectPropertyBool "no-shade" val++data DOMHTMLHRElementNoShadePropertyInfo+instance AttrInfo DOMHTMLHRElementNoShadePropertyInfo where+ type AttrAllowedOps DOMHTMLHRElementNoShadePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLHRElementNoShadePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLHRElementNoShadePropertyInfo = DOMHTMLHRElementK+ type AttrGetType DOMHTMLHRElementNoShadePropertyInfo = Bool+ type AttrLabel DOMHTMLHRElementNoShadePropertyInfo = "DOMHTMLHRElement::no-shade"+ attrGet _ = getDOMHTMLHRElementNoShade+ attrSet _ = setDOMHTMLHRElementNoShade+ attrConstruct _ = constructDOMHTMLHRElementNoShade++-- VVV Prop "size"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLHRElementSize :: (MonadIO m, DOMHTMLHRElementK o) => o -> m T.Text+getDOMHTMLHRElementSize obj = liftIO $ getObjectPropertyString obj "size"++setDOMHTMLHRElementSize :: (MonadIO m, DOMHTMLHRElementK o) => o -> T.Text -> m ()+setDOMHTMLHRElementSize obj val = liftIO $ setObjectPropertyString obj "size" val++constructDOMHTMLHRElementSize :: T.Text -> IO ([Char], GValue)+constructDOMHTMLHRElementSize val = constructObjectPropertyString "size" val++data DOMHTMLHRElementSizePropertyInfo+instance AttrInfo DOMHTMLHRElementSizePropertyInfo where+ type AttrAllowedOps DOMHTMLHRElementSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLHRElementSizePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLHRElementSizePropertyInfo = DOMHTMLHRElementK+ type AttrGetType DOMHTMLHRElementSizePropertyInfo = T.Text+ type AttrLabel DOMHTMLHRElementSizePropertyInfo = "DOMHTMLHRElement::size"+ attrGet _ = getDOMHTMLHRElementSize+ attrSet _ = setDOMHTMLHRElementSize+ attrConstruct _ = constructDOMHTMLHRElementSize++-- VVV Prop "width"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLHRElementWidth :: (MonadIO m, DOMHTMLHRElementK o) => o -> m T.Text+getDOMHTMLHRElementWidth obj = liftIO $ getObjectPropertyString obj "width"++setDOMHTMLHRElementWidth :: (MonadIO m, DOMHTMLHRElementK o) => o -> T.Text -> m ()+setDOMHTMLHRElementWidth obj val = liftIO $ setObjectPropertyString obj "width" val++constructDOMHTMLHRElementWidth :: T.Text -> IO ([Char], GValue)+constructDOMHTMLHRElementWidth val = constructObjectPropertyString "width" val++data DOMHTMLHRElementWidthPropertyInfo+instance AttrInfo DOMHTMLHRElementWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLHRElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLHRElementWidthPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLHRElementWidthPropertyInfo = DOMHTMLHRElementK+ type AttrGetType DOMHTMLHRElementWidthPropertyInfo = T.Text+ type AttrLabel DOMHTMLHRElementWidthPropertyInfo = "DOMHTMLHRElement::width"+ attrGet _ = getDOMHTMLHRElementWidth+ attrSet _ = setDOMHTMLHRElementWidth+ attrConstruct _ = constructDOMHTMLHRElementWidth++type instance AttributeList DOMHTMLHRElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLHRElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("no-shade", DOMHTMLHRElementNoShadePropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("size", DOMHTMLHRElementSizePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLHRElementWidthPropertyInfo)]++-- VVV Prop "profile"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLHeadElementProfile :: (MonadIO m, DOMHTMLHeadElementK o) => o -> m T.Text+getDOMHTMLHeadElementProfile obj = liftIO $ getObjectPropertyString obj "profile"++setDOMHTMLHeadElementProfile :: (MonadIO m, DOMHTMLHeadElementK o) => o -> T.Text -> m ()+setDOMHTMLHeadElementProfile obj val = liftIO $ setObjectPropertyString obj "profile" val++constructDOMHTMLHeadElementProfile :: T.Text -> IO ([Char], GValue)+constructDOMHTMLHeadElementProfile val = constructObjectPropertyString "profile" val++data DOMHTMLHeadElementProfilePropertyInfo+instance AttrInfo DOMHTMLHeadElementProfilePropertyInfo where+ type AttrAllowedOps DOMHTMLHeadElementProfilePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLHeadElementProfilePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLHeadElementProfilePropertyInfo = DOMHTMLHeadElementK+ type AttrGetType DOMHTMLHeadElementProfilePropertyInfo = T.Text+ type AttrLabel DOMHTMLHeadElementProfilePropertyInfo = "DOMHTMLHeadElement::profile"+ attrGet _ = getDOMHTMLHeadElementProfile+ attrSet _ = setDOMHTMLHeadElementProfile+ attrConstruct _ = constructDOMHTMLHeadElementProfile++type instance AttributeList DOMHTMLHeadElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("profile", DOMHTMLHeadElementProfilePropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLHeadingElementAlign :: (MonadIO m, DOMHTMLHeadingElementK o) => o -> m T.Text+getDOMHTMLHeadingElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLHeadingElementAlign :: (MonadIO m, DOMHTMLHeadingElementK o) => o -> T.Text -> m ()+setDOMHTMLHeadingElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLHeadingElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLHeadingElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLHeadingElementAlignPropertyInfo+instance AttrInfo DOMHTMLHeadingElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLHeadingElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLHeadingElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLHeadingElementAlignPropertyInfo = DOMHTMLHeadingElementK+ type AttrGetType DOMHTMLHeadingElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLHeadingElementAlignPropertyInfo = "DOMHTMLHeadingElement::align"+ attrGet _ = getDOMHTMLHeadingElementAlign+ attrSet _ = setDOMHTMLHeadingElementAlign+ attrConstruct _ = constructDOMHTMLHeadingElementAlign++type instance AttributeList DOMHTMLHeadingElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLHeadingElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "manifest"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLHtmlElementManifest :: (MonadIO m, DOMHTMLHtmlElementK o) => o -> m T.Text+getDOMHTMLHtmlElementManifest obj = liftIO $ getObjectPropertyString obj "manifest"++setDOMHTMLHtmlElementManifest :: (MonadIO m, DOMHTMLHtmlElementK o) => o -> T.Text -> m ()+setDOMHTMLHtmlElementManifest obj val = liftIO $ setObjectPropertyString obj "manifest" val++constructDOMHTMLHtmlElementManifest :: T.Text -> IO ([Char], GValue)+constructDOMHTMLHtmlElementManifest val = constructObjectPropertyString "manifest" val++data DOMHTMLHtmlElementManifestPropertyInfo+instance AttrInfo DOMHTMLHtmlElementManifestPropertyInfo where+ type AttrAllowedOps DOMHTMLHtmlElementManifestPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLHtmlElementManifestPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLHtmlElementManifestPropertyInfo = DOMHTMLHtmlElementK+ type AttrGetType DOMHTMLHtmlElementManifestPropertyInfo = T.Text+ type AttrLabel DOMHTMLHtmlElementManifestPropertyInfo = "DOMHTMLHtmlElement::manifest"+ attrGet _ = getDOMHTMLHtmlElementManifest+ attrSet _ = setDOMHTMLHtmlElementManifest+ attrConstruct _ = constructDOMHTMLHtmlElementManifest++-- VVV Prop "version"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLHtmlElementVersion :: (MonadIO m, DOMHTMLHtmlElementK o) => o -> m T.Text+getDOMHTMLHtmlElementVersion obj = liftIO $ getObjectPropertyString obj "version"++setDOMHTMLHtmlElementVersion :: (MonadIO m, DOMHTMLHtmlElementK o) => o -> T.Text -> m ()+setDOMHTMLHtmlElementVersion obj val = liftIO $ setObjectPropertyString obj "version" val++constructDOMHTMLHtmlElementVersion :: T.Text -> IO ([Char], GValue)+constructDOMHTMLHtmlElementVersion val = constructObjectPropertyString "version" val++data DOMHTMLHtmlElementVersionPropertyInfo+instance AttrInfo DOMHTMLHtmlElementVersionPropertyInfo where+ type AttrAllowedOps DOMHTMLHtmlElementVersionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLHtmlElementVersionPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLHtmlElementVersionPropertyInfo = DOMHTMLHtmlElementK+ type AttrGetType DOMHTMLHtmlElementVersionPropertyInfo = T.Text+ type AttrLabel DOMHTMLHtmlElementVersionPropertyInfo = "DOMHTMLHtmlElement::version"+ attrGet _ = getDOMHTMLHtmlElementVersion+ attrSet _ = setDOMHTMLHtmlElementVersion+ attrConstruct _ = constructDOMHTMLHtmlElementVersion++type instance AttributeList DOMHTMLHtmlElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("manifest", DOMHTMLHtmlElementManifestPropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("version", DOMHTMLHtmlElementVersionPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLIFrameElementAlign :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> m T.Text+getDOMHTMLIFrameElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLIFrameElementAlign :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLIFrameElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLIFrameElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLIFrameElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLIFrameElementAlignPropertyInfo+instance AttrInfo DOMHTMLIFrameElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLIFrameElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLIFrameElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLIFrameElementAlignPropertyInfo = DOMHTMLIFrameElementK+ type AttrGetType DOMHTMLIFrameElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLIFrameElementAlignPropertyInfo = "DOMHTMLIFrameElement::align"+ attrGet _ = getDOMHTMLIFrameElementAlign+ attrSet _ = setDOMHTMLIFrameElementAlign+ attrConstruct _ = constructDOMHTMLIFrameElementAlign++-- VVV Prop "content-document"+ -- Type: TInterface "WebKit" "DOMDocument"+ -- Flags: [PropertyReadable]++getDOMHTMLIFrameElementContentDocument :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> m DOMDocument+getDOMHTMLIFrameElementContentDocument obj = liftIO $ getObjectPropertyObject obj "content-document" DOMDocument++data DOMHTMLIFrameElementContentDocumentPropertyInfo+instance AttrInfo DOMHTMLIFrameElementContentDocumentPropertyInfo where+ type AttrAllowedOps DOMHTMLIFrameElementContentDocumentPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLIFrameElementContentDocumentPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLIFrameElementContentDocumentPropertyInfo = DOMHTMLIFrameElementK+ type AttrGetType DOMHTMLIFrameElementContentDocumentPropertyInfo = DOMDocument+ type AttrLabel DOMHTMLIFrameElementContentDocumentPropertyInfo = "DOMHTMLIFrameElement::content-document"+ attrGet _ = getDOMHTMLIFrameElementContentDocument+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "content-window"+ -- Type: TInterface "WebKit" "DOMDOMWindow"+ -- Flags: [PropertyReadable]++getDOMHTMLIFrameElementContentWindow :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> m DOMDOMWindow+getDOMHTMLIFrameElementContentWindow obj = liftIO $ getObjectPropertyObject obj "content-window" DOMDOMWindow++data DOMHTMLIFrameElementContentWindowPropertyInfo+instance AttrInfo DOMHTMLIFrameElementContentWindowPropertyInfo where+ type AttrAllowedOps DOMHTMLIFrameElementContentWindowPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLIFrameElementContentWindowPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLIFrameElementContentWindowPropertyInfo = DOMHTMLIFrameElementK+ type AttrGetType DOMHTMLIFrameElementContentWindowPropertyInfo = DOMDOMWindow+ type AttrLabel DOMHTMLIFrameElementContentWindowPropertyInfo = "DOMHTMLIFrameElement::content-window"+ attrGet _ = getDOMHTMLIFrameElementContentWindow+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "frame-border"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLIFrameElementFrameBorder :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> m T.Text+getDOMHTMLIFrameElementFrameBorder obj = liftIO $ getObjectPropertyString obj "frame-border"++setDOMHTMLIFrameElementFrameBorder :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLIFrameElementFrameBorder obj val = liftIO $ setObjectPropertyString obj "frame-border" val++constructDOMHTMLIFrameElementFrameBorder :: T.Text -> IO ([Char], GValue)+constructDOMHTMLIFrameElementFrameBorder val = constructObjectPropertyString "frame-border" val++data DOMHTMLIFrameElementFrameBorderPropertyInfo+instance AttrInfo DOMHTMLIFrameElementFrameBorderPropertyInfo where+ type AttrAllowedOps DOMHTMLIFrameElementFrameBorderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLIFrameElementFrameBorderPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLIFrameElementFrameBorderPropertyInfo = DOMHTMLIFrameElementK+ type AttrGetType DOMHTMLIFrameElementFrameBorderPropertyInfo = T.Text+ type AttrLabel DOMHTMLIFrameElementFrameBorderPropertyInfo = "DOMHTMLIFrameElement::frame-border"+ attrGet _ = getDOMHTMLIFrameElementFrameBorder+ attrSet _ = setDOMHTMLIFrameElementFrameBorder+ attrConstruct _ = constructDOMHTMLIFrameElementFrameBorder++-- VVV Prop "height"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLIFrameElementHeight :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> m T.Text+getDOMHTMLIFrameElementHeight obj = liftIO $ getObjectPropertyString obj "height"++setDOMHTMLIFrameElementHeight :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLIFrameElementHeight obj val = liftIO $ setObjectPropertyString obj "height" val++constructDOMHTMLIFrameElementHeight :: T.Text -> IO ([Char], GValue)+constructDOMHTMLIFrameElementHeight val = constructObjectPropertyString "height" val++data DOMHTMLIFrameElementHeightPropertyInfo+instance AttrInfo DOMHTMLIFrameElementHeightPropertyInfo where+ type AttrAllowedOps DOMHTMLIFrameElementHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLIFrameElementHeightPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLIFrameElementHeightPropertyInfo = DOMHTMLIFrameElementK+ type AttrGetType DOMHTMLIFrameElementHeightPropertyInfo = T.Text+ type AttrLabel DOMHTMLIFrameElementHeightPropertyInfo = "DOMHTMLIFrameElement::height"+ attrGet _ = getDOMHTMLIFrameElementHeight+ attrSet _ = setDOMHTMLIFrameElementHeight+ attrConstruct _ = constructDOMHTMLIFrameElementHeight++-- VVV Prop "long-desc"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLIFrameElementLongDesc :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> m T.Text+getDOMHTMLIFrameElementLongDesc obj = liftIO $ getObjectPropertyString obj "long-desc"++setDOMHTMLIFrameElementLongDesc :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLIFrameElementLongDesc obj val = liftIO $ setObjectPropertyString obj "long-desc" val++constructDOMHTMLIFrameElementLongDesc :: T.Text -> IO ([Char], GValue)+constructDOMHTMLIFrameElementLongDesc val = constructObjectPropertyString "long-desc" val++data DOMHTMLIFrameElementLongDescPropertyInfo+instance AttrInfo DOMHTMLIFrameElementLongDescPropertyInfo where+ type AttrAllowedOps DOMHTMLIFrameElementLongDescPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLIFrameElementLongDescPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLIFrameElementLongDescPropertyInfo = DOMHTMLIFrameElementK+ type AttrGetType DOMHTMLIFrameElementLongDescPropertyInfo = T.Text+ type AttrLabel DOMHTMLIFrameElementLongDescPropertyInfo = "DOMHTMLIFrameElement::long-desc"+ attrGet _ = getDOMHTMLIFrameElementLongDesc+ attrSet _ = setDOMHTMLIFrameElementLongDesc+ attrConstruct _ = constructDOMHTMLIFrameElementLongDesc++-- VVV Prop "margin-height"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLIFrameElementMarginHeight :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> m T.Text+getDOMHTMLIFrameElementMarginHeight obj = liftIO $ getObjectPropertyString obj "margin-height"++setDOMHTMLIFrameElementMarginHeight :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLIFrameElementMarginHeight obj val = liftIO $ setObjectPropertyString obj "margin-height" val++constructDOMHTMLIFrameElementMarginHeight :: T.Text -> IO ([Char], GValue)+constructDOMHTMLIFrameElementMarginHeight val = constructObjectPropertyString "margin-height" val++data DOMHTMLIFrameElementMarginHeightPropertyInfo+instance AttrInfo DOMHTMLIFrameElementMarginHeightPropertyInfo where+ type AttrAllowedOps DOMHTMLIFrameElementMarginHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLIFrameElementMarginHeightPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLIFrameElementMarginHeightPropertyInfo = DOMHTMLIFrameElementK+ type AttrGetType DOMHTMLIFrameElementMarginHeightPropertyInfo = T.Text+ type AttrLabel DOMHTMLIFrameElementMarginHeightPropertyInfo = "DOMHTMLIFrameElement::margin-height"+ attrGet _ = getDOMHTMLIFrameElementMarginHeight+ attrSet _ = setDOMHTMLIFrameElementMarginHeight+ attrConstruct _ = constructDOMHTMLIFrameElementMarginHeight++-- VVV Prop "margin-width"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLIFrameElementMarginWidth :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> m T.Text+getDOMHTMLIFrameElementMarginWidth obj = liftIO $ getObjectPropertyString obj "margin-width"++setDOMHTMLIFrameElementMarginWidth :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLIFrameElementMarginWidth obj val = liftIO $ setObjectPropertyString obj "margin-width" val++constructDOMHTMLIFrameElementMarginWidth :: T.Text -> IO ([Char], GValue)+constructDOMHTMLIFrameElementMarginWidth val = constructObjectPropertyString "margin-width" val++data DOMHTMLIFrameElementMarginWidthPropertyInfo+instance AttrInfo DOMHTMLIFrameElementMarginWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLIFrameElementMarginWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLIFrameElementMarginWidthPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLIFrameElementMarginWidthPropertyInfo = DOMHTMLIFrameElementK+ type AttrGetType DOMHTMLIFrameElementMarginWidthPropertyInfo = T.Text+ type AttrLabel DOMHTMLIFrameElementMarginWidthPropertyInfo = "DOMHTMLIFrameElement::margin-width"+ attrGet _ = getDOMHTMLIFrameElementMarginWidth+ attrSet _ = setDOMHTMLIFrameElementMarginWidth+ attrConstruct _ = constructDOMHTMLIFrameElementMarginWidth++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLIFrameElementName :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> m T.Text+getDOMHTMLIFrameElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLIFrameElementName :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLIFrameElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLIFrameElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLIFrameElementName val = constructObjectPropertyString "name" val++data DOMHTMLIFrameElementNamePropertyInfo+instance AttrInfo DOMHTMLIFrameElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLIFrameElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLIFrameElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLIFrameElementNamePropertyInfo = DOMHTMLIFrameElementK+ type AttrGetType DOMHTMLIFrameElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLIFrameElementNamePropertyInfo = "DOMHTMLIFrameElement::name"+ attrGet _ = getDOMHTMLIFrameElementName+ attrSet _ = setDOMHTMLIFrameElementName+ attrConstruct _ = constructDOMHTMLIFrameElementName++-- VVV Prop "sandbox"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLIFrameElementSandbox :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> m T.Text+getDOMHTMLIFrameElementSandbox obj = liftIO $ getObjectPropertyString obj "sandbox"++setDOMHTMLIFrameElementSandbox :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLIFrameElementSandbox obj val = liftIO $ setObjectPropertyString obj "sandbox" val++constructDOMHTMLIFrameElementSandbox :: T.Text -> IO ([Char], GValue)+constructDOMHTMLIFrameElementSandbox val = constructObjectPropertyString "sandbox" val++data DOMHTMLIFrameElementSandboxPropertyInfo+instance AttrInfo DOMHTMLIFrameElementSandboxPropertyInfo where+ type AttrAllowedOps DOMHTMLIFrameElementSandboxPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLIFrameElementSandboxPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLIFrameElementSandboxPropertyInfo = DOMHTMLIFrameElementK+ type AttrGetType DOMHTMLIFrameElementSandboxPropertyInfo = T.Text+ type AttrLabel DOMHTMLIFrameElementSandboxPropertyInfo = "DOMHTMLIFrameElement::sandbox"+ attrGet _ = getDOMHTMLIFrameElementSandbox+ attrSet _ = setDOMHTMLIFrameElementSandbox+ attrConstruct _ = constructDOMHTMLIFrameElementSandbox++-- VVV Prop "scrolling"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLIFrameElementScrolling :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> m T.Text+getDOMHTMLIFrameElementScrolling obj = liftIO $ getObjectPropertyString obj "scrolling"++setDOMHTMLIFrameElementScrolling :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLIFrameElementScrolling obj val = liftIO $ setObjectPropertyString obj "scrolling" val++constructDOMHTMLIFrameElementScrolling :: T.Text -> IO ([Char], GValue)+constructDOMHTMLIFrameElementScrolling val = constructObjectPropertyString "scrolling" val++data DOMHTMLIFrameElementScrollingPropertyInfo+instance AttrInfo DOMHTMLIFrameElementScrollingPropertyInfo where+ type AttrAllowedOps DOMHTMLIFrameElementScrollingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLIFrameElementScrollingPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLIFrameElementScrollingPropertyInfo = DOMHTMLIFrameElementK+ type AttrGetType DOMHTMLIFrameElementScrollingPropertyInfo = T.Text+ type AttrLabel DOMHTMLIFrameElementScrollingPropertyInfo = "DOMHTMLIFrameElement::scrolling"+ attrGet _ = getDOMHTMLIFrameElementScrolling+ attrSet _ = setDOMHTMLIFrameElementScrolling+ attrConstruct _ = constructDOMHTMLIFrameElementScrolling++-- VVV Prop "seamless"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLIFrameElementSeamless :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> m Bool+getDOMHTMLIFrameElementSeamless obj = liftIO $ getObjectPropertyBool obj "seamless"++setDOMHTMLIFrameElementSeamless :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> Bool -> m ()+setDOMHTMLIFrameElementSeamless obj val = liftIO $ setObjectPropertyBool obj "seamless" val++constructDOMHTMLIFrameElementSeamless :: Bool -> IO ([Char], GValue)+constructDOMHTMLIFrameElementSeamless val = constructObjectPropertyBool "seamless" val++data DOMHTMLIFrameElementSeamlessPropertyInfo+instance AttrInfo DOMHTMLIFrameElementSeamlessPropertyInfo where+ type AttrAllowedOps DOMHTMLIFrameElementSeamlessPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLIFrameElementSeamlessPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLIFrameElementSeamlessPropertyInfo = DOMHTMLIFrameElementK+ type AttrGetType DOMHTMLIFrameElementSeamlessPropertyInfo = Bool+ type AttrLabel DOMHTMLIFrameElementSeamlessPropertyInfo = "DOMHTMLIFrameElement::seamless"+ attrGet _ = getDOMHTMLIFrameElementSeamless+ attrSet _ = setDOMHTMLIFrameElementSeamless+ attrConstruct _ = constructDOMHTMLIFrameElementSeamless++-- VVV Prop "src"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLIFrameElementSrc :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> m T.Text+getDOMHTMLIFrameElementSrc obj = liftIO $ getObjectPropertyString obj "src"++setDOMHTMLIFrameElementSrc :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLIFrameElementSrc obj val = liftIO $ setObjectPropertyString obj "src" val++constructDOMHTMLIFrameElementSrc :: T.Text -> IO ([Char], GValue)+constructDOMHTMLIFrameElementSrc val = constructObjectPropertyString "src" val++data DOMHTMLIFrameElementSrcPropertyInfo+instance AttrInfo DOMHTMLIFrameElementSrcPropertyInfo where+ type AttrAllowedOps DOMHTMLIFrameElementSrcPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLIFrameElementSrcPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLIFrameElementSrcPropertyInfo = DOMHTMLIFrameElementK+ type AttrGetType DOMHTMLIFrameElementSrcPropertyInfo = T.Text+ type AttrLabel DOMHTMLIFrameElementSrcPropertyInfo = "DOMHTMLIFrameElement::src"+ attrGet _ = getDOMHTMLIFrameElementSrc+ attrSet _ = setDOMHTMLIFrameElementSrc+ attrConstruct _ = constructDOMHTMLIFrameElementSrc++-- VVV Prop "srcdoc"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLIFrameElementSrcdoc :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> m T.Text+getDOMHTMLIFrameElementSrcdoc obj = liftIO $ getObjectPropertyString obj "srcdoc"++setDOMHTMLIFrameElementSrcdoc :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLIFrameElementSrcdoc obj val = liftIO $ setObjectPropertyString obj "srcdoc" val++constructDOMHTMLIFrameElementSrcdoc :: T.Text -> IO ([Char], GValue)+constructDOMHTMLIFrameElementSrcdoc val = constructObjectPropertyString "srcdoc" val++data DOMHTMLIFrameElementSrcdocPropertyInfo+instance AttrInfo DOMHTMLIFrameElementSrcdocPropertyInfo where+ type AttrAllowedOps DOMHTMLIFrameElementSrcdocPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLIFrameElementSrcdocPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLIFrameElementSrcdocPropertyInfo = DOMHTMLIFrameElementK+ type AttrGetType DOMHTMLIFrameElementSrcdocPropertyInfo = T.Text+ type AttrLabel DOMHTMLIFrameElementSrcdocPropertyInfo = "DOMHTMLIFrameElement::srcdoc"+ attrGet _ = getDOMHTMLIFrameElementSrcdoc+ attrSet _ = setDOMHTMLIFrameElementSrcdoc+ attrConstruct _ = constructDOMHTMLIFrameElementSrcdoc++-- VVV Prop "width"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLIFrameElementWidth :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> m T.Text+getDOMHTMLIFrameElementWidth obj = liftIO $ getObjectPropertyString obj "width"++setDOMHTMLIFrameElementWidth :: (MonadIO m, DOMHTMLIFrameElementK o) => o -> T.Text -> m ()+setDOMHTMLIFrameElementWidth obj val = liftIO $ setObjectPropertyString obj "width" val++constructDOMHTMLIFrameElementWidth :: T.Text -> IO ([Char], GValue)+constructDOMHTMLIFrameElementWidth val = constructObjectPropertyString "width" val++data DOMHTMLIFrameElementWidthPropertyInfo+instance AttrInfo DOMHTMLIFrameElementWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLIFrameElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLIFrameElementWidthPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLIFrameElementWidthPropertyInfo = DOMHTMLIFrameElementK+ type AttrGetType DOMHTMLIFrameElementWidthPropertyInfo = T.Text+ type AttrLabel DOMHTMLIFrameElementWidthPropertyInfo = "DOMHTMLIFrameElement::width"+ attrGet _ = getDOMHTMLIFrameElementWidth+ attrSet _ = setDOMHTMLIFrameElementWidth+ attrConstruct _ = constructDOMHTMLIFrameElementWidth++type instance AttributeList DOMHTMLIFrameElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLIFrameElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-document", DOMHTMLIFrameElementContentDocumentPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("content-window", DOMHTMLIFrameElementContentWindowPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("frame-border", DOMHTMLIFrameElementFrameBorderPropertyInfo), '("height", DOMHTMLIFrameElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("long-desc", DOMHTMLIFrameElementLongDescPropertyInfo), '("margin-height", DOMHTMLIFrameElementMarginHeightPropertyInfo), '("margin-width", DOMHTMLIFrameElementMarginWidthPropertyInfo), '("name", DOMHTMLIFrameElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("sandbox", DOMHTMLIFrameElementSandboxPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("scrolling", DOMHTMLIFrameElementScrollingPropertyInfo), '("seamless", DOMHTMLIFrameElementSeamlessPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLIFrameElementSrcPropertyInfo), '("srcdoc", DOMHTMLIFrameElementSrcdocPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLIFrameElementWidthPropertyInfo)]++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLImageElementAlign :: (MonadIO m, DOMHTMLImageElementK o) => o -> m T.Text+getDOMHTMLImageElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLImageElementAlign :: (MonadIO m, DOMHTMLImageElementK o) => o -> T.Text -> m ()+setDOMHTMLImageElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLImageElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLImageElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLImageElementAlignPropertyInfo+instance AttrInfo DOMHTMLImageElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLImageElementAlignPropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLImageElementAlignPropertyInfo = "DOMHTMLImageElement::align"+ attrGet _ = getDOMHTMLImageElementAlign+ attrSet _ = setDOMHTMLImageElementAlign+ attrConstruct _ = constructDOMHTMLImageElementAlign++-- VVV Prop "alt"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLImageElementAlt :: (MonadIO m, DOMHTMLImageElementK o) => o -> m T.Text+getDOMHTMLImageElementAlt obj = liftIO $ getObjectPropertyString obj "alt"++setDOMHTMLImageElementAlt :: (MonadIO m, DOMHTMLImageElementK o) => o -> T.Text -> m ()+setDOMHTMLImageElementAlt obj val = liftIO $ setObjectPropertyString obj "alt" val++constructDOMHTMLImageElementAlt :: T.Text -> IO ([Char], GValue)+constructDOMHTMLImageElementAlt val = constructObjectPropertyString "alt" val++data DOMHTMLImageElementAltPropertyInfo+instance AttrInfo DOMHTMLImageElementAltPropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementAltPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementAltPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLImageElementAltPropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementAltPropertyInfo = T.Text+ type AttrLabel DOMHTMLImageElementAltPropertyInfo = "DOMHTMLImageElement::alt"+ attrGet _ = getDOMHTMLImageElementAlt+ attrSet _ = setDOMHTMLImageElementAlt+ attrConstruct _ = constructDOMHTMLImageElementAlt++-- VVV Prop "border"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLImageElementBorder :: (MonadIO m, DOMHTMLImageElementK o) => o -> m T.Text+getDOMHTMLImageElementBorder obj = liftIO $ getObjectPropertyString obj "border"++setDOMHTMLImageElementBorder :: (MonadIO m, DOMHTMLImageElementK o) => o -> T.Text -> m ()+setDOMHTMLImageElementBorder obj val = liftIO $ setObjectPropertyString obj "border" val++constructDOMHTMLImageElementBorder :: T.Text -> IO ([Char], GValue)+constructDOMHTMLImageElementBorder val = constructObjectPropertyString "border" val++data DOMHTMLImageElementBorderPropertyInfo+instance AttrInfo DOMHTMLImageElementBorderPropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementBorderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementBorderPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLImageElementBorderPropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementBorderPropertyInfo = T.Text+ type AttrLabel DOMHTMLImageElementBorderPropertyInfo = "DOMHTMLImageElement::border"+ attrGet _ = getDOMHTMLImageElementBorder+ attrSet _ = setDOMHTMLImageElementBorder+ attrConstruct _ = constructDOMHTMLImageElementBorder++-- VVV Prop "complete"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMHTMLImageElementComplete :: (MonadIO m, DOMHTMLImageElementK o) => o -> m Bool+getDOMHTMLImageElementComplete obj = liftIO $ getObjectPropertyBool obj "complete"++data DOMHTMLImageElementCompletePropertyInfo+instance AttrInfo DOMHTMLImageElementCompletePropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementCompletePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementCompletePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLImageElementCompletePropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementCompletePropertyInfo = Bool+ type AttrLabel DOMHTMLImageElementCompletePropertyInfo = "DOMHTMLImageElement::complete"+ attrGet _ = getDOMHTMLImageElementComplete+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "cross-origin"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLImageElementCrossOrigin :: (MonadIO m, DOMHTMLImageElementK o) => o -> m T.Text+getDOMHTMLImageElementCrossOrigin obj = liftIO $ getObjectPropertyString obj "cross-origin"++setDOMHTMLImageElementCrossOrigin :: (MonadIO m, DOMHTMLImageElementK o) => o -> T.Text -> m ()+setDOMHTMLImageElementCrossOrigin obj val = liftIO $ setObjectPropertyString obj "cross-origin" val++constructDOMHTMLImageElementCrossOrigin :: T.Text -> IO ([Char], GValue)+constructDOMHTMLImageElementCrossOrigin val = constructObjectPropertyString "cross-origin" val++data DOMHTMLImageElementCrossOriginPropertyInfo+instance AttrInfo DOMHTMLImageElementCrossOriginPropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementCrossOriginPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementCrossOriginPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLImageElementCrossOriginPropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementCrossOriginPropertyInfo = T.Text+ type AttrLabel DOMHTMLImageElementCrossOriginPropertyInfo = "DOMHTMLImageElement::cross-origin"+ attrGet _ = getDOMHTMLImageElementCrossOrigin+ attrSet _ = setDOMHTMLImageElementCrossOrigin+ attrConstruct _ = constructDOMHTMLImageElementCrossOrigin++-- VVV Prop "height"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLImageElementHeight :: (MonadIO m, DOMHTMLImageElementK o) => o -> m Int64+getDOMHTMLImageElementHeight obj = liftIO $ getObjectPropertyInt64 obj "height"++setDOMHTMLImageElementHeight :: (MonadIO m, DOMHTMLImageElementK o) => o -> Int64 -> m ()+setDOMHTMLImageElementHeight obj val = liftIO $ setObjectPropertyInt64 obj "height" val++constructDOMHTMLImageElementHeight :: Int64 -> IO ([Char], GValue)+constructDOMHTMLImageElementHeight val = constructObjectPropertyInt64 "height" val++data DOMHTMLImageElementHeightPropertyInfo+instance AttrInfo DOMHTMLImageElementHeightPropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementHeightPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLImageElementHeightPropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementHeightPropertyInfo = Int64+ type AttrLabel DOMHTMLImageElementHeightPropertyInfo = "DOMHTMLImageElement::height"+ attrGet _ = getDOMHTMLImageElementHeight+ attrSet _ = setDOMHTMLImageElementHeight+ attrConstruct _ = constructDOMHTMLImageElementHeight++-- VVV Prop "hspace"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLImageElementHspace :: (MonadIO m, DOMHTMLImageElementK o) => o -> m Int64+getDOMHTMLImageElementHspace obj = liftIO $ getObjectPropertyInt64 obj "hspace"++setDOMHTMLImageElementHspace :: (MonadIO m, DOMHTMLImageElementK o) => o -> Int64 -> m ()+setDOMHTMLImageElementHspace obj val = liftIO $ setObjectPropertyInt64 obj "hspace" val++constructDOMHTMLImageElementHspace :: Int64 -> IO ([Char], GValue)+constructDOMHTMLImageElementHspace val = constructObjectPropertyInt64 "hspace" val++data DOMHTMLImageElementHspacePropertyInfo+instance AttrInfo DOMHTMLImageElementHspacePropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementHspacePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementHspacePropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLImageElementHspacePropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementHspacePropertyInfo = Int64+ type AttrLabel DOMHTMLImageElementHspacePropertyInfo = "DOMHTMLImageElement::hspace"+ attrGet _ = getDOMHTMLImageElementHspace+ attrSet _ = setDOMHTMLImageElementHspace+ attrConstruct _ = constructDOMHTMLImageElementHspace++-- VVV Prop "is-map"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLImageElementIsMap :: (MonadIO m, DOMHTMLImageElementK o) => o -> m Bool+getDOMHTMLImageElementIsMap obj = liftIO $ getObjectPropertyBool obj "is-map"++setDOMHTMLImageElementIsMap :: (MonadIO m, DOMHTMLImageElementK o) => o -> Bool -> m ()+setDOMHTMLImageElementIsMap obj val = liftIO $ setObjectPropertyBool obj "is-map" val++constructDOMHTMLImageElementIsMap :: Bool -> IO ([Char], GValue)+constructDOMHTMLImageElementIsMap val = constructObjectPropertyBool "is-map" val++data DOMHTMLImageElementIsMapPropertyInfo+instance AttrInfo DOMHTMLImageElementIsMapPropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementIsMapPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementIsMapPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLImageElementIsMapPropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementIsMapPropertyInfo = Bool+ type AttrLabel DOMHTMLImageElementIsMapPropertyInfo = "DOMHTMLImageElement::is-map"+ attrGet _ = getDOMHTMLImageElementIsMap+ attrSet _ = setDOMHTMLImageElementIsMap+ attrConstruct _ = constructDOMHTMLImageElementIsMap++-- VVV Prop "long-desc"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLImageElementLongDesc :: (MonadIO m, DOMHTMLImageElementK o) => o -> m T.Text+getDOMHTMLImageElementLongDesc obj = liftIO $ getObjectPropertyString obj "long-desc"++setDOMHTMLImageElementLongDesc :: (MonadIO m, DOMHTMLImageElementK o) => o -> T.Text -> m ()+setDOMHTMLImageElementLongDesc obj val = liftIO $ setObjectPropertyString obj "long-desc" val++constructDOMHTMLImageElementLongDesc :: T.Text -> IO ([Char], GValue)+constructDOMHTMLImageElementLongDesc val = constructObjectPropertyString "long-desc" val++data DOMHTMLImageElementLongDescPropertyInfo+instance AttrInfo DOMHTMLImageElementLongDescPropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementLongDescPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementLongDescPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLImageElementLongDescPropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementLongDescPropertyInfo = T.Text+ type AttrLabel DOMHTMLImageElementLongDescPropertyInfo = "DOMHTMLImageElement::long-desc"+ attrGet _ = getDOMHTMLImageElementLongDesc+ attrSet _ = setDOMHTMLImageElementLongDesc+ attrConstruct _ = constructDOMHTMLImageElementLongDesc++-- VVV Prop "lowsrc"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLImageElementLowsrc :: (MonadIO m, DOMHTMLImageElementK o) => o -> m T.Text+getDOMHTMLImageElementLowsrc obj = liftIO $ getObjectPropertyString obj "lowsrc"++setDOMHTMLImageElementLowsrc :: (MonadIO m, DOMHTMLImageElementK o) => o -> T.Text -> m ()+setDOMHTMLImageElementLowsrc obj val = liftIO $ setObjectPropertyString obj "lowsrc" val++constructDOMHTMLImageElementLowsrc :: T.Text -> IO ([Char], GValue)+constructDOMHTMLImageElementLowsrc val = constructObjectPropertyString "lowsrc" val++data DOMHTMLImageElementLowsrcPropertyInfo+instance AttrInfo DOMHTMLImageElementLowsrcPropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementLowsrcPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementLowsrcPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLImageElementLowsrcPropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementLowsrcPropertyInfo = T.Text+ type AttrLabel DOMHTMLImageElementLowsrcPropertyInfo = "DOMHTMLImageElement::lowsrc"+ attrGet _ = getDOMHTMLImageElementLowsrc+ attrSet _ = setDOMHTMLImageElementLowsrc+ attrConstruct _ = constructDOMHTMLImageElementLowsrc++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLImageElementName :: (MonadIO m, DOMHTMLImageElementK o) => o -> m T.Text+getDOMHTMLImageElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLImageElementName :: (MonadIO m, DOMHTMLImageElementK o) => o -> T.Text -> m ()+setDOMHTMLImageElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLImageElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLImageElementName val = constructObjectPropertyString "name" val++data DOMHTMLImageElementNamePropertyInfo+instance AttrInfo DOMHTMLImageElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLImageElementNamePropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLImageElementNamePropertyInfo = "DOMHTMLImageElement::name"+ attrGet _ = getDOMHTMLImageElementName+ attrSet _ = setDOMHTMLImageElementName+ attrConstruct _ = constructDOMHTMLImageElementName++-- VVV Prop "natural-height"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMHTMLImageElementNaturalHeight :: (MonadIO m, DOMHTMLImageElementK o) => o -> m Int64+getDOMHTMLImageElementNaturalHeight obj = liftIO $ getObjectPropertyInt64 obj "natural-height"++data DOMHTMLImageElementNaturalHeightPropertyInfo+instance AttrInfo DOMHTMLImageElementNaturalHeightPropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementNaturalHeightPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementNaturalHeightPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLImageElementNaturalHeightPropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementNaturalHeightPropertyInfo = Int64+ type AttrLabel DOMHTMLImageElementNaturalHeightPropertyInfo = "DOMHTMLImageElement::natural-height"+ attrGet _ = getDOMHTMLImageElementNaturalHeight+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "natural-width"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMHTMLImageElementNaturalWidth :: (MonadIO m, DOMHTMLImageElementK o) => o -> m Int64+getDOMHTMLImageElementNaturalWidth obj = liftIO $ getObjectPropertyInt64 obj "natural-width"++data DOMHTMLImageElementNaturalWidthPropertyInfo+instance AttrInfo DOMHTMLImageElementNaturalWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementNaturalWidthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementNaturalWidthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLImageElementNaturalWidthPropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementNaturalWidthPropertyInfo = Int64+ type AttrLabel DOMHTMLImageElementNaturalWidthPropertyInfo = "DOMHTMLImageElement::natural-width"+ attrGet _ = getDOMHTMLImageElementNaturalWidth+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "src"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLImageElementSrc :: (MonadIO m, DOMHTMLImageElementK o) => o -> m T.Text+getDOMHTMLImageElementSrc obj = liftIO $ getObjectPropertyString obj "src"++setDOMHTMLImageElementSrc :: (MonadIO m, DOMHTMLImageElementK o) => o -> T.Text -> m ()+setDOMHTMLImageElementSrc obj val = liftIO $ setObjectPropertyString obj "src" val++constructDOMHTMLImageElementSrc :: T.Text -> IO ([Char], GValue)+constructDOMHTMLImageElementSrc val = constructObjectPropertyString "src" val++data DOMHTMLImageElementSrcPropertyInfo+instance AttrInfo DOMHTMLImageElementSrcPropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementSrcPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementSrcPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLImageElementSrcPropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementSrcPropertyInfo = T.Text+ type AttrLabel DOMHTMLImageElementSrcPropertyInfo = "DOMHTMLImageElement::src"+ attrGet _ = getDOMHTMLImageElementSrc+ attrSet _ = setDOMHTMLImageElementSrc+ attrConstruct _ = constructDOMHTMLImageElementSrc++-- VVV Prop "srcset"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLImageElementSrcset :: (MonadIO m, DOMHTMLImageElementK o) => o -> m T.Text+getDOMHTMLImageElementSrcset obj = liftIO $ getObjectPropertyString obj "srcset"++setDOMHTMLImageElementSrcset :: (MonadIO m, DOMHTMLImageElementK o) => o -> T.Text -> m ()+setDOMHTMLImageElementSrcset obj val = liftIO $ setObjectPropertyString obj "srcset" val++constructDOMHTMLImageElementSrcset :: T.Text -> IO ([Char], GValue)+constructDOMHTMLImageElementSrcset val = constructObjectPropertyString "srcset" val++data DOMHTMLImageElementSrcsetPropertyInfo+instance AttrInfo DOMHTMLImageElementSrcsetPropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementSrcsetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementSrcsetPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLImageElementSrcsetPropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementSrcsetPropertyInfo = T.Text+ type AttrLabel DOMHTMLImageElementSrcsetPropertyInfo = "DOMHTMLImageElement::srcset"+ attrGet _ = getDOMHTMLImageElementSrcset+ attrSet _ = setDOMHTMLImageElementSrcset+ attrConstruct _ = constructDOMHTMLImageElementSrcset++-- VVV Prop "use-map"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLImageElementUseMap :: (MonadIO m, DOMHTMLImageElementK o) => o -> m T.Text+getDOMHTMLImageElementUseMap obj = liftIO $ getObjectPropertyString obj "use-map"++setDOMHTMLImageElementUseMap :: (MonadIO m, DOMHTMLImageElementK o) => o -> T.Text -> m ()+setDOMHTMLImageElementUseMap obj val = liftIO $ setObjectPropertyString obj "use-map" val++constructDOMHTMLImageElementUseMap :: T.Text -> IO ([Char], GValue)+constructDOMHTMLImageElementUseMap val = constructObjectPropertyString "use-map" val++data DOMHTMLImageElementUseMapPropertyInfo+instance AttrInfo DOMHTMLImageElementUseMapPropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementUseMapPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementUseMapPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLImageElementUseMapPropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementUseMapPropertyInfo = T.Text+ type AttrLabel DOMHTMLImageElementUseMapPropertyInfo = "DOMHTMLImageElement::use-map"+ attrGet _ = getDOMHTMLImageElementUseMap+ attrSet _ = setDOMHTMLImageElementUseMap+ attrConstruct _ = constructDOMHTMLImageElementUseMap++-- VVV Prop "vspace"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLImageElementVspace :: (MonadIO m, DOMHTMLImageElementK o) => o -> m Int64+getDOMHTMLImageElementVspace obj = liftIO $ getObjectPropertyInt64 obj "vspace"++setDOMHTMLImageElementVspace :: (MonadIO m, DOMHTMLImageElementK o) => o -> Int64 -> m ()+setDOMHTMLImageElementVspace obj val = liftIO $ setObjectPropertyInt64 obj "vspace" val++constructDOMHTMLImageElementVspace :: Int64 -> IO ([Char], GValue)+constructDOMHTMLImageElementVspace val = constructObjectPropertyInt64 "vspace" val++data DOMHTMLImageElementVspacePropertyInfo+instance AttrInfo DOMHTMLImageElementVspacePropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementVspacePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementVspacePropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLImageElementVspacePropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementVspacePropertyInfo = Int64+ type AttrLabel DOMHTMLImageElementVspacePropertyInfo = "DOMHTMLImageElement::vspace"+ attrGet _ = getDOMHTMLImageElementVspace+ attrSet _ = setDOMHTMLImageElementVspace+ attrConstruct _ = constructDOMHTMLImageElementVspace++-- VVV Prop "width"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLImageElementWidth :: (MonadIO m, DOMHTMLImageElementK o) => o -> m Int64+getDOMHTMLImageElementWidth obj = liftIO $ getObjectPropertyInt64 obj "width"++setDOMHTMLImageElementWidth :: (MonadIO m, DOMHTMLImageElementK o) => o -> Int64 -> m ()+setDOMHTMLImageElementWidth obj val = liftIO $ setObjectPropertyInt64 obj "width" val++constructDOMHTMLImageElementWidth :: Int64 -> IO ([Char], GValue)+constructDOMHTMLImageElementWidth val = constructObjectPropertyInt64 "width" val++data DOMHTMLImageElementWidthPropertyInfo+instance AttrInfo DOMHTMLImageElementWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementWidthPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLImageElementWidthPropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementWidthPropertyInfo = Int64+ type AttrLabel DOMHTMLImageElementWidthPropertyInfo = "DOMHTMLImageElement::width"+ attrGet _ = getDOMHTMLImageElementWidth+ attrSet _ = setDOMHTMLImageElementWidth+ attrConstruct _ = constructDOMHTMLImageElementWidth++-- VVV Prop "x"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMHTMLImageElementX :: (MonadIO m, DOMHTMLImageElementK o) => o -> m Int64+getDOMHTMLImageElementX obj = liftIO $ getObjectPropertyInt64 obj "x"++data DOMHTMLImageElementXPropertyInfo+instance AttrInfo DOMHTMLImageElementXPropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementXPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementXPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLImageElementXPropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementXPropertyInfo = Int64+ type AttrLabel DOMHTMLImageElementXPropertyInfo = "DOMHTMLImageElement::x"+ attrGet _ = getDOMHTMLImageElementX+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "y"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMHTMLImageElementY :: (MonadIO m, DOMHTMLImageElementK o) => o -> m Int64+getDOMHTMLImageElementY obj = liftIO $ getObjectPropertyInt64 obj "y"++data DOMHTMLImageElementYPropertyInfo+instance AttrInfo DOMHTMLImageElementYPropertyInfo where+ type AttrAllowedOps DOMHTMLImageElementYPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLImageElementYPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLImageElementYPropertyInfo = DOMHTMLImageElementK+ type AttrGetType DOMHTMLImageElementYPropertyInfo = Int64+ type AttrLabel DOMHTMLImageElementYPropertyInfo = "DOMHTMLImageElement::y"+ attrGet _ = getDOMHTMLImageElementY+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMHTMLImageElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLImageElementAlignPropertyInfo), '("alt", DOMHTMLImageElementAltPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("border", DOMHTMLImageElementBorderPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("complete", DOMHTMLImageElementCompletePropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("cross-origin", DOMHTMLImageElementCrossOriginPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLImageElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("hspace", DOMHTMLImageElementHspacePropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("is-map", DOMHTMLImageElementIsMapPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("long-desc", DOMHTMLImageElementLongDescPropertyInfo), '("lowsrc", DOMHTMLImageElementLowsrcPropertyInfo), '("name", DOMHTMLImageElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("natural-height", DOMHTMLImageElementNaturalHeightPropertyInfo), '("natural-width", DOMHTMLImageElementNaturalWidthPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLImageElementSrcPropertyInfo), '("srcset", DOMHTMLImageElementSrcsetPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("use-map", DOMHTMLImageElementUseMapPropertyInfo), '("vspace", DOMHTMLImageElementVspacePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLImageElementWidthPropertyInfo), '("x", DOMHTMLImageElementXPropertyInfo), '("y", DOMHTMLImageElementYPropertyInfo)]++-- VVV Prop "accept"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementAccept :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementAccept obj = liftIO $ getObjectPropertyString obj "accept"++setDOMHTMLInputElementAccept :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementAccept obj val = liftIO $ setObjectPropertyString obj "accept" val++constructDOMHTMLInputElementAccept :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementAccept val = constructObjectPropertyString "accept" val++data DOMHTMLInputElementAcceptPropertyInfo+instance AttrInfo DOMHTMLInputElementAcceptPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementAcceptPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementAcceptPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementAcceptPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementAcceptPropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementAcceptPropertyInfo = "DOMHTMLInputElement::accept"+ attrGet _ = getDOMHTMLInputElementAccept+ attrSet _ = setDOMHTMLInputElementAccept+ attrConstruct _ = constructDOMHTMLInputElementAccept++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementAlign :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLInputElementAlign :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLInputElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLInputElementAlignPropertyInfo+instance AttrInfo DOMHTMLInputElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementAlignPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementAlignPropertyInfo = "DOMHTMLInputElement::align"+ attrGet _ = getDOMHTMLInputElementAlign+ attrSet _ = setDOMHTMLInputElementAlign+ attrConstruct _ = constructDOMHTMLInputElementAlign++-- VVV Prop "alt"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementAlt :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementAlt obj = liftIO $ getObjectPropertyString obj "alt"++setDOMHTMLInputElementAlt :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementAlt obj val = liftIO $ setObjectPropertyString obj "alt" val++constructDOMHTMLInputElementAlt :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementAlt val = constructObjectPropertyString "alt" val++data DOMHTMLInputElementAltPropertyInfo+instance AttrInfo DOMHTMLInputElementAltPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementAltPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementAltPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementAltPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementAltPropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementAltPropertyInfo = "DOMHTMLInputElement::alt"+ attrGet _ = getDOMHTMLInputElementAlt+ attrSet _ = setDOMHTMLInputElementAlt+ attrConstruct _ = constructDOMHTMLInputElementAlt++-- VVV Prop "autocapitalize"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementAutocapitalize :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementAutocapitalize obj = liftIO $ getObjectPropertyString obj "autocapitalize"++setDOMHTMLInputElementAutocapitalize :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementAutocapitalize obj val = liftIO $ setObjectPropertyString obj "autocapitalize" val++constructDOMHTMLInputElementAutocapitalize :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementAutocapitalize val = constructObjectPropertyString "autocapitalize" val++data DOMHTMLInputElementAutocapitalizePropertyInfo+instance AttrInfo DOMHTMLInputElementAutocapitalizePropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementAutocapitalizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementAutocapitalizePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementAutocapitalizePropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementAutocapitalizePropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementAutocapitalizePropertyInfo = "DOMHTMLInputElement::autocapitalize"+ attrGet _ = getDOMHTMLInputElementAutocapitalize+ attrSet _ = setDOMHTMLInputElementAutocapitalize+ attrConstruct _ = constructDOMHTMLInputElementAutocapitalize++-- VVV Prop "autocomplete"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementAutocomplete :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementAutocomplete obj = liftIO $ getObjectPropertyString obj "autocomplete"++setDOMHTMLInputElementAutocomplete :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementAutocomplete obj val = liftIO $ setObjectPropertyString obj "autocomplete" val++constructDOMHTMLInputElementAutocomplete :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementAutocomplete val = constructObjectPropertyString "autocomplete" val++data DOMHTMLInputElementAutocompletePropertyInfo+instance AttrInfo DOMHTMLInputElementAutocompletePropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementAutocompletePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementAutocompletePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementAutocompletePropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementAutocompletePropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementAutocompletePropertyInfo = "DOMHTMLInputElement::autocomplete"+ attrGet _ = getDOMHTMLInputElementAutocomplete+ attrSet _ = setDOMHTMLInputElementAutocomplete+ attrConstruct _ = constructDOMHTMLInputElementAutocomplete++-- VVV Prop "autocorrect"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementAutocorrect :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool+getDOMHTMLInputElementAutocorrect obj = liftIO $ getObjectPropertyBool obj "autocorrect"++setDOMHTMLInputElementAutocorrect :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m ()+setDOMHTMLInputElementAutocorrect obj val = liftIO $ setObjectPropertyBool obj "autocorrect" val++constructDOMHTMLInputElementAutocorrect :: Bool -> IO ([Char], GValue)+constructDOMHTMLInputElementAutocorrect val = constructObjectPropertyBool "autocorrect" val++data DOMHTMLInputElementAutocorrectPropertyInfo+instance AttrInfo DOMHTMLInputElementAutocorrectPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementAutocorrectPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementAutocorrectPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLInputElementAutocorrectPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementAutocorrectPropertyInfo = Bool+ type AttrLabel DOMHTMLInputElementAutocorrectPropertyInfo = "DOMHTMLInputElement::autocorrect"+ attrGet _ = getDOMHTMLInputElementAutocorrect+ attrSet _ = setDOMHTMLInputElementAutocorrect+ attrConstruct _ = constructDOMHTMLInputElementAutocorrect++-- VVV Prop "autofocus"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementAutofocus :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool+getDOMHTMLInputElementAutofocus obj = liftIO $ getObjectPropertyBool obj "autofocus"++setDOMHTMLInputElementAutofocus :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m ()+setDOMHTMLInputElementAutofocus obj val = liftIO $ setObjectPropertyBool obj "autofocus" val++constructDOMHTMLInputElementAutofocus :: Bool -> IO ([Char], GValue)+constructDOMHTMLInputElementAutofocus val = constructObjectPropertyBool "autofocus" val++data DOMHTMLInputElementAutofocusPropertyInfo+instance AttrInfo DOMHTMLInputElementAutofocusPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementAutofocusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementAutofocusPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLInputElementAutofocusPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementAutofocusPropertyInfo = Bool+ type AttrLabel DOMHTMLInputElementAutofocusPropertyInfo = "DOMHTMLInputElement::autofocus"+ attrGet _ = getDOMHTMLInputElementAutofocus+ attrSet _ = setDOMHTMLInputElementAutofocus+ attrConstruct _ = constructDOMHTMLInputElementAutofocus++-- VVV Prop "capture"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementCapture :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementCapture obj = liftIO $ getObjectPropertyString obj "capture"++setDOMHTMLInputElementCapture :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementCapture obj val = liftIO $ setObjectPropertyString obj "capture" val++constructDOMHTMLInputElementCapture :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementCapture val = constructObjectPropertyString "capture" val++data DOMHTMLInputElementCapturePropertyInfo+instance AttrInfo DOMHTMLInputElementCapturePropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementCapturePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementCapturePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementCapturePropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementCapturePropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementCapturePropertyInfo = "DOMHTMLInputElement::capture"+ attrGet _ = getDOMHTMLInputElementCapture+ attrSet _ = setDOMHTMLInputElementCapture+ attrConstruct _ = constructDOMHTMLInputElementCapture++-- VVV Prop "checked"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementChecked :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool+getDOMHTMLInputElementChecked obj = liftIO $ getObjectPropertyBool obj "checked"++setDOMHTMLInputElementChecked :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m ()+setDOMHTMLInputElementChecked obj val = liftIO $ setObjectPropertyBool obj "checked" val++constructDOMHTMLInputElementChecked :: Bool -> IO ([Char], GValue)+constructDOMHTMLInputElementChecked val = constructObjectPropertyBool "checked" val++data DOMHTMLInputElementCheckedPropertyInfo+instance AttrInfo DOMHTMLInputElementCheckedPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementCheckedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementCheckedPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLInputElementCheckedPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementCheckedPropertyInfo = Bool+ type AttrLabel DOMHTMLInputElementCheckedPropertyInfo = "DOMHTMLInputElement::checked"+ attrGet _ = getDOMHTMLInputElementChecked+ attrSet _ = setDOMHTMLInputElementChecked+ attrConstruct _ = constructDOMHTMLInputElementChecked++-- VVV Prop "default-checked"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementDefaultChecked :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool+getDOMHTMLInputElementDefaultChecked obj = liftIO $ getObjectPropertyBool obj "default-checked"++setDOMHTMLInputElementDefaultChecked :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m ()+setDOMHTMLInputElementDefaultChecked obj val = liftIO $ setObjectPropertyBool obj "default-checked" val++constructDOMHTMLInputElementDefaultChecked :: Bool -> IO ([Char], GValue)+constructDOMHTMLInputElementDefaultChecked val = constructObjectPropertyBool "default-checked" val++data DOMHTMLInputElementDefaultCheckedPropertyInfo+instance AttrInfo DOMHTMLInputElementDefaultCheckedPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementDefaultCheckedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementDefaultCheckedPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLInputElementDefaultCheckedPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementDefaultCheckedPropertyInfo = Bool+ type AttrLabel DOMHTMLInputElementDefaultCheckedPropertyInfo = "DOMHTMLInputElement::default-checked"+ attrGet _ = getDOMHTMLInputElementDefaultChecked+ attrSet _ = setDOMHTMLInputElementDefaultChecked+ attrConstruct _ = constructDOMHTMLInputElementDefaultChecked++-- VVV Prop "default-value"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementDefaultValue :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementDefaultValue obj = liftIO $ getObjectPropertyString obj "default-value"++setDOMHTMLInputElementDefaultValue :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementDefaultValue obj val = liftIO $ setObjectPropertyString obj "default-value" val++constructDOMHTMLInputElementDefaultValue :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementDefaultValue val = constructObjectPropertyString "default-value" val++data DOMHTMLInputElementDefaultValuePropertyInfo+instance AttrInfo DOMHTMLInputElementDefaultValuePropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementDefaultValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementDefaultValuePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementDefaultValuePropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementDefaultValuePropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementDefaultValuePropertyInfo = "DOMHTMLInputElement::default-value"+ attrGet _ = getDOMHTMLInputElementDefaultValue+ attrSet _ = setDOMHTMLInputElementDefaultValue+ attrConstruct _ = constructDOMHTMLInputElementDefaultValue++-- VVV Prop "dir-name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementDirName :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementDirName obj = liftIO $ getObjectPropertyString obj "dir-name"++setDOMHTMLInputElementDirName :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementDirName obj val = liftIO $ setObjectPropertyString obj "dir-name" val++constructDOMHTMLInputElementDirName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementDirName val = constructObjectPropertyString "dir-name" val++data DOMHTMLInputElementDirNamePropertyInfo+instance AttrInfo DOMHTMLInputElementDirNamePropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementDirNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementDirNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementDirNamePropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementDirNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementDirNamePropertyInfo = "DOMHTMLInputElement::dir-name"+ attrGet _ = getDOMHTMLInputElementDirName+ attrSet _ = setDOMHTMLInputElementDirName+ attrConstruct _ = constructDOMHTMLInputElementDirName++-- VVV Prop "disabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementDisabled :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool+getDOMHTMLInputElementDisabled obj = liftIO $ getObjectPropertyBool obj "disabled"++setDOMHTMLInputElementDisabled :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m ()+setDOMHTMLInputElementDisabled obj val = liftIO $ setObjectPropertyBool obj "disabled" val++constructDOMHTMLInputElementDisabled :: Bool -> IO ([Char], GValue)+constructDOMHTMLInputElementDisabled val = constructObjectPropertyBool "disabled" val++data DOMHTMLInputElementDisabledPropertyInfo+instance AttrInfo DOMHTMLInputElementDisabledPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementDisabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementDisabledPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLInputElementDisabledPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementDisabledPropertyInfo = Bool+ type AttrLabel DOMHTMLInputElementDisabledPropertyInfo = "DOMHTMLInputElement::disabled"+ attrGet _ = getDOMHTMLInputElementDisabled+ attrSet _ = setDOMHTMLInputElementDisabled+ attrConstruct _ = constructDOMHTMLInputElementDisabled++-- VVV Prop "files"+ -- Type: TInterface "WebKit" "DOMFileList"+ -- Flags: [PropertyReadable]++getDOMHTMLInputElementFiles :: (MonadIO m, DOMHTMLInputElementK o) => o -> m DOMFileList+getDOMHTMLInputElementFiles obj = liftIO $ getObjectPropertyObject obj "files" DOMFileList++data DOMHTMLInputElementFilesPropertyInfo+instance AttrInfo DOMHTMLInputElementFilesPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementFilesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementFilesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLInputElementFilesPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementFilesPropertyInfo = DOMFileList+ type AttrLabel DOMHTMLInputElementFilesPropertyInfo = "DOMHTMLInputElement::files"+ attrGet _ = getDOMHTMLInputElementFiles+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "form"+ -- Type: TInterface "WebKit" "DOMHTMLFormElement"+ -- Flags: [PropertyReadable]++getDOMHTMLInputElementForm :: (MonadIO m, DOMHTMLInputElementK o) => o -> m DOMHTMLFormElement+getDOMHTMLInputElementForm obj = liftIO $ getObjectPropertyObject obj "form" DOMHTMLFormElement++data DOMHTMLInputElementFormPropertyInfo+instance AttrInfo DOMHTMLInputElementFormPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementFormPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementFormPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLInputElementFormPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementFormPropertyInfo = DOMHTMLFormElement+ type AttrLabel DOMHTMLInputElementFormPropertyInfo = "DOMHTMLInputElement::form"+ attrGet _ = getDOMHTMLInputElementForm+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "form-action"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementFormAction :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementFormAction obj = liftIO $ getObjectPropertyString obj "form-action"++setDOMHTMLInputElementFormAction :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementFormAction obj val = liftIO $ setObjectPropertyString obj "form-action" val++constructDOMHTMLInputElementFormAction :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementFormAction val = constructObjectPropertyString "form-action" val++data DOMHTMLInputElementFormActionPropertyInfo+instance AttrInfo DOMHTMLInputElementFormActionPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementFormActionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementFormActionPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementFormActionPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementFormActionPropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementFormActionPropertyInfo = "DOMHTMLInputElement::form-action"+ attrGet _ = getDOMHTMLInputElementFormAction+ attrSet _ = setDOMHTMLInputElementFormAction+ attrConstruct _ = constructDOMHTMLInputElementFormAction++-- VVV Prop "form-enctype"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementFormEnctype :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementFormEnctype obj = liftIO $ getObjectPropertyString obj "form-enctype"++setDOMHTMLInputElementFormEnctype :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementFormEnctype obj val = liftIO $ setObjectPropertyString obj "form-enctype" val++constructDOMHTMLInputElementFormEnctype :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementFormEnctype val = constructObjectPropertyString "form-enctype" val++data DOMHTMLInputElementFormEnctypePropertyInfo+instance AttrInfo DOMHTMLInputElementFormEnctypePropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementFormEnctypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementFormEnctypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementFormEnctypePropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementFormEnctypePropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementFormEnctypePropertyInfo = "DOMHTMLInputElement::form-enctype"+ attrGet _ = getDOMHTMLInputElementFormEnctype+ attrSet _ = setDOMHTMLInputElementFormEnctype+ attrConstruct _ = constructDOMHTMLInputElementFormEnctype++-- VVV Prop "form-method"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementFormMethod :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementFormMethod obj = liftIO $ getObjectPropertyString obj "form-method"++setDOMHTMLInputElementFormMethod :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementFormMethod obj val = liftIO $ setObjectPropertyString obj "form-method" val++constructDOMHTMLInputElementFormMethod :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementFormMethod val = constructObjectPropertyString "form-method" val++data DOMHTMLInputElementFormMethodPropertyInfo+instance AttrInfo DOMHTMLInputElementFormMethodPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementFormMethodPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementFormMethodPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementFormMethodPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementFormMethodPropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementFormMethodPropertyInfo = "DOMHTMLInputElement::form-method"+ attrGet _ = getDOMHTMLInputElementFormMethod+ attrSet _ = setDOMHTMLInputElementFormMethod+ attrConstruct _ = constructDOMHTMLInputElementFormMethod++-- VVV Prop "form-no-validate"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementFormNoValidate :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool+getDOMHTMLInputElementFormNoValidate obj = liftIO $ getObjectPropertyBool obj "form-no-validate"++setDOMHTMLInputElementFormNoValidate :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m ()+setDOMHTMLInputElementFormNoValidate obj val = liftIO $ setObjectPropertyBool obj "form-no-validate" val++constructDOMHTMLInputElementFormNoValidate :: Bool -> IO ([Char], GValue)+constructDOMHTMLInputElementFormNoValidate val = constructObjectPropertyBool "form-no-validate" val++data DOMHTMLInputElementFormNoValidatePropertyInfo+instance AttrInfo DOMHTMLInputElementFormNoValidatePropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementFormNoValidatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementFormNoValidatePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLInputElementFormNoValidatePropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementFormNoValidatePropertyInfo = Bool+ type AttrLabel DOMHTMLInputElementFormNoValidatePropertyInfo = "DOMHTMLInputElement::form-no-validate"+ attrGet _ = getDOMHTMLInputElementFormNoValidate+ attrSet _ = setDOMHTMLInputElementFormNoValidate+ attrConstruct _ = constructDOMHTMLInputElementFormNoValidate++-- VVV Prop "form-target"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementFormTarget :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementFormTarget obj = liftIO $ getObjectPropertyString obj "form-target"++setDOMHTMLInputElementFormTarget :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementFormTarget obj val = liftIO $ setObjectPropertyString obj "form-target" val++constructDOMHTMLInputElementFormTarget :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementFormTarget val = constructObjectPropertyString "form-target" val++data DOMHTMLInputElementFormTargetPropertyInfo+instance AttrInfo DOMHTMLInputElementFormTargetPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementFormTargetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementFormTargetPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementFormTargetPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementFormTargetPropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementFormTargetPropertyInfo = "DOMHTMLInputElement::form-target"+ attrGet _ = getDOMHTMLInputElementFormTarget+ attrSet _ = setDOMHTMLInputElementFormTarget+ attrConstruct _ = constructDOMHTMLInputElementFormTarget++-- VVV Prop "height"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementHeight :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Word64+getDOMHTMLInputElementHeight obj = liftIO $ getObjectPropertyUInt64 obj "height"++setDOMHTMLInputElementHeight :: (MonadIO m, DOMHTMLInputElementK o) => o -> Word64 -> m ()+setDOMHTMLInputElementHeight obj val = liftIO $ setObjectPropertyUInt64 obj "height" val++constructDOMHTMLInputElementHeight :: Word64 -> IO ([Char], GValue)+constructDOMHTMLInputElementHeight val = constructObjectPropertyUInt64 "height" val++data DOMHTMLInputElementHeightPropertyInfo+instance AttrInfo DOMHTMLInputElementHeightPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementHeightPropertyInfo = (~) Word64+ type AttrBaseTypeConstraint DOMHTMLInputElementHeightPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementHeightPropertyInfo = Word64+ type AttrLabel DOMHTMLInputElementHeightPropertyInfo = "DOMHTMLInputElement::height"+ attrGet _ = getDOMHTMLInputElementHeight+ attrSet _ = setDOMHTMLInputElementHeight+ attrConstruct _ = constructDOMHTMLInputElementHeight++-- VVV Prop "incremental"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementIncremental :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool+getDOMHTMLInputElementIncremental obj = liftIO $ getObjectPropertyBool obj "incremental"++setDOMHTMLInputElementIncremental :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m ()+setDOMHTMLInputElementIncremental obj val = liftIO $ setObjectPropertyBool obj "incremental" val++constructDOMHTMLInputElementIncremental :: Bool -> IO ([Char], GValue)+constructDOMHTMLInputElementIncremental val = constructObjectPropertyBool "incremental" val++data DOMHTMLInputElementIncrementalPropertyInfo+instance AttrInfo DOMHTMLInputElementIncrementalPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementIncrementalPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementIncrementalPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLInputElementIncrementalPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementIncrementalPropertyInfo = Bool+ type AttrLabel DOMHTMLInputElementIncrementalPropertyInfo = "DOMHTMLInputElement::incremental"+ attrGet _ = getDOMHTMLInputElementIncremental+ attrSet _ = setDOMHTMLInputElementIncremental+ attrConstruct _ = constructDOMHTMLInputElementIncremental++-- VVV Prop "indeterminate"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementIndeterminate :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool+getDOMHTMLInputElementIndeterminate obj = liftIO $ getObjectPropertyBool obj "indeterminate"++setDOMHTMLInputElementIndeterminate :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m ()+setDOMHTMLInputElementIndeterminate obj val = liftIO $ setObjectPropertyBool obj "indeterminate" val++constructDOMHTMLInputElementIndeterminate :: Bool -> IO ([Char], GValue)+constructDOMHTMLInputElementIndeterminate val = constructObjectPropertyBool "indeterminate" val++data DOMHTMLInputElementIndeterminatePropertyInfo+instance AttrInfo DOMHTMLInputElementIndeterminatePropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementIndeterminatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementIndeterminatePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLInputElementIndeterminatePropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementIndeterminatePropertyInfo = Bool+ type AttrLabel DOMHTMLInputElementIndeterminatePropertyInfo = "DOMHTMLInputElement::indeterminate"+ attrGet _ = getDOMHTMLInputElementIndeterminate+ attrSet _ = setDOMHTMLInputElementIndeterminate+ attrConstruct _ = constructDOMHTMLInputElementIndeterminate++-- VVV Prop "labels"+ -- Type: TInterface "WebKit" "DOMNodeList"+ -- Flags: [PropertyReadable]++getDOMHTMLInputElementLabels :: (MonadIO m, DOMHTMLInputElementK o) => o -> m DOMNodeList+getDOMHTMLInputElementLabels obj = liftIO $ getObjectPropertyObject obj "labels" DOMNodeList++data DOMHTMLInputElementLabelsPropertyInfo+instance AttrInfo DOMHTMLInputElementLabelsPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementLabelsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementLabelsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLInputElementLabelsPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementLabelsPropertyInfo = DOMNodeList+ type AttrLabel DOMHTMLInputElementLabelsPropertyInfo = "DOMHTMLInputElement::labels"+ attrGet _ = getDOMHTMLInputElementLabels+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "list"+ -- Type: TInterface "WebKit" "DOMHTMLElement"+ -- Flags: [PropertyReadable]++getDOMHTMLInputElementList :: (MonadIO m, DOMHTMLInputElementK o) => o -> m DOMHTMLElement+getDOMHTMLInputElementList obj = liftIO $ getObjectPropertyObject obj "list" DOMHTMLElement++data DOMHTMLInputElementListPropertyInfo+instance AttrInfo DOMHTMLInputElementListPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementListPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementListPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLInputElementListPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementListPropertyInfo = DOMHTMLElement+ type AttrLabel DOMHTMLInputElementListPropertyInfo = "DOMHTMLInputElement::list"+ attrGet _ = getDOMHTMLInputElementList+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "max"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementMax :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementMax obj = liftIO $ getObjectPropertyString obj "max"++setDOMHTMLInputElementMax :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementMax obj val = liftIO $ setObjectPropertyString obj "max" val++constructDOMHTMLInputElementMax :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementMax val = constructObjectPropertyString "max" val++data DOMHTMLInputElementMaxPropertyInfo+instance AttrInfo DOMHTMLInputElementMaxPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementMaxPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementMaxPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementMaxPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementMaxPropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementMaxPropertyInfo = "DOMHTMLInputElement::max"+ attrGet _ = getDOMHTMLInputElementMax+ attrSet _ = setDOMHTMLInputElementMax+ attrConstruct _ = constructDOMHTMLInputElementMax++-- VVV Prop "max-length"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementMaxLength :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Int64+getDOMHTMLInputElementMaxLength obj = liftIO $ getObjectPropertyInt64 obj "max-length"++setDOMHTMLInputElementMaxLength :: (MonadIO m, DOMHTMLInputElementK o) => o -> Int64 -> m ()+setDOMHTMLInputElementMaxLength obj val = liftIO $ setObjectPropertyInt64 obj "max-length" val++constructDOMHTMLInputElementMaxLength :: Int64 -> IO ([Char], GValue)+constructDOMHTMLInputElementMaxLength val = constructObjectPropertyInt64 "max-length" val++data DOMHTMLInputElementMaxLengthPropertyInfo+instance AttrInfo DOMHTMLInputElementMaxLengthPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementMaxLengthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementMaxLengthPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLInputElementMaxLengthPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementMaxLengthPropertyInfo = Int64+ type AttrLabel DOMHTMLInputElementMaxLengthPropertyInfo = "DOMHTMLInputElement::max-length"+ attrGet _ = getDOMHTMLInputElementMaxLength+ attrSet _ = setDOMHTMLInputElementMaxLength+ attrConstruct _ = constructDOMHTMLInputElementMaxLength++-- VVV Prop "min"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementMin :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementMin obj = liftIO $ getObjectPropertyString obj "min"++setDOMHTMLInputElementMin :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementMin obj val = liftIO $ setObjectPropertyString obj "min" val++constructDOMHTMLInputElementMin :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementMin val = constructObjectPropertyString "min" val++data DOMHTMLInputElementMinPropertyInfo+instance AttrInfo DOMHTMLInputElementMinPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementMinPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementMinPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementMinPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementMinPropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementMinPropertyInfo = "DOMHTMLInputElement::min"+ attrGet _ = getDOMHTMLInputElementMin+ attrSet _ = setDOMHTMLInputElementMin+ attrConstruct _ = constructDOMHTMLInputElementMin++-- VVV Prop "multiple"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementMultiple :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool+getDOMHTMLInputElementMultiple obj = liftIO $ getObjectPropertyBool obj "multiple"++setDOMHTMLInputElementMultiple :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m ()+setDOMHTMLInputElementMultiple obj val = liftIO $ setObjectPropertyBool obj "multiple" val++constructDOMHTMLInputElementMultiple :: Bool -> IO ([Char], GValue)+constructDOMHTMLInputElementMultiple val = constructObjectPropertyBool "multiple" val++data DOMHTMLInputElementMultiplePropertyInfo+instance AttrInfo DOMHTMLInputElementMultiplePropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementMultiplePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementMultiplePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLInputElementMultiplePropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementMultiplePropertyInfo = Bool+ type AttrLabel DOMHTMLInputElementMultiplePropertyInfo = "DOMHTMLInputElement::multiple"+ attrGet _ = getDOMHTMLInputElementMultiple+ attrSet _ = setDOMHTMLInputElementMultiple+ attrConstruct _ = constructDOMHTMLInputElementMultiple++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementName :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLInputElementName :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLInputElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementName val = constructObjectPropertyString "name" val++data DOMHTMLInputElementNamePropertyInfo+instance AttrInfo DOMHTMLInputElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementNamePropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementNamePropertyInfo = "DOMHTMLInputElement::name"+ attrGet _ = getDOMHTMLInputElementName+ attrSet _ = setDOMHTMLInputElementName+ attrConstruct _ = constructDOMHTMLInputElementName++-- VVV Prop "pattern"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementPattern :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementPattern obj = liftIO $ getObjectPropertyString obj "pattern"++setDOMHTMLInputElementPattern :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementPattern obj val = liftIO $ setObjectPropertyString obj "pattern" val++constructDOMHTMLInputElementPattern :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementPattern val = constructObjectPropertyString "pattern" val++data DOMHTMLInputElementPatternPropertyInfo+instance AttrInfo DOMHTMLInputElementPatternPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementPatternPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementPatternPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementPatternPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementPatternPropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementPatternPropertyInfo = "DOMHTMLInputElement::pattern"+ attrGet _ = getDOMHTMLInputElementPattern+ attrSet _ = setDOMHTMLInputElementPattern+ attrConstruct _ = constructDOMHTMLInputElementPattern++-- VVV Prop "placeholder"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementPlaceholder :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementPlaceholder obj = liftIO $ getObjectPropertyString obj "placeholder"++setDOMHTMLInputElementPlaceholder :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementPlaceholder obj val = liftIO $ setObjectPropertyString obj "placeholder" val++constructDOMHTMLInputElementPlaceholder :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementPlaceholder val = constructObjectPropertyString "placeholder" val++data DOMHTMLInputElementPlaceholderPropertyInfo+instance AttrInfo DOMHTMLInputElementPlaceholderPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementPlaceholderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementPlaceholderPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementPlaceholderPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementPlaceholderPropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementPlaceholderPropertyInfo = "DOMHTMLInputElement::placeholder"+ attrGet _ = getDOMHTMLInputElementPlaceholder+ attrSet _ = setDOMHTMLInputElementPlaceholder+ attrConstruct _ = constructDOMHTMLInputElementPlaceholder++-- VVV Prop "read-only"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementReadOnly :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool+getDOMHTMLInputElementReadOnly obj = liftIO $ getObjectPropertyBool obj "read-only"++setDOMHTMLInputElementReadOnly :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m ()+setDOMHTMLInputElementReadOnly obj val = liftIO $ setObjectPropertyBool obj "read-only" val++constructDOMHTMLInputElementReadOnly :: Bool -> IO ([Char], GValue)+constructDOMHTMLInputElementReadOnly val = constructObjectPropertyBool "read-only" val++data DOMHTMLInputElementReadOnlyPropertyInfo+instance AttrInfo DOMHTMLInputElementReadOnlyPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementReadOnlyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementReadOnlyPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLInputElementReadOnlyPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementReadOnlyPropertyInfo = Bool+ type AttrLabel DOMHTMLInputElementReadOnlyPropertyInfo = "DOMHTMLInputElement::read-only"+ attrGet _ = getDOMHTMLInputElementReadOnly+ attrSet _ = setDOMHTMLInputElementReadOnly+ attrConstruct _ = constructDOMHTMLInputElementReadOnly++-- VVV Prop "required"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementRequired :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool+getDOMHTMLInputElementRequired obj = liftIO $ getObjectPropertyBool obj "required"++setDOMHTMLInputElementRequired :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m ()+setDOMHTMLInputElementRequired obj val = liftIO $ setObjectPropertyBool obj "required" val++constructDOMHTMLInputElementRequired :: Bool -> IO ([Char], GValue)+constructDOMHTMLInputElementRequired val = constructObjectPropertyBool "required" val++data DOMHTMLInputElementRequiredPropertyInfo+instance AttrInfo DOMHTMLInputElementRequiredPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementRequiredPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementRequiredPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLInputElementRequiredPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementRequiredPropertyInfo = Bool+ type AttrLabel DOMHTMLInputElementRequiredPropertyInfo = "DOMHTMLInputElement::required"+ attrGet _ = getDOMHTMLInputElementRequired+ attrSet _ = setDOMHTMLInputElementRequired+ attrConstruct _ = constructDOMHTMLInputElementRequired++-- VVV Prop "size"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementSize :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Word64+getDOMHTMLInputElementSize obj = liftIO $ getObjectPropertyUInt64 obj "size"++setDOMHTMLInputElementSize :: (MonadIO m, DOMHTMLInputElementK o) => o -> Word64 -> m ()+setDOMHTMLInputElementSize obj val = liftIO $ setObjectPropertyUInt64 obj "size" val++constructDOMHTMLInputElementSize :: Word64 -> IO ([Char], GValue)+constructDOMHTMLInputElementSize val = constructObjectPropertyUInt64 "size" val++data DOMHTMLInputElementSizePropertyInfo+instance AttrInfo DOMHTMLInputElementSizePropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementSizePropertyInfo = (~) Word64+ type AttrBaseTypeConstraint DOMHTMLInputElementSizePropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementSizePropertyInfo = Word64+ type AttrLabel DOMHTMLInputElementSizePropertyInfo = "DOMHTMLInputElement::size"+ attrGet _ = getDOMHTMLInputElementSize+ attrSet _ = setDOMHTMLInputElementSize+ attrConstruct _ = constructDOMHTMLInputElementSize++-- VVV Prop "src"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementSrc :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementSrc obj = liftIO $ getObjectPropertyString obj "src"++setDOMHTMLInputElementSrc :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementSrc obj val = liftIO $ setObjectPropertyString obj "src" val++constructDOMHTMLInputElementSrc :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementSrc val = constructObjectPropertyString "src" val++data DOMHTMLInputElementSrcPropertyInfo+instance AttrInfo DOMHTMLInputElementSrcPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementSrcPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementSrcPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementSrcPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementSrcPropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementSrcPropertyInfo = "DOMHTMLInputElement::src"+ attrGet _ = getDOMHTMLInputElementSrc+ attrSet _ = setDOMHTMLInputElementSrc+ attrConstruct _ = constructDOMHTMLInputElementSrc++-- VVV Prop "step"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementStep :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementStep obj = liftIO $ getObjectPropertyString obj "step"++setDOMHTMLInputElementStep :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementStep obj val = liftIO $ setObjectPropertyString obj "step" val++constructDOMHTMLInputElementStep :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementStep val = constructObjectPropertyString "step" val++data DOMHTMLInputElementStepPropertyInfo+instance AttrInfo DOMHTMLInputElementStepPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementStepPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementStepPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementStepPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementStepPropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementStepPropertyInfo = "DOMHTMLInputElement::step"+ attrGet _ = getDOMHTMLInputElementStep+ attrSet _ = setDOMHTMLInputElementStep+ attrConstruct _ = constructDOMHTMLInputElementStep++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementType :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementType obj = liftIO $ getObjectPropertyString obj "type"++setDOMHTMLInputElementType :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementType obj val = liftIO $ setObjectPropertyString obj "type" val++constructDOMHTMLInputElementType :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementType val = constructObjectPropertyString "type" val++data DOMHTMLInputElementTypePropertyInfo+instance AttrInfo DOMHTMLInputElementTypePropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementTypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementTypePropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementTypePropertyInfo = "DOMHTMLInputElement::type"+ attrGet _ = getDOMHTMLInputElementType+ attrSet _ = setDOMHTMLInputElementType+ attrConstruct _ = constructDOMHTMLInputElementType++-- VVV Prop "use-map"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementUseMap :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementUseMap obj = liftIO $ getObjectPropertyString obj "use-map"++setDOMHTMLInputElementUseMap :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementUseMap obj val = liftIO $ setObjectPropertyString obj "use-map" val++constructDOMHTMLInputElementUseMap :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementUseMap val = constructObjectPropertyString "use-map" val++data DOMHTMLInputElementUseMapPropertyInfo+instance AttrInfo DOMHTMLInputElementUseMapPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementUseMapPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementUseMapPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementUseMapPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementUseMapPropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementUseMapPropertyInfo = "DOMHTMLInputElement::use-map"+ attrGet _ = getDOMHTMLInputElementUseMap+ attrSet _ = setDOMHTMLInputElementUseMap+ attrConstruct _ = constructDOMHTMLInputElementUseMap++-- VVV Prop "validation-message"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLInputElementValidationMessage :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementValidationMessage obj = liftIO $ getObjectPropertyString obj "validation-message"++data DOMHTMLInputElementValidationMessagePropertyInfo+instance AttrInfo DOMHTMLInputElementValidationMessagePropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementValidationMessagePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementValidationMessagePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLInputElementValidationMessagePropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementValidationMessagePropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementValidationMessagePropertyInfo = "DOMHTMLInputElement::validation-message"+ attrGet _ = getDOMHTMLInputElementValidationMessage+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "validity"+ -- Type: TInterface "WebKit" "DOMValidityState"+ -- Flags: [PropertyReadable]++getDOMHTMLInputElementValidity :: (MonadIO m, DOMHTMLInputElementK o) => o -> m DOMValidityState+getDOMHTMLInputElementValidity obj = liftIO $ getObjectPropertyObject obj "validity" DOMValidityState++data DOMHTMLInputElementValidityPropertyInfo+instance AttrInfo DOMHTMLInputElementValidityPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementValidityPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementValidityPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLInputElementValidityPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementValidityPropertyInfo = DOMValidityState+ type AttrLabel DOMHTMLInputElementValidityPropertyInfo = "DOMHTMLInputElement::validity"+ attrGet _ = getDOMHTMLInputElementValidity+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "value"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementValue :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text+getDOMHTMLInputElementValue obj = liftIO $ getObjectPropertyString obj "value"++setDOMHTMLInputElementValue :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m ()+setDOMHTMLInputElementValue obj val = liftIO $ setObjectPropertyString obj "value" val++constructDOMHTMLInputElementValue :: T.Text -> IO ([Char], GValue)+constructDOMHTMLInputElementValue val = constructObjectPropertyString "value" val++data DOMHTMLInputElementValuePropertyInfo+instance AttrInfo DOMHTMLInputElementValuePropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementValuePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLInputElementValuePropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementValuePropertyInfo = T.Text+ type AttrLabel DOMHTMLInputElementValuePropertyInfo = "DOMHTMLInputElement::value"+ attrGet _ = getDOMHTMLInputElementValue+ attrSet _ = setDOMHTMLInputElementValue+ attrConstruct _ = constructDOMHTMLInputElementValue++-- VVV Prop "value-as-number"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementValueAsNumber :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Double+getDOMHTMLInputElementValueAsNumber obj = liftIO $ getObjectPropertyDouble obj "value-as-number"++setDOMHTMLInputElementValueAsNumber :: (MonadIO m, DOMHTMLInputElementK o) => o -> Double -> m ()+setDOMHTMLInputElementValueAsNumber obj val = liftIO $ setObjectPropertyDouble obj "value-as-number" val++constructDOMHTMLInputElementValueAsNumber :: Double -> IO ([Char], GValue)+constructDOMHTMLInputElementValueAsNumber val = constructObjectPropertyDouble "value-as-number" val++data DOMHTMLInputElementValueAsNumberPropertyInfo+instance AttrInfo DOMHTMLInputElementValueAsNumberPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementValueAsNumberPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementValueAsNumberPropertyInfo = (~) Double+ type AttrBaseTypeConstraint DOMHTMLInputElementValueAsNumberPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementValueAsNumberPropertyInfo = Double+ type AttrLabel DOMHTMLInputElementValueAsNumberPropertyInfo = "DOMHTMLInputElement::value-as-number"+ attrGet _ = getDOMHTMLInputElementValueAsNumber+ attrSet _ = setDOMHTMLInputElementValueAsNumber+ attrConstruct _ = constructDOMHTMLInputElementValueAsNumber++-- VVV Prop "webkit-grammar"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementWebkitGrammar :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool+getDOMHTMLInputElementWebkitGrammar obj = liftIO $ getObjectPropertyBool obj "webkit-grammar"++setDOMHTMLInputElementWebkitGrammar :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m ()+setDOMHTMLInputElementWebkitGrammar obj val = liftIO $ setObjectPropertyBool obj "webkit-grammar" val++constructDOMHTMLInputElementWebkitGrammar :: Bool -> IO ([Char], GValue)+constructDOMHTMLInputElementWebkitGrammar val = constructObjectPropertyBool "webkit-grammar" val++data DOMHTMLInputElementWebkitGrammarPropertyInfo+instance AttrInfo DOMHTMLInputElementWebkitGrammarPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementWebkitGrammarPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementWebkitGrammarPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLInputElementWebkitGrammarPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementWebkitGrammarPropertyInfo = Bool+ type AttrLabel DOMHTMLInputElementWebkitGrammarPropertyInfo = "DOMHTMLInputElement::webkit-grammar"+ attrGet _ = getDOMHTMLInputElementWebkitGrammar+ attrSet _ = setDOMHTMLInputElementWebkitGrammar+ attrConstruct _ = constructDOMHTMLInputElementWebkitGrammar++-- VVV Prop "webkit-speech"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementWebkitSpeech :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool+getDOMHTMLInputElementWebkitSpeech obj = liftIO $ getObjectPropertyBool obj "webkit-speech"++setDOMHTMLInputElementWebkitSpeech :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m ()+setDOMHTMLInputElementWebkitSpeech obj val = liftIO $ setObjectPropertyBool obj "webkit-speech" val++constructDOMHTMLInputElementWebkitSpeech :: Bool -> IO ([Char], GValue)+constructDOMHTMLInputElementWebkitSpeech val = constructObjectPropertyBool "webkit-speech" val++data DOMHTMLInputElementWebkitSpeechPropertyInfo+instance AttrInfo DOMHTMLInputElementWebkitSpeechPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementWebkitSpeechPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementWebkitSpeechPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLInputElementWebkitSpeechPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementWebkitSpeechPropertyInfo = Bool+ type AttrLabel DOMHTMLInputElementWebkitSpeechPropertyInfo = "DOMHTMLInputElement::webkit-speech"+ attrGet _ = getDOMHTMLInputElementWebkitSpeech+ attrSet _ = setDOMHTMLInputElementWebkitSpeech+ attrConstruct _ = constructDOMHTMLInputElementWebkitSpeech++-- VVV Prop "webkitdirectory"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementWebkitdirectory :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool+getDOMHTMLInputElementWebkitdirectory obj = liftIO $ getObjectPropertyBool obj "webkitdirectory"++setDOMHTMLInputElementWebkitdirectory :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m ()+setDOMHTMLInputElementWebkitdirectory obj val = liftIO $ setObjectPropertyBool obj "webkitdirectory" val++constructDOMHTMLInputElementWebkitdirectory :: Bool -> IO ([Char], GValue)+constructDOMHTMLInputElementWebkitdirectory val = constructObjectPropertyBool "webkitdirectory" val++data DOMHTMLInputElementWebkitdirectoryPropertyInfo+instance AttrInfo DOMHTMLInputElementWebkitdirectoryPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementWebkitdirectoryPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementWebkitdirectoryPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLInputElementWebkitdirectoryPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementWebkitdirectoryPropertyInfo = Bool+ type AttrLabel DOMHTMLInputElementWebkitdirectoryPropertyInfo = "DOMHTMLInputElement::webkitdirectory"+ attrGet _ = getDOMHTMLInputElementWebkitdirectory+ attrSet _ = setDOMHTMLInputElementWebkitdirectory+ attrConstruct _ = constructDOMHTMLInputElementWebkitdirectory++-- VVV Prop "width"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLInputElementWidth :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Word64+getDOMHTMLInputElementWidth obj = liftIO $ getObjectPropertyUInt64 obj "width"++setDOMHTMLInputElementWidth :: (MonadIO m, DOMHTMLInputElementK o) => o -> Word64 -> m ()+setDOMHTMLInputElementWidth obj val = liftIO $ setObjectPropertyUInt64 obj "width" val++constructDOMHTMLInputElementWidth :: Word64 -> IO ([Char], GValue)+constructDOMHTMLInputElementWidth val = constructObjectPropertyUInt64 "width" val++data DOMHTMLInputElementWidthPropertyInfo+instance AttrInfo DOMHTMLInputElementWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementWidthPropertyInfo = (~) Word64+ type AttrBaseTypeConstraint DOMHTMLInputElementWidthPropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementWidthPropertyInfo = Word64+ type AttrLabel DOMHTMLInputElementWidthPropertyInfo = "DOMHTMLInputElement::width"+ attrGet _ = getDOMHTMLInputElementWidth+ attrSet _ = setDOMHTMLInputElementWidth+ attrConstruct _ = constructDOMHTMLInputElementWidth++-- VVV Prop "will-validate"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMHTMLInputElementWillValidate :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool+getDOMHTMLInputElementWillValidate obj = liftIO $ getObjectPropertyBool obj "will-validate"++data DOMHTMLInputElementWillValidatePropertyInfo+instance AttrInfo DOMHTMLInputElementWillValidatePropertyInfo where+ type AttrAllowedOps DOMHTMLInputElementWillValidatePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLInputElementWillValidatePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLInputElementWillValidatePropertyInfo = DOMHTMLInputElementK+ type AttrGetType DOMHTMLInputElementWillValidatePropertyInfo = Bool+ type AttrLabel DOMHTMLInputElementWillValidatePropertyInfo = "DOMHTMLInputElement::will-validate"+ attrGet _ = getDOMHTMLInputElementWillValidate+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMHTMLInputElement = '[ '("accept", DOMHTMLInputElementAcceptPropertyInfo), '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLInputElementAlignPropertyInfo), '("alt", DOMHTMLInputElementAltPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autocapitalize", DOMHTMLInputElementAutocapitalizePropertyInfo), '("autocomplete", DOMHTMLInputElementAutocompletePropertyInfo), '("autocorrect", DOMHTMLInputElementAutocorrectPropertyInfo), '("autofocus", DOMHTMLInputElementAutofocusPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("capture", DOMHTMLInputElementCapturePropertyInfo), '("checked", DOMHTMLInputElementCheckedPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("default-checked", DOMHTMLInputElementDefaultCheckedPropertyInfo), '("default-value", DOMHTMLInputElementDefaultValuePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("dir-name", DOMHTMLInputElementDirNamePropertyInfo), '("disabled", DOMHTMLInputElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("files", DOMHTMLInputElementFilesPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLInputElementFormPropertyInfo), '("form-action", DOMHTMLInputElementFormActionPropertyInfo), '("form-enctype", DOMHTMLInputElementFormEnctypePropertyInfo), '("form-method", DOMHTMLInputElementFormMethodPropertyInfo), '("form-no-validate", DOMHTMLInputElementFormNoValidatePropertyInfo), '("form-target", DOMHTMLInputElementFormTargetPropertyInfo), '("height", DOMHTMLInputElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("incremental", DOMHTMLInputElementIncrementalPropertyInfo), '("indeterminate", DOMHTMLInputElementIndeterminatePropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("labels", DOMHTMLInputElementLabelsPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("list", DOMHTMLInputElementListPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("max", DOMHTMLInputElementMaxPropertyInfo), '("max-length", DOMHTMLInputElementMaxLengthPropertyInfo), '("min", DOMHTMLInputElementMinPropertyInfo), '("multiple", DOMHTMLInputElementMultiplePropertyInfo), '("name", DOMHTMLInputElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("pattern", DOMHTMLInputElementPatternPropertyInfo), '("placeholder", DOMHTMLInputElementPlaceholderPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("read-only", DOMHTMLInputElementReadOnlyPropertyInfo), '("required", DOMHTMLInputElementRequiredPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("size", DOMHTMLInputElementSizePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLInputElementSrcPropertyInfo), '("step", DOMHTMLInputElementStepPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLInputElementTypePropertyInfo), '("use-map", DOMHTMLInputElementUseMapPropertyInfo), '("validation-message", DOMHTMLInputElementValidationMessagePropertyInfo), '("validity", DOMHTMLInputElementValidityPropertyInfo), '("value", DOMHTMLInputElementValuePropertyInfo), '("value-as-number", DOMHTMLInputElementValueAsNumberPropertyInfo), '("webkit-grammar", DOMHTMLInputElementWebkitGrammarPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkit-speech", DOMHTMLInputElementWebkitSpeechPropertyInfo), '("webkitdirectory", DOMHTMLInputElementWebkitdirectoryPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLInputElementWidthPropertyInfo), '("will-validate", DOMHTMLInputElementWillValidatePropertyInfo)]++-- VVV Prop "autofocus"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLKeygenElementAutofocus :: (MonadIO m, DOMHTMLKeygenElementK o) => o -> m Bool+getDOMHTMLKeygenElementAutofocus obj = liftIO $ getObjectPropertyBool obj "autofocus"++setDOMHTMLKeygenElementAutofocus :: (MonadIO m, DOMHTMLKeygenElementK o) => o -> Bool -> m ()+setDOMHTMLKeygenElementAutofocus obj val = liftIO $ setObjectPropertyBool obj "autofocus" val++constructDOMHTMLKeygenElementAutofocus :: Bool -> IO ([Char], GValue)+constructDOMHTMLKeygenElementAutofocus val = constructObjectPropertyBool "autofocus" val++data DOMHTMLKeygenElementAutofocusPropertyInfo+instance AttrInfo DOMHTMLKeygenElementAutofocusPropertyInfo where+ type AttrAllowedOps DOMHTMLKeygenElementAutofocusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLKeygenElementAutofocusPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLKeygenElementAutofocusPropertyInfo = DOMHTMLKeygenElementK+ type AttrGetType DOMHTMLKeygenElementAutofocusPropertyInfo = Bool+ type AttrLabel DOMHTMLKeygenElementAutofocusPropertyInfo = "DOMHTMLKeygenElement::autofocus"+ attrGet _ = getDOMHTMLKeygenElementAutofocus+ attrSet _ = setDOMHTMLKeygenElementAutofocus+ attrConstruct _ = constructDOMHTMLKeygenElementAutofocus++-- VVV Prop "challenge"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLKeygenElementChallenge :: (MonadIO m, DOMHTMLKeygenElementK o) => o -> m T.Text+getDOMHTMLKeygenElementChallenge obj = liftIO $ getObjectPropertyString obj "challenge"++setDOMHTMLKeygenElementChallenge :: (MonadIO m, DOMHTMLKeygenElementK o) => o -> T.Text -> m ()+setDOMHTMLKeygenElementChallenge obj val = liftIO $ setObjectPropertyString obj "challenge" val++constructDOMHTMLKeygenElementChallenge :: T.Text -> IO ([Char], GValue)+constructDOMHTMLKeygenElementChallenge val = constructObjectPropertyString "challenge" val++data DOMHTMLKeygenElementChallengePropertyInfo+instance AttrInfo DOMHTMLKeygenElementChallengePropertyInfo where+ type AttrAllowedOps DOMHTMLKeygenElementChallengePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLKeygenElementChallengePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLKeygenElementChallengePropertyInfo = DOMHTMLKeygenElementK+ type AttrGetType DOMHTMLKeygenElementChallengePropertyInfo = T.Text+ type AttrLabel DOMHTMLKeygenElementChallengePropertyInfo = "DOMHTMLKeygenElement::challenge"+ attrGet _ = getDOMHTMLKeygenElementChallenge+ attrSet _ = setDOMHTMLKeygenElementChallenge+ attrConstruct _ = constructDOMHTMLKeygenElementChallenge++-- VVV Prop "disabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLKeygenElementDisabled :: (MonadIO m, DOMHTMLKeygenElementK o) => o -> m Bool+getDOMHTMLKeygenElementDisabled obj = liftIO $ getObjectPropertyBool obj "disabled"++setDOMHTMLKeygenElementDisabled :: (MonadIO m, DOMHTMLKeygenElementK o) => o -> Bool -> m ()+setDOMHTMLKeygenElementDisabled obj val = liftIO $ setObjectPropertyBool obj "disabled" val++constructDOMHTMLKeygenElementDisabled :: Bool -> IO ([Char], GValue)+constructDOMHTMLKeygenElementDisabled val = constructObjectPropertyBool "disabled" val++data DOMHTMLKeygenElementDisabledPropertyInfo+instance AttrInfo DOMHTMLKeygenElementDisabledPropertyInfo where+ type AttrAllowedOps DOMHTMLKeygenElementDisabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLKeygenElementDisabledPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLKeygenElementDisabledPropertyInfo = DOMHTMLKeygenElementK+ type AttrGetType DOMHTMLKeygenElementDisabledPropertyInfo = Bool+ type AttrLabel DOMHTMLKeygenElementDisabledPropertyInfo = "DOMHTMLKeygenElement::disabled"+ attrGet _ = getDOMHTMLKeygenElementDisabled+ attrSet _ = setDOMHTMLKeygenElementDisabled+ attrConstruct _ = constructDOMHTMLKeygenElementDisabled++-- VVV Prop "form"+ -- Type: TInterface "WebKit" "DOMHTMLFormElement"+ -- Flags: [PropertyReadable]++getDOMHTMLKeygenElementForm :: (MonadIO m, DOMHTMLKeygenElementK o) => o -> m DOMHTMLFormElement+getDOMHTMLKeygenElementForm obj = liftIO $ getObjectPropertyObject obj "form" DOMHTMLFormElement++data DOMHTMLKeygenElementFormPropertyInfo+instance AttrInfo DOMHTMLKeygenElementFormPropertyInfo where+ type AttrAllowedOps DOMHTMLKeygenElementFormPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLKeygenElementFormPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLKeygenElementFormPropertyInfo = DOMHTMLKeygenElementK+ type AttrGetType DOMHTMLKeygenElementFormPropertyInfo = DOMHTMLFormElement+ type AttrLabel DOMHTMLKeygenElementFormPropertyInfo = "DOMHTMLKeygenElement::form"+ attrGet _ = getDOMHTMLKeygenElementForm+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "keytype"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLKeygenElementKeytype :: (MonadIO m, DOMHTMLKeygenElementK o) => o -> m T.Text+getDOMHTMLKeygenElementKeytype obj = liftIO $ getObjectPropertyString obj "keytype"++setDOMHTMLKeygenElementKeytype :: (MonadIO m, DOMHTMLKeygenElementK o) => o -> T.Text -> m ()+setDOMHTMLKeygenElementKeytype obj val = liftIO $ setObjectPropertyString obj "keytype" val++constructDOMHTMLKeygenElementKeytype :: T.Text -> IO ([Char], GValue)+constructDOMHTMLKeygenElementKeytype val = constructObjectPropertyString "keytype" val++data DOMHTMLKeygenElementKeytypePropertyInfo+instance AttrInfo DOMHTMLKeygenElementKeytypePropertyInfo where+ type AttrAllowedOps DOMHTMLKeygenElementKeytypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLKeygenElementKeytypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLKeygenElementKeytypePropertyInfo = DOMHTMLKeygenElementK+ type AttrGetType DOMHTMLKeygenElementKeytypePropertyInfo = T.Text+ type AttrLabel DOMHTMLKeygenElementKeytypePropertyInfo = "DOMHTMLKeygenElement::keytype"+ attrGet _ = getDOMHTMLKeygenElementKeytype+ attrSet _ = setDOMHTMLKeygenElementKeytype+ attrConstruct _ = constructDOMHTMLKeygenElementKeytype++-- VVV Prop "labels"+ -- Type: TInterface "WebKit" "DOMNodeList"+ -- Flags: [PropertyReadable]++getDOMHTMLKeygenElementLabels :: (MonadIO m, DOMHTMLKeygenElementK o) => o -> m DOMNodeList+getDOMHTMLKeygenElementLabels obj = liftIO $ getObjectPropertyObject obj "labels" DOMNodeList++data DOMHTMLKeygenElementLabelsPropertyInfo+instance AttrInfo DOMHTMLKeygenElementLabelsPropertyInfo where+ type AttrAllowedOps DOMHTMLKeygenElementLabelsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLKeygenElementLabelsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLKeygenElementLabelsPropertyInfo = DOMHTMLKeygenElementK+ type AttrGetType DOMHTMLKeygenElementLabelsPropertyInfo = DOMNodeList+ type AttrLabel DOMHTMLKeygenElementLabelsPropertyInfo = "DOMHTMLKeygenElement::labels"+ attrGet _ = getDOMHTMLKeygenElementLabels+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLKeygenElementName :: (MonadIO m, DOMHTMLKeygenElementK o) => o -> m T.Text+getDOMHTMLKeygenElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLKeygenElementName :: (MonadIO m, DOMHTMLKeygenElementK o) => o -> T.Text -> m ()+setDOMHTMLKeygenElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLKeygenElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLKeygenElementName val = constructObjectPropertyString "name" val++data DOMHTMLKeygenElementNamePropertyInfo+instance AttrInfo DOMHTMLKeygenElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLKeygenElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLKeygenElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLKeygenElementNamePropertyInfo = DOMHTMLKeygenElementK+ type AttrGetType DOMHTMLKeygenElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLKeygenElementNamePropertyInfo = "DOMHTMLKeygenElement::name"+ attrGet _ = getDOMHTMLKeygenElementName+ attrSet _ = setDOMHTMLKeygenElementName+ attrConstruct _ = constructDOMHTMLKeygenElementName++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLKeygenElementType :: (MonadIO m, DOMHTMLKeygenElementK o) => o -> m T.Text+getDOMHTMLKeygenElementType obj = liftIO $ getObjectPropertyString obj "type"++data DOMHTMLKeygenElementTypePropertyInfo+instance AttrInfo DOMHTMLKeygenElementTypePropertyInfo where+ type AttrAllowedOps DOMHTMLKeygenElementTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLKeygenElementTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLKeygenElementTypePropertyInfo = DOMHTMLKeygenElementK+ type AttrGetType DOMHTMLKeygenElementTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLKeygenElementTypePropertyInfo = "DOMHTMLKeygenElement::type"+ attrGet _ = getDOMHTMLKeygenElementType+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "validation-message"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLKeygenElementValidationMessage :: (MonadIO m, DOMHTMLKeygenElementK o) => o -> m T.Text+getDOMHTMLKeygenElementValidationMessage obj = liftIO $ getObjectPropertyString obj "validation-message"++data DOMHTMLKeygenElementValidationMessagePropertyInfo+instance AttrInfo DOMHTMLKeygenElementValidationMessagePropertyInfo where+ type AttrAllowedOps DOMHTMLKeygenElementValidationMessagePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLKeygenElementValidationMessagePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLKeygenElementValidationMessagePropertyInfo = DOMHTMLKeygenElementK+ type AttrGetType DOMHTMLKeygenElementValidationMessagePropertyInfo = T.Text+ type AttrLabel DOMHTMLKeygenElementValidationMessagePropertyInfo = "DOMHTMLKeygenElement::validation-message"+ attrGet _ = getDOMHTMLKeygenElementValidationMessage+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "validity"+ -- Type: TInterface "WebKit" "DOMValidityState"+ -- Flags: [PropertyReadable]++getDOMHTMLKeygenElementValidity :: (MonadIO m, DOMHTMLKeygenElementK o) => o -> m DOMValidityState+getDOMHTMLKeygenElementValidity obj = liftIO $ getObjectPropertyObject obj "validity" DOMValidityState++data DOMHTMLKeygenElementValidityPropertyInfo+instance AttrInfo DOMHTMLKeygenElementValidityPropertyInfo where+ type AttrAllowedOps DOMHTMLKeygenElementValidityPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLKeygenElementValidityPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLKeygenElementValidityPropertyInfo = DOMHTMLKeygenElementK+ type AttrGetType DOMHTMLKeygenElementValidityPropertyInfo = DOMValidityState+ type AttrLabel DOMHTMLKeygenElementValidityPropertyInfo = "DOMHTMLKeygenElement::validity"+ attrGet _ = getDOMHTMLKeygenElementValidity+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "will-validate"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMHTMLKeygenElementWillValidate :: (MonadIO m, DOMHTMLKeygenElementK o) => o -> m Bool+getDOMHTMLKeygenElementWillValidate obj = liftIO $ getObjectPropertyBool obj "will-validate"++data DOMHTMLKeygenElementWillValidatePropertyInfo+instance AttrInfo DOMHTMLKeygenElementWillValidatePropertyInfo where+ type AttrAllowedOps DOMHTMLKeygenElementWillValidatePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLKeygenElementWillValidatePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLKeygenElementWillValidatePropertyInfo = DOMHTMLKeygenElementK+ type AttrGetType DOMHTMLKeygenElementWillValidatePropertyInfo = Bool+ type AttrLabel DOMHTMLKeygenElementWillValidatePropertyInfo = "DOMHTMLKeygenElement::will-validate"+ attrGet _ = getDOMHTMLKeygenElementWillValidate+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMHTMLKeygenElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autofocus", DOMHTMLKeygenElementAutofocusPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("challenge", DOMHTMLKeygenElementChallengePropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLKeygenElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLKeygenElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("keytype", DOMHTMLKeygenElementKeytypePropertyInfo), '("labels", DOMHTMLKeygenElementLabelsPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLKeygenElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLKeygenElementTypePropertyInfo), '("validation-message", DOMHTMLKeygenElementValidationMessagePropertyInfo), '("validity", DOMHTMLKeygenElementValidityPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("will-validate", DOMHTMLKeygenElementWillValidatePropertyInfo)]++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLLIElementType :: (MonadIO m, DOMHTMLLIElementK o) => o -> m T.Text+getDOMHTMLLIElementType obj = liftIO $ getObjectPropertyString obj "type"++setDOMHTMLLIElementType :: (MonadIO m, DOMHTMLLIElementK o) => o -> T.Text -> m ()+setDOMHTMLLIElementType obj val = liftIO $ setObjectPropertyString obj "type" val++constructDOMHTMLLIElementType :: T.Text -> IO ([Char], GValue)+constructDOMHTMLLIElementType val = constructObjectPropertyString "type" val++data DOMHTMLLIElementTypePropertyInfo+instance AttrInfo DOMHTMLLIElementTypePropertyInfo where+ type AttrAllowedOps DOMHTMLLIElementTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLIElementTypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLLIElementTypePropertyInfo = DOMHTMLLIElementK+ type AttrGetType DOMHTMLLIElementTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLLIElementTypePropertyInfo = "DOMHTMLLIElement::type"+ attrGet _ = getDOMHTMLLIElementType+ attrSet _ = setDOMHTMLLIElementType+ attrConstruct _ = constructDOMHTMLLIElementType++-- VVV Prop "value"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLLIElementValue :: (MonadIO m, DOMHTMLLIElementK o) => o -> m Int64+getDOMHTMLLIElementValue obj = liftIO $ getObjectPropertyInt64 obj "value"++setDOMHTMLLIElementValue :: (MonadIO m, DOMHTMLLIElementK o) => o -> Int64 -> m ()+setDOMHTMLLIElementValue obj val = liftIO $ setObjectPropertyInt64 obj "value" val++constructDOMHTMLLIElementValue :: Int64 -> IO ([Char], GValue)+constructDOMHTMLLIElementValue val = constructObjectPropertyInt64 "value" val++data DOMHTMLLIElementValuePropertyInfo+instance AttrInfo DOMHTMLLIElementValuePropertyInfo where+ type AttrAllowedOps DOMHTMLLIElementValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLIElementValuePropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLLIElementValuePropertyInfo = DOMHTMLLIElementK+ type AttrGetType DOMHTMLLIElementValuePropertyInfo = Int64+ type AttrLabel DOMHTMLLIElementValuePropertyInfo = "DOMHTMLLIElement::value"+ attrGet _ = getDOMHTMLLIElementValue+ attrSet _ = setDOMHTMLLIElementValue+ attrConstruct _ = constructDOMHTMLLIElementValue++type instance AttributeList DOMHTMLLIElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLLIElementTypePropertyInfo), '("value", DOMHTMLLIElementValuePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "control"+ -- Type: TInterface "WebKit" "DOMHTMLElement"+ -- Flags: [PropertyReadable]++getDOMHTMLLabelElementControl :: (MonadIO m, DOMHTMLLabelElementK o) => o -> m DOMHTMLElement+getDOMHTMLLabelElementControl obj = liftIO $ getObjectPropertyObject obj "control" DOMHTMLElement++data DOMHTMLLabelElementControlPropertyInfo+instance AttrInfo DOMHTMLLabelElementControlPropertyInfo where+ type AttrAllowedOps DOMHTMLLabelElementControlPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLabelElementControlPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLLabelElementControlPropertyInfo = DOMHTMLLabelElementK+ type AttrGetType DOMHTMLLabelElementControlPropertyInfo = DOMHTMLElement+ type AttrLabel DOMHTMLLabelElementControlPropertyInfo = "DOMHTMLLabelElement::control"+ attrGet _ = getDOMHTMLLabelElementControl+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "form"+ -- Type: TInterface "WebKit" "DOMHTMLFormElement"+ -- Flags: [PropertyReadable]++getDOMHTMLLabelElementForm :: (MonadIO m, DOMHTMLLabelElementK o) => o -> m DOMHTMLFormElement+getDOMHTMLLabelElementForm obj = liftIO $ getObjectPropertyObject obj "form" DOMHTMLFormElement++data DOMHTMLLabelElementFormPropertyInfo+instance AttrInfo DOMHTMLLabelElementFormPropertyInfo where+ type AttrAllowedOps DOMHTMLLabelElementFormPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLabelElementFormPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLLabelElementFormPropertyInfo = DOMHTMLLabelElementK+ type AttrGetType DOMHTMLLabelElementFormPropertyInfo = DOMHTMLFormElement+ type AttrLabel DOMHTMLLabelElementFormPropertyInfo = "DOMHTMLLabelElement::form"+ attrGet _ = getDOMHTMLLabelElementForm+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "html-for"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLLabelElementHtmlFor :: (MonadIO m, DOMHTMLLabelElementK o) => o -> m T.Text+getDOMHTMLLabelElementHtmlFor obj = liftIO $ getObjectPropertyString obj "html-for"++setDOMHTMLLabelElementHtmlFor :: (MonadIO m, DOMHTMLLabelElementK o) => o -> T.Text -> m ()+setDOMHTMLLabelElementHtmlFor obj val = liftIO $ setObjectPropertyString obj "html-for" val++constructDOMHTMLLabelElementHtmlFor :: T.Text -> IO ([Char], GValue)+constructDOMHTMLLabelElementHtmlFor val = constructObjectPropertyString "html-for" val++data DOMHTMLLabelElementHtmlForPropertyInfo+instance AttrInfo DOMHTMLLabelElementHtmlForPropertyInfo where+ type AttrAllowedOps DOMHTMLLabelElementHtmlForPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLabelElementHtmlForPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLLabelElementHtmlForPropertyInfo = DOMHTMLLabelElementK+ type AttrGetType DOMHTMLLabelElementHtmlForPropertyInfo = T.Text+ type AttrLabel DOMHTMLLabelElementHtmlForPropertyInfo = "DOMHTMLLabelElement::html-for"+ attrGet _ = getDOMHTMLLabelElementHtmlFor+ attrSet _ = setDOMHTMLLabelElementHtmlFor+ attrConstruct _ = constructDOMHTMLLabelElementHtmlFor++type instance AttributeList DOMHTMLLabelElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("control", DOMHTMLLabelElementControlPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLLabelElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("html-for", DOMHTMLLabelElementHtmlForPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLLegendElementAlign :: (MonadIO m, DOMHTMLLegendElementK o) => o -> m T.Text+getDOMHTMLLegendElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLLegendElementAlign :: (MonadIO m, DOMHTMLLegendElementK o) => o -> T.Text -> m ()+setDOMHTMLLegendElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLLegendElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLLegendElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLLegendElementAlignPropertyInfo+instance AttrInfo DOMHTMLLegendElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLLegendElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLegendElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLLegendElementAlignPropertyInfo = DOMHTMLLegendElementK+ type AttrGetType DOMHTMLLegendElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLLegendElementAlignPropertyInfo = "DOMHTMLLegendElement::align"+ attrGet _ = getDOMHTMLLegendElementAlign+ attrSet _ = setDOMHTMLLegendElementAlign+ attrConstruct _ = constructDOMHTMLLegendElementAlign++-- VVV Prop "form"+ -- Type: TInterface "WebKit" "DOMHTMLFormElement"+ -- Flags: [PropertyReadable]++getDOMHTMLLegendElementForm :: (MonadIO m, DOMHTMLLegendElementK o) => o -> m DOMHTMLFormElement+getDOMHTMLLegendElementForm obj = liftIO $ getObjectPropertyObject obj "form" DOMHTMLFormElement++data DOMHTMLLegendElementFormPropertyInfo+instance AttrInfo DOMHTMLLegendElementFormPropertyInfo where+ type AttrAllowedOps DOMHTMLLegendElementFormPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLegendElementFormPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLLegendElementFormPropertyInfo = DOMHTMLLegendElementK+ type AttrGetType DOMHTMLLegendElementFormPropertyInfo = DOMHTMLFormElement+ type AttrLabel DOMHTMLLegendElementFormPropertyInfo = "DOMHTMLLegendElement::form"+ attrGet _ = getDOMHTMLLegendElementForm+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMHTMLLegendElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLLegendElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLLegendElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "charset"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLLinkElementCharset :: (MonadIO m, DOMHTMLLinkElementK o) => o -> m T.Text+getDOMHTMLLinkElementCharset obj = liftIO $ getObjectPropertyString obj "charset"++setDOMHTMLLinkElementCharset :: (MonadIO m, DOMHTMLLinkElementK o) => o -> T.Text -> m ()+setDOMHTMLLinkElementCharset obj val = liftIO $ setObjectPropertyString obj "charset" val++constructDOMHTMLLinkElementCharset :: T.Text -> IO ([Char], GValue)+constructDOMHTMLLinkElementCharset val = constructObjectPropertyString "charset" val++data DOMHTMLLinkElementCharsetPropertyInfo+instance AttrInfo DOMHTMLLinkElementCharsetPropertyInfo where+ type AttrAllowedOps DOMHTMLLinkElementCharsetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLinkElementCharsetPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLLinkElementCharsetPropertyInfo = DOMHTMLLinkElementK+ type AttrGetType DOMHTMLLinkElementCharsetPropertyInfo = T.Text+ type AttrLabel DOMHTMLLinkElementCharsetPropertyInfo = "DOMHTMLLinkElement::charset"+ attrGet _ = getDOMHTMLLinkElementCharset+ attrSet _ = setDOMHTMLLinkElementCharset+ attrConstruct _ = constructDOMHTMLLinkElementCharset++-- VVV Prop "disabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLLinkElementDisabled :: (MonadIO m, DOMHTMLLinkElementK o) => o -> m Bool+getDOMHTMLLinkElementDisabled obj = liftIO $ getObjectPropertyBool obj "disabled"++setDOMHTMLLinkElementDisabled :: (MonadIO m, DOMHTMLLinkElementK o) => o -> Bool -> m ()+setDOMHTMLLinkElementDisabled obj val = liftIO $ setObjectPropertyBool obj "disabled" val++constructDOMHTMLLinkElementDisabled :: Bool -> IO ([Char], GValue)+constructDOMHTMLLinkElementDisabled val = constructObjectPropertyBool "disabled" val++data DOMHTMLLinkElementDisabledPropertyInfo+instance AttrInfo DOMHTMLLinkElementDisabledPropertyInfo where+ type AttrAllowedOps DOMHTMLLinkElementDisabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLinkElementDisabledPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLLinkElementDisabledPropertyInfo = DOMHTMLLinkElementK+ type AttrGetType DOMHTMLLinkElementDisabledPropertyInfo = Bool+ type AttrLabel DOMHTMLLinkElementDisabledPropertyInfo = "DOMHTMLLinkElement::disabled"+ attrGet _ = getDOMHTMLLinkElementDisabled+ attrSet _ = setDOMHTMLLinkElementDisabled+ attrConstruct _ = constructDOMHTMLLinkElementDisabled++-- VVV Prop "href"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLLinkElementHref :: (MonadIO m, DOMHTMLLinkElementK o) => o -> m T.Text+getDOMHTMLLinkElementHref obj = liftIO $ getObjectPropertyString obj "href"++setDOMHTMLLinkElementHref :: (MonadIO m, DOMHTMLLinkElementK o) => o -> T.Text -> m ()+setDOMHTMLLinkElementHref obj val = liftIO $ setObjectPropertyString obj "href" val++constructDOMHTMLLinkElementHref :: T.Text -> IO ([Char], GValue)+constructDOMHTMLLinkElementHref val = constructObjectPropertyString "href" val++data DOMHTMLLinkElementHrefPropertyInfo+instance AttrInfo DOMHTMLLinkElementHrefPropertyInfo where+ type AttrAllowedOps DOMHTMLLinkElementHrefPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLinkElementHrefPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLLinkElementHrefPropertyInfo = DOMHTMLLinkElementK+ type AttrGetType DOMHTMLLinkElementHrefPropertyInfo = T.Text+ type AttrLabel DOMHTMLLinkElementHrefPropertyInfo = "DOMHTMLLinkElement::href"+ attrGet _ = getDOMHTMLLinkElementHref+ attrSet _ = setDOMHTMLLinkElementHref+ attrConstruct _ = constructDOMHTMLLinkElementHref++-- VVV Prop "hreflang"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLLinkElementHreflang :: (MonadIO m, DOMHTMLLinkElementK o) => o -> m T.Text+getDOMHTMLLinkElementHreflang obj = liftIO $ getObjectPropertyString obj "hreflang"++setDOMHTMLLinkElementHreflang :: (MonadIO m, DOMHTMLLinkElementK o) => o -> T.Text -> m ()+setDOMHTMLLinkElementHreflang obj val = liftIO $ setObjectPropertyString obj "hreflang" val++constructDOMHTMLLinkElementHreflang :: T.Text -> IO ([Char], GValue)+constructDOMHTMLLinkElementHreflang val = constructObjectPropertyString "hreflang" val++data DOMHTMLLinkElementHreflangPropertyInfo+instance AttrInfo DOMHTMLLinkElementHreflangPropertyInfo where+ type AttrAllowedOps DOMHTMLLinkElementHreflangPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLinkElementHreflangPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLLinkElementHreflangPropertyInfo = DOMHTMLLinkElementK+ type AttrGetType DOMHTMLLinkElementHreflangPropertyInfo = T.Text+ type AttrLabel DOMHTMLLinkElementHreflangPropertyInfo = "DOMHTMLLinkElement::hreflang"+ attrGet _ = getDOMHTMLLinkElementHreflang+ attrSet _ = setDOMHTMLLinkElementHreflang+ attrConstruct _ = constructDOMHTMLLinkElementHreflang++-- VVV Prop "media"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLLinkElementMedia :: (MonadIO m, DOMHTMLLinkElementK o) => o -> m T.Text+getDOMHTMLLinkElementMedia obj = liftIO $ getObjectPropertyString obj "media"++setDOMHTMLLinkElementMedia :: (MonadIO m, DOMHTMLLinkElementK o) => o -> T.Text -> m ()+setDOMHTMLLinkElementMedia obj val = liftIO $ setObjectPropertyString obj "media" val++constructDOMHTMLLinkElementMedia :: T.Text -> IO ([Char], GValue)+constructDOMHTMLLinkElementMedia val = constructObjectPropertyString "media" val++data DOMHTMLLinkElementMediaPropertyInfo+instance AttrInfo DOMHTMLLinkElementMediaPropertyInfo where+ type AttrAllowedOps DOMHTMLLinkElementMediaPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLinkElementMediaPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLLinkElementMediaPropertyInfo = DOMHTMLLinkElementK+ type AttrGetType DOMHTMLLinkElementMediaPropertyInfo = T.Text+ type AttrLabel DOMHTMLLinkElementMediaPropertyInfo = "DOMHTMLLinkElement::media"+ attrGet _ = getDOMHTMLLinkElementMedia+ attrSet _ = setDOMHTMLLinkElementMedia+ attrConstruct _ = constructDOMHTMLLinkElementMedia++-- VVV Prop "rel"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLLinkElementRel :: (MonadIO m, DOMHTMLLinkElementK o) => o -> m T.Text+getDOMHTMLLinkElementRel obj = liftIO $ getObjectPropertyString obj "rel"++setDOMHTMLLinkElementRel :: (MonadIO m, DOMHTMLLinkElementK o) => o -> T.Text -> m ()+setDOMHTMLLinkElementRel obj val = liftIO $ setObjectPropertyString obj "rel" val++constructDOMHTMLLinkElementRel :: T.Text -> IO ([Char], GValue)+constructDOMHTMLLinkElementRel val = constructObjectPropertyString "rel" val++data DOMHTMLLinkElementRelPropertyInfo+instance AttrInfo DOMHTMLLinkElementRelPropertyInfo where+ type AttrAllowedOps DOMHTMLLinkElementRelPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLinkElementRelPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLLinkElementRelPropertyInfo = DOMHTMLLinkElementK+ type AttrGetType DOMHTMLLinkElementRelPropertyInfo = T.Text+ type AttrLabel DOMHTMLLinkElementRelPropertyInfo = "DOMHTMLLinkElement::rel"+ attrGet _ = getDOMHTMLLinkElementRel+ attrSet _ = setDOMHTMLLinkElementRel+ attrConstruct _ = constructDOMHTMLLinkElementRel++-- VVV Prop "rev"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLLinkElementRev :: (MonadIO m, DOMHTMLLinkElementK o) => o -> m T.Text+getDOMHTMLLinkElementRev obj = liftIO $ getObjectPropertyString obj "rev"++setDOMHTMLLinkElementRev :: (MonadIO m, DOMHTMLLinkElementK o) => o -> T.Text -> m ()+setDOMHTMLLinkElementRev obj val = liftIO $ setObjectPropertyString obj "rev" val++constructDOMHTMLLinkElementRev :: T.Text -> IO ([Char], GValue)+constructDOMHTMLLinkElementRev val = constructObjectPropertyString "rev" val++data DOMHTMLLinkElementRevPropertyInfo+instance AttrInfo DOMHTMLLinkElementRevPropertyInfo where+ type AttrAllowedOps DOMHTMLLinkElementRevPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLinkElementRevPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLLinkElementRevPropertyInfo = DOMHTMLLinkElementK+ type AttrGetType DOMHTMLLinkElementRevPropertyInfo = T.Text+ type AttrLabel DOMHTMLLinkElementRevPropertyInfo = "DOMHTMLLinkElement::rev"+ attrGet _ = getDOMHTMLLinkElementRev+ attrSet _ = setDOMHTMLLinkElementRev+ attrConstruct _ = constructDOMHTMLLinkElementRev++-- VVV Prop "sheet"+ -- Type: TInterface "WebKit" "DOMStyleSheet"+ -- Flags: [PropertyReadable]++getDOMHTMLLinkElementSheet :: (MonadIO m, DOMHTMLLinkElementK o) => o -> m DOMStyleSheet+getDOMHTMLLinkElementSheet obj = liftIO $ getObjectPropertyObject obj "sheet" DOMStyleSheet++data DOMHTMLLinkElementSheetPropertyInfo+instance AttrInfo DOMHTMLLinkElementSheetPropertyInfo where+ type AttrAllowedOps DOMHTMLLinkElementSheetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLinkElementSheetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLLinkElementSheetPropertyInfo = DOMHTMLLinkElementK+ type AttrGetType DOMHTMLLinkElementSheetPropertyInfo = DOMStyleSheet+ type AttrLabel DOMHTMLLinkElementSheetPropertyInfo = "DOMHTMLLinkElement::sheet"+ attrGet _ = getDOMHTMLLinkElementSheet+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "target"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLLinkElementTarget :: (MonadIO m, DOMHTMLLinkElementK o) => o -> m T.Text+getDOMHTMLLinkElementTarget obj = liftIO $ getObjectPropertyString obj "target"++setDOMHTMLLinkElementTarget :: (MonadIO m, DOMHTMLLinkElementK o) => o -> T.Text -> m ()+setDOMHTMLLinkElementTarget obj val = liftIO $ setObjectPropertyString obj "target" val++constructDOMHTMLLinkElementTarget :: T.Text -> IO ([Char], GValue)+constructDOMHTMLLinkElementTarget val = constructObjectPropertyString "target" val++data DOMHTMLLinkElementTargetPropertyInfo+instance AttrInfo DOMHTMLLinkElementTargetPropertyInfo where+ type AttrAllowedOps DOMHTMLLinkElementTargetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLinkElementTargetPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLLinkElementTargetPropertyInfo = DOMHTMLLinkElementK+ type AttrGetType DOMHTMLLinkElementTargetPropertyInfo = T.Text+ type AttrLabel DOMHTMLLinkElementTargetPropertyInfo = "DOMHTMLLinkElement::target"+ attrGet _ = getDOMHTMLLinkElementTarget+ attrSet _ = setDOMHTMLLinkElementTarget+ attrConstruct _ = constructDOMHTMLLinkElementTarget++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLLinkElementType :: (MonadIO m, DOMHTMLLinkElementK o) => o -> m T.Text+getDOMHTMLLinkElementType obj = liftIO $ getObjectPropertyString obj "type"++setDOMHTMLLinkElementType :: (MonadIO m, DOMHTMLLinkElementK o) => o -> T.Text -> m ()+setDOMHTMLLinkElementType obj val = liftIO $ setObjectPropertyString obj "type" val++constructDOMHTMLLinkElementType :: T.Text -> IO ([Char], GValue)+constructDOMHTMLLinkElementType val = constructObjectPropertyString "type" val++data DOMHTMLLinkElementTypePropertyInfo+instance AttrInfo DOMHTMLLinkElementTypePropertyInfo where+ type AttrAllowedOps DOMHTMLLinkElementTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLLinkElementTypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLLinkElementTypePropertyInfo = DOMHTMLLinkElementK+ type AttrGetType DOMHTMLLinkElementTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLLinkElementTypePropertyInfo = "DOMHTMLLinkElement::type"+ attrGet _ = getDOMHTMLLinkElementType+ attrSet _ = setDOMHTMLLinkElementType+ attrConstruct _ = constructDOMHTMLLinkElementType++type instance AttributeList DOMHTMLLinkElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("charset", DOMHTMLLinkElementCharsetPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLLinkElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("href", DOMHTMLLinkElementHrefPropertyInfo), '("hreflang", DOMHTMLLinkElementHreflangPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("media", DOMHTMLLinkElementMediaPropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("rel", DOMHTMLLinkElementRelPropertyInfo), '("rev", DOMHTMLLinkElementRevPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("sheet", DOMHTMLLinkElementSheetPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("target", DOMHTMLLinkElementTargetPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLLinkElementTypePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "areas"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMHTMLMapElementAreas :: (MonadIO m, DOMHTMLMapElementK o) => o -> m DOMHTMLCollection+getDOMHTMLMapElementAreas obj = liftIO $ getObjectPropertyObject obj "areas" DOMHTMLCollection++data DOMHTMLMapElementAreasPropertyInfo+instance AttrInfo DOMHTMLMapElementAreasPropertyInfo where+ type AttrAllowedOps DOMHTMLMapElementAreasPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMapElementAreasPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMapElementAreasPropertyInfo = DOMHTMLMapElementK+ type AttrGetType DOMHTMLMapElementAreasPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMHTMLMapElementAreasPropertyInfo = "DOMHTMLMapElement::areas"+ attrGet _ = getDOMHTMLMapElementAreas+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMapElementName :: (MonadIO m, DOMHTMLMapElementK o) => o -> m T.Text+getDOMHTMLMapElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLMapElementName :: (MonadIO m, DOMHTMLMapElementK o) => o -> T.Text -> m ()+setDOMHTMLMapElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLMapElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLMapElementName val = constructObjectPropertyString "name" val++data DOMHTMLMapElementNamePropertyInfo+instance AttrInfo DOMHTMLMapElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLMapElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMapElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLMapElementNamePropertyInfo = DOMHTMLMapElementK+ type AttrGetType DOMHTMLMapElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLMapElementNamePropertyInfo = "DOMHTMLMapElement::name"+ attrGet _ = getDOMHTMLMapElementName+ attrSet _ = setDOMHTMLMapElementName+ attrConstruct _ = constructDOMHTMLMapElementName++type instance AttributeList DOMHTMLMapElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("areas", DOMHTMLMapElementAreasPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLMapElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "behavior"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMarqueeElementBehavior :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> m T.Text+getDOMHTMLMarqueeElementBehavior obj = liftIO $ getObjectPropertyString obj "behavior"++setDOMHTMLMarqueeElementBehavior :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> T.Text -> m ()+setDOMHTMLMarqueeElementBehavior obj val = liftIO $ setObjectPropertyString obj "behavior" val++constructDOMHTMLMarqueeElementBehavior :: T.Text -> IO ([Char], GValue)+constructDOMHTMLMarqueeElementBehavior val = constructObjectPropertyString "behavior" val++data DOMHTMLMarqueeElementBehaviorPropertyInfo+instance AttrInfo DOMHTMLMarqueeElementBehaviorPropertyInfo where+ type AttrAllowedOps DOMHTMLMarqueeElementBehaviorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMarqueeElementBehaviorPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLMarqueeElementBehaviorPropertyInfo = DOMHTMLMarqueeElementK+ type AttrGetType DOMHTMLMarqueeElementBehaviorPropertyInfo = T.Text+ type AttrLabel DOMHTMLMarqueeElementBehaviorPropertyInfo = "DOMHTMLMarqueeElement::behavior"+ attrGet _ = getDOMHTMLMarqueeElementBehavior+ attrSet _ = setDOMHTMLMarqueeElementBehavior+ attrConstruct _ = constructDOMHTMLMarqueeElementBehavior++-- VVV Prop "bg-color"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMarqueeElementBgColor :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> m T.Text+getDOMHTMLMarqueeElementBgColor obj = liftIO $ getObjectPropertyString obj "bg-color"++setDOMHTMLMarqueeElementBgColor :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> T.Text -> m ()+setDOMHTMLMarqueeElementBgColor obj val = liftIO $ setObjectPropertyString obj "bg-color" val++constructDOMHTMLMarqueeElementBgColor :: T.Text -> IO ([Char], GValue)+constructDOMHTMLMarqueeElementBgColor val = constructObjectPropertyString "bg-color" val++data DOMHTMLMarqueeElementBgColorPropertyInfo+instance AttrInfo DOMHTMLMarqueeElementBgColorPropertyInfo where+ type AttrAllowedOps DOMHTMLMarqueeElementBgColorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMarqueeElementBgColorPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLMarqueeElementBgColorPropertyInfo = DOMHTMLMarqueeElementK+ type AttrGetType DOMHTMLMarqueeElementBgColorPropertyInfo = T.Text+ type AttrLabel DOMHTMLMarqueeElementBgColorPropertyInfo = "DOMHTMLMarqueeElement::bg-color"+ attrGet _ = getDOMHTMLMarqueeElementBgColor+ attrSet _ = setDOMHTMLMarqueeElementBgColor+ attrConstruct _ = constructDOMHTMLMarqueeElementBgColor++-- VVV Prop "direction"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMarqueeElementDirection :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> m T.Text+getDOMHTMLMarqueeElementDirection obj = liftIO $ getObjectPropertyString obj "direction"++setDOMHTMLMarqueeElementDirection :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> T.Text -> m ()+setDOMHTMLMarqueeElementDirection obj val = liftIO $ setObjectPropertyString obj "direction" val++constructDOMHTMLMarqueeElementDirection :: T.Text -> IO ([Char], GValue)+constructDOMHTMLMarqueeElementDirection val = constructObjectPropertyString "direction" val++data DOMHTMLMarqueeElementDirectionPropertyInfo+instance AttrInfo DOMHTMLMarqueeElementDirectionPropertyInfo where+ type AttrAllowedOps DOMHTMLMarqueeElementDirectionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMarqueeElementDirectionPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLMarqueeElementDirectionPropertyInfo = DOMHTMLMarqueeElementK+ type AttrGetType DOMHTMLMarqueeElementDirectionPropertyInfo = T.Text+ type AttrLabel DOMHTMLMarqueeElementDirectionPropertyInfo = "DOMHTMLMarqueeElement::direction"+ attrGet _ = getDOMHTMLMarqueeElementDirection+ attrSet _ = setDOMHTMLMarqueeElementDirection+ attrConstruct _ = constructDOMHTMLMarqueeElementDirection++-- VVV Prop "height"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMarqueeElementHeight :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> m T.Text+getDOMHTMLMarqueeElementHeight obj = liftIO $ getObjectPropertyString obj "height"++setDOMHTMLMarqueeElementHeight :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> T.Text -> m ()+setDOMHTMLMarqueeElementHeight obj val = liftIO $ setObjectPropertyString obj "height" val++constructDOMHTMLMarqueeElementHeight :: T.Text -> IO ([Char], GValue)+constructDOMHTMLMarqueeElementHeight val = constructObjectPropertyString "height" val++data DOMHTMLMarqueeElementHeightPropertyInfo+instance AttrInfo DOMHTMLMarqueeElementHeightPropertyInfo where+ type AttrAllowedOps DOMHTMLMarqueeElementHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMarqueeElementHeightPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLMarqueeElementHeightPropertyInfo = DOMHTMLMarqueeElementK+ type AttrGetType DOMHTMLMarqueeElementHeightPropertyInfo = T.Text+ type AttrLabel DOMHTMLMarqueeElementHeightPropertyInfo = "DOMHTMLMarqueeElement::height"+ attrGet _ = getDOMHTMLMarqueeElementHeight+ attrSet _ = setDOMHTMLMarqueeElementHeight+ attrConstruct _ = constructDOMHTMLMarqueeElementHeight++-- VVV Prop "hspace"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMarqueeElementHspace :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> m Word64+getDOMHTMLMarqueeElementHspace obj = liftIO $ getObjectPropertyUInt64 obj "hspace"++setDOMHTMLMarqueeElementHspace :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> Word64 -> m ()+setDOMHTMLMarqueeElementHspace obj val = liftIO $ setObjectPropertyUInt64 obj "hspace" val++constructDOMHTMLMarqueeElementHspace :: Word64 -> IO ([Char], GValue)+constructDOMHTMLMarqueeElementHspace val = constructObjectPropertyUInt64 "hspace" val++data DOMHTMLMarqueeElementHspacePropertyInfo+instance AttrInfo DOMHTMLMarqueeElementHspacePropertyInfo where+ type AttrAllowedOps DOMHTMLMarqueeElementHspacePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMarqueeElementHspacePropertyInfo = (~) Word64+ type AttrBaseTypeConstraint DOMHTMLMarqueeElementHspacePropertyInfo = DOMHTMLMarqueeElementK+ type AttrGetType DOMHTMLMarqueeElementHspacePropertyInfo = Word64+ type AttrLabel DOMHTMLMarqueeElementHspacePropertyInfo = "DOMHTMLMarqueeElement::hspace"+ attrGet _ = getDOMHTMLMarqueeElementHspace+ attrSet _ = setDOMHTMLMarqueeElementHspace+ attrConstruct _ = constructDOMHTMLMarqueeElementHspace++-- VVV Prop "loop"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMarqueeElementLoop :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> m Int64+getDOMHTMLMarqueeElementLoop obj = liftIO $ getObjectPropertyInt64 obj "loop"++setDOMHTMLMarqueeElementLoop :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> Int64 -> m ()+setDOMHTMLMarqueeElementLoop obj val = liftIO $ setObjectPropertyInt64 obj "loop" val++constructDOMHTMLMarqueeElementLoop :: Int64 -> IO ([Char], GValue)+constructDOMHTMLMarqueeElementLoop val = constructObjectPropertyInt64 "loop" val++data DOMHTMLMarqueeElementLoopPropertyInfo+instance AttrInfo DOMHTMLMarqueeElementLoopPropertyInfo where+ type AttrAllowedOps DOMHTMLMarqueeElementLoopPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMarqueeElementLoopPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLMarqueeElementLoopPropertyInfo = DOMHTMLMarqueeElementK+ type AttrGetType DOMHTMLMarqueeElementLoopPropertyInfo = Int64+ type AttrLabel DOMHTMLMarqueeElementLoopPropertyInfo = "DOMHTMLMarqueeElement::loop"+ attrGet _ = getDOMHTMLMarqueeElementLoop+ attrSet _ = setDOMHTMLMarqueeElementLoop+ attrConstruct _ = constructDOMHTMLMarqueeElementLoop++-- VVV Prop "scroll-amount"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMarqueeElementScrollAmount :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> m Int64+getDOMHTMLMarqueeElementScrollAmount obj = liftIO $ getObjectPropertyInt64 obj "scroll-amount"++setDOMHTMLMarqueeElementScrollAmount :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> Int64 -> m ()+setDOMHTMLMarqueeElementScrollAmount obj val = liftIO $ setObjectPropertyInt64 obj "scroll-amount" val++constructDOMHTMLMarqueeElementScrollAmount :: Int64 -> IO ([Char], GValue)+constructDOMHTMLMarqueeElementScrollAmount val = constructObjectPropertyInt64 "scroll-amount" val++data DOMHTMLMarqueeElementScrollAmountPropertyInfo+instance AttrInfo DOMHTMLMarqueeElementScrollAmountPropertyInfo where+ type AttrAllowedOps DOMHTMLMarqueeElementScrollAmountPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMarqueeElementScrollAmountPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLMarqueeElementScrollAmountPropertyInfo = DOMHTMLMarqueeElementK+ type AttrGetType DOMHTMLMarqueeElementScrollAmountPropertyInfo = Int64+ type AttrLabel DOMHTMLMarqueeElementScrollAmountPropertyInfo = "DOMHTMLMarqueeElement::scroll-amount"+ attrGet _ = getDOMHTMLMarqueeElementScrollAmount+ attrSet _ = setDOMHTMLMarqueeElementScrollAmount+ attrConstruct _ = constructDOMHTMLMarqueeElementScrollAmount++-- VVV Prop "scroll-delay"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMarqueeElementScrollDelay :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> m Int64+getDOMHTMLMarqueeElementScrollDelay obj = liftIO $ getObjectPropertyInt64 obj "scroll-delay"++setDOMHTMLMarqueeElementScrollDelay :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> Int64 -> m ()+setDOMHTMLMarqueeElementScrollDelay obj val = liftIO $ setObjectPropertyInt64 obj "scroll-delay" val++constructDOMHTMLMarqueeElementScrollDelay :: Int64 -> IO ([Char], GValue)+constructDOMHTMLMarqueeElementScrollDelay val = constructObjectPropertyInt64 "scroll-delay" val++data DOMHTMLMarqueeElementScrollDelayPropertyInfo+instance AttrInfo DOMHTMLMarqueeElementScrollDelayPropertyInfo where+ type AttrAllowedOps DOMHTMLMarqueeElementScrollDelayPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMarqueeElementScrollDelayPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLMarqueeElementScrollDelayPropertyInfo = DOMHTMLMarqueeElementK+ type AttrGetType DOMHTMLMarqueeElementScrollDelayPropertyInfo = Int64+ type AttrLabel DOMHTMLMarqueeElementScrollDelayPropertyInfo = "DOMHTMLMarqueeElement::scroll-delay"+ attrGet _ = getDOMHTMLMarqueeElementScrollDelay+ attrSet _ = setDOMHTMLMarqueeElementScrollDelay+ attrConstruct _ = constructDOMHTMLMarqueeElementScrollDelay++-- VVV Prop "true-speed"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMarqueeElementTrueSpeed :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> m Bool+getDOMHTMLMarqueeElementTrueSpeed obj = liftIO $ getObjectPropertyBool obj "true-speed"++setDOMHTMLMarqueeElementTrueSpeed :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> Bool -> m ()+setDOMHTMLMarqueeElementTrueSpeed obj val = liftIO $ setObjectPropertyBool obj "true-speed" val++constructDOMHTMLMarqueeElementTrueSpeed :: Bool -> IO ([Char], GValue)+constructDOMHTMLMarqueeElementTrueSpeed val = constructObjectPropertyBool "true-speed" val++data DOMHTMLMarqueeElementTrueSpeedPropertyInfo+instance AttrInfo DOMHTMLMarqueeElementTrueSpeedPropertyInfo where+ type AttrAllowedOps DOMHTMLMarqueeElementTrueSpeedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMarqueeElementTrueSpeedPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLMarqueeElementTrueSpeedPropertyInfo = DOMHTMLMarqueeElementK+ type AttrGetType DOMHTMLMarqueeElementTrueSpeedPropertyInfo = Bool+ type AttrLabel DOMHTMLMarqueeElementTrueSpeedPropertyInfo = "DOMHTMLMarqueeElement::true-speed"+ attrGet _ = getDOMHTMLMarqueeElementTrueSpeed+ attrSet _ = setDOMHTMLMarqueeElementTrueSpeed+ attrConstruct _ = constructDOMHTMLMarqueeElementTrueSpeed++-- VVV Prop "vspace"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMarqueeElementVspace :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> m Word64+getDOMHTMLMarqueeElementVspace obj = liftIO $ getObjectPropertyUInt64 obj "vspace"++setDOMHTMLMarqueeElementVspace :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> Word64 -> m ()+setDOMHTMLMarqueeElementVspace obj val = liftIO $ setObjectPropertyUInt64 obj "vspace" val++constructDOMHTMLMarqueeElementVspace :: Word64 -> IO ([Char], GValue)+constructDOMHTMLMarqueeElementVspace val = constructObjectPropertyUInt64 "vspace" val++data DOMHTMLMarqueeElementVspacePropertyInfo+instance AttrInfo DOMHTMLMarqueeElementVspacePropertyInfo where+ type AttrAllowedOps DOMHTMLMarqueeElementVspacePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMarqueeElementVspacePropertyInfo = (~) Word64+ type AttrBaseTypeConstraint DOMHTMLMarqueeElementVspacePropertyInfo = DOMHTMLMarqueeElementK+ type AttrGetType DOMHTMLMarqueeElementVspacePropertyInfo = Word64+ type AttrLabel DOMHTMLMarqueeElementVspacePropertyInfo = "DOMHTMLMarqueeElement::vspace"+ attrGet _ = getDOMHTMLMarqueeElementVspace+ attrSet _ = setDOMHTMLMarqueeElementVspace+ attrConstruct _ = constructDOMHTMLMarqueeElementVspace++-- VVV Prop "width"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMarqueeElementWidth :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> m T.Text+getDOMHTMLMarqueeElementWidth obj = liftIO $ getObjectPropertyString obj "width"++setDOMHTMLMarqueeElementWidth :: (MonadIO m, DOMHTMLMarqueeElementK o) => o -> T.Text -> m ()+setDOMHTMLMarqueeElementWidth obj val = liftIO $ setObjectPropertyString obj "width" val++constructDOMHTMLMarqueeElementWidth :: T.Text -> IO ([Char], GValue)+constructDOMHTMLMarqueeElementWidth val = constructObjectPropertyString "width" val++data DOMHTMLMarqueeElementWidthPropertyInfo+instance AttrInfo DOMHTMLMarqueeElementWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLMarqueeElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMarqueeElementWidthPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLMarqueeElementWidthPropertyInfo = DOMHTMLMarqueeElementK+ type AttrGetType DOMHTMLMarqueeElementWidthPropertyInfo = T.Text+ type AttrLabel DOMHTMLMarqueeElementWidthPropertyInfo = "DOMHTMLMarqueeElement::width"+ attrGet _ = getDOMHTMLMarqueeElementWidth+ attrSet _ = setDOMHTMLMarqueeElementWidth+ attrConstruct _ = constructDOMHTMLMarqueeElementWidth++type instance AttributeList DOMHTMLMarqueeElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("behavior", DOMHTMLMarqueeElementBehaviorPropertyInfo), '("bg-color", DOMHTMLMarqueeElementBgColorPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("direction", DOMHTMLMarqueeElementDirectionPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLMarqueeElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("hspace", DOMHTMLMarqueeElementHspacePropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("loop", DOMHTMLMarqueeElementLoopPropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-amount", DOMHTMLMarqueeElementScrollAmountPropertyInfo), '("scroll-delay", DOMHTMLMarqueeElementScrollDelayPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("true-speed", DOMHTMLMarqueeElementTrueSpeedPropertyInfo), '("vspace", DOMHTMLMarqueeElementVspacePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLMarqueeElementWidthPropertyInfo)]++-- VVV Prop "audio-tracks"+ -- Type: TInterface "WebKit" "DOMAudioTrackList"+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementAudioTracks :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMAudioTrackList+getDOMHTMLMediaElementAudioTracks obj = liftIO $ getObjectPropertyObject obj "audio-tracks" DOMAudioTrackList++data DOMHTMLMediaElementAudioTracksPropertyInfo+instance AttrInfo DOMHTMLMediaElementAudioTracksPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementAudioTracksPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementAudioTracksPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementAudioTracksPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementAudioTracksPropertyInfo = DOMAudioTrackList+ type AttrLabel DOMHTMLMediaElementAudioTracksPropertyInfo = "DOMHTMLMediaElement::audio-tracks"+ attrGet _ = getDOMHTMLMediaElementAudioTracks+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "autoplay"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMediaElementAutoplay :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool+getDOMHTMLMediaElementAutoplay obj = liftIO $ getObjectPropertyBool obj "autoplay"++setDOMHTMLMediaElementAutoplay :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m ()+setDOMHTMLMediaElementAutoplay obj val = liftIO $ setObjectPropertyBool obj "autoplay" val++constructDOMHTMLMediaElementAutoplay :: Bool -> IO ([Char], GValue)+constructDOMHTMLMediaElementAutoplay val = constructObjectPropertyBool "autoplay" val++data DOMHTMLMediaElementAutoplayPropertyInfo+instance AttrInfo DOMHTMLMediaElementAutoplayPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementAutoplayPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementAutoplayPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLMediaElementAutoplayPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementAutoplayPropertyInfo = Bool+ type AttrLabel DOMHTMLMediaElementAutoplayPropertyInfo = "DOMHTMLMediaElement::autoplay"+ attrGet _ = getDOMHTMLMediaElementAutoplay+ attrSet _ = setDOMHTMLMediaElementAutoplay+ attrConstruct _ = constructDOMHTMLMediaElementAutoplay++-- VVV Prop "buffered"+ -- Type: TInterface "WebKit" "DOMTimeRanges"+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementBuffered :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMTimeRanges+getDOMHTMLMediaElementBuffered obj = liftIO $ getObjectPropertyObject obj "buffered" DOMTimeRanges++data DOMHTMLMediaElementBufferedPropertyInfo+instance AttrInfo DOMHTMLMediaElementBufferedPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementBufferedPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementBufferedPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementBufferedPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementBufferedPropertyInfo = DOMTimeRanges+ type AttrLabel DOMHTMLMediaElementBufferedPropertyInfo = "DOMHTMLMediaElement::buffered"+ attrGet _ = getDOMHTMLMediaElementBuffered+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "controller"+ -- Type: TInterface "WebKit" "DOMMediaController"+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementController :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMMediaController+getDOMHTMLMediaElementController obj = liftIO $ getObjectPropertyObject obj "controller" DOMMediaController++data DOMHTMLMediaElementControllerPropertyInfo+instance AttrInfo DOMHTMLMediaElementControllerPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementControllerPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementControllerPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementControllerPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementControllerPropertyInfo = DOMMediaController+ type AttrLabel DOMHTMLMediaElementControllerPropertyInfo = "DOMHTMLMediaElement::controller"+ attrGet _ = getDOMHTMLMediaElementController+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "controls"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMediaElementControls :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool+getDOMHTMLMediaElementControls obj = liftIO $ getObjectPropertyBool obj "controls"++setDOMHTMLMediaElementControls :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m ()+setDOMHTMLMediaElementControls obj val = liftIO $ setObjectPropertyBool obj "controls" val++constructDOMHTMLMediaElementControls :: Bool -> IO ([Char], GValue)+constructDOMHTMLMediaElementControls val = constructObjectPropertyBool "controls" val++data DOMHTMLMediaElementControlsPropertyInfo+instance AttrInfo DOMHTMLMediaElementControlsPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementControlsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementControlsPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLMediaElementControlsPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementControlsPropertyInfo = Bool+ type AttrLabel DOMHTMLMediaElementControlsPropertyInfo = "DOMHTMLMediaElement::controls"+ attrGet _ = getDOMHTMLMediaElementControls+ attrSet _ = setDOMHTMLMediaElementControls+ attrConstruct _ = constructDOMHTMLMediaElementControls++-- VVV Prop "current-src"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementCurrentSrc :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m T.Text+getDOMHTMLMediaElementCurrentSrc obj = liftIO $ getObjectPropertyString obj "current-src"++data DOMHTMLMediaElementCurrentSrcPropertyInfo+instance AttrInfo DOMHTMLMediaElementCurrentSrcPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementCurrentSrcPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementCurrentSrcPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementCurrentSrcPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementCurrentSrcPropertyInfo = T.Text+ type AttrLabel DOMHTMLMediaElementCurrentSrcPropertyInfo = "DOMHTMLMediaElement::current-src"+ attrGet _ = getDOMHTMLMediaElementCurrentSrc+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "current-time"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMediaElementCurrentTime :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Double+getDOMHTMLMediaElementCurrentTime obj = liftIO $ getObjectPropertyDouble obj "current-time"++setDOMHTMLMediaElementCurrentTime :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Double -> m ()+setDOMHTMLMediaElementCurrentTime obj val = liftIO $ setObjectPropertyDouble obj "current-time" val++constructDOMHTMLMediaElementCurrentTime :: Double -> IO ([Char], GValue)+constructDOMHTMLMediaElementCurrentTime val = constructObjectPropertyDouble "current-time" val++data DOMHTMLMediaElementCurrentTimePropertyInfo+instance AttrInfo DOMHTMLMediaElementCurrentTimePropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementCurrentTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementCurrentTimePropertyInfo = (~) Double+ type AttrBaseTypeConstraint DOMHTMLMediaElementCurrentTimePropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementCurrentTimePropertyInfo = Double+ type AttrLabel DOMHTMLMediaElementCurrentTimePropertyInfo = "DOMHTMLMediaElement::current-time"+ attrGet _ = getDOMHTMLMediaElementCurrentTime+ attrSet _ = setDOMHTMLMediaElementCurrentTime+ attrConstruct _ = constructDOMHTMLMediaElementCurrentTime++-- VVV Prop "default-muted"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMediaElementDefaultMuted :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool+getDOMHTMLMediaElementDefaultMuted obj = liftIO $ getObjectPropertyBool obj "default-muted"++setDOMHTMLMediaElementDefaultMuted :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m ()+setDOMHTMLMediaElementDefaultMuted obj val = liftIO $ setObjectPropertyBool obj "default-muted" val++constructDOMHTMLMediaElementDefaultMuted :: Bool -> IO ([Char], GValue)+constructDOMHTMLMediaElementDefaultMuted val = constructObjectPropertyBool "default-muted" val++data DOMHTMLMediaElementDefaultMutedPropertyInfo+instance AttrInfo DOMHTMLMediaElementDefaultMutedPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementDefaultMutedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementDefaultMutedPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLMediaElementDefaultMutedPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementDefaultMutedPropertyInfo = Bool+ type AttrLabel DOMHTMLMediaElementDefaultMutedPropertyInfo = "DOMHTMLMediaElement::default-muted"+ attrGet _ = getDOMHTMLMediaElementDefaultMuted+ attrSet _ = setDOMHTMLMediaElementDefaultMuted+ attrConstruct _ = constructDOMHTMLMediaElementDefaultMuted++-- VVV Prop "default-playback-rate"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMediaElementDefaultPlaybackRate :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Double+getDOMHTMLMediaElementDefaultPlaybackRate obj = liftIO $ getObjectPropertyDouble obj "default-playback-rate"++setDOMHTMLMediaElementDefaultPlaybackRate :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Double -> m ()+setDOMHTMLMediaElementDefaultPlaybackRate obj val = liftIO $ setObjectPropertyDouble obj "default-playback-rate" val++constructDOMHTMLMediaElementDefaultPlaybackRate :: Double -> IO ([Char], GValue)+constructDOMHTMLMediaElementDefaultPlaybackRate val = constructObjectPropertyDouble "default-playback-rate" val++data DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo+instance AttrInfo DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo = (~) Double+ type AttrBaseTypeConstraint DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo = Double+ type AttrLabel DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo = "DOMHTMLMediaElement::default-playback-rate"+ attrGet _ = getDOMHTMLMediaElementDefaultPlaybackRate+ attrSet _ = setDOMHTMLMediaElementDefaultPlaybackRate+ attrConstruct _ = constructDOMHTMLMediaElementDefaultPlaybackRate++-- VVV Prop "duration"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementDuration :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Double+getDOMHTMLMediaElementDuration obj = liftIO $ getObjectPropertyDouble obj "duration"++data DOMHTMLMediaElementDurationPropertyInfo+instance AttrInfo DOMHTMLMediaElementDurationPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementDurationPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementDurationPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementDurationPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementDurationPropertyInfo = Double+ type AttrLabel DOMHTMLMediaElementDurationPropertyInfo = "DOMHTMLMediaElement::duration"+ attrGet _ = getDOMHTMLMediaElementDuration+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "ended"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementEnded :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool+getDOMHTMLMediaElementEnded obj = liftIO $ getObjectPropertyBool obj "ended"++data DOMHTMLMediaElementEndedPropertyInfo+instance AttrInfo DOMHTMLMediaElementEndedPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementEndedPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementEndedPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementEndedPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementEndedPropertyInfo = Bool+ type AttrLabel DOMHTMLMediaElementEndedPropertyInfo = "DOMHTMLMediaElement::ended"+ attrGet _ = getDOMHTMLMediaElementEnded+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "error"+ -- Type: TInterface "WebKit" "DOMMediaError"+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementError :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMMediaError+getDOMHTMLMediaElementError obj = liftIO $ getObjectPropertyObject obj "error" DOMMediaError++data DOMHTMLMediaElementErrorPropertyInfo+instance AttrInfo DOMHTMLMediaElementErrorPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementErrorPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementErrorPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementErrorPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementErrorPropertyInfo = DOMMediaError+ type AttrLabel DOMHTMLMediaElementErrorPropertyInfo = "DOMHTMLMediaElement::error"+ attrGet _ = getDOMHTMLMediaElementError+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "loop"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMediaElementLoop :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool+getDOMHTMLMediaElementLoop obj = liftIO $ getObjectPropertyBool obj "loop"++setDOMHTMLMediaElementLoop :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m ()+setDOMHTMLMediaElementLoop obj val = liftIO $ setObjectPropertyBool obj "loop" val++constructDOMHTMLMediaElementLoop :: Bool -> IO ([Char], GValue)+constructDOMHTMLMediaElementLoop val = constructObjectPropertyBool "loop" val++data DOMHTMLMediaElementLoopPropertyInfo+instance AttrInfo DOMHTMLMediaElementLoopPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementLoopPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementLoopPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLMediaElementLoopPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementLoopPropertyInfo = Bool+ type AttrLabel DOMHTMLMediaElementLoopPropertyInfo = "DOMHTMLMediaElement::loop"+ attrGet _ = getDOMHTMLMediaElementLoop+ attrSet _ = setDOMHTMLMediaElementLoop+ attrConstruct _ = constructDOMHTMLMediaElementLoop++-- VVV Prop "media-group"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMediaElementMediaGroup :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m T.Text+getDOMHTMLMediaElementMediaGroup obj = liftIO $ getObjectPropertyString obj "media-group"++setDOMHTMLMediaElementMediaGroup :: (MonadIO m, DOMHTMLMediaElementK o) => o -> T.Text -> m ()+setDOMHTMLMediaElementMediaGroup obj val = liftIO $ setObjectPropertyString obj "media-group" val++constructDOMHTMLMediaElementMediaGroup :: T.Text -> IO ([Char], GValue)+constructDOMHTMLMediaElementMediaGroup val = constructObjectPropertyString "media-group" val++data DOMHTMLMediaElementMediaGroupPropertyInfo+instance AttrInfo DOMHTMLMediaElementMediaGroupPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementMediaGroupPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementMediaGroupPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLMediaElementMediaGroupPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementMediaGroupPropertyInfo = T.Text+ type AttrLabel DOMHTMLMediaElementMediaGroupPropertyInfo = "DOMHTMLMediaElement::media-group"+ attrGet _ = getDOMHTMLMediaElementMediaGroup+ attrSet _ = setDOMHTMLMediaElementMediaGroup+ attrConstruct _ = constructDOMHTMLMediaElementMediaGroup++-- VVV Prop "muted"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMediaElementMuted :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool+getDOMHTMLMediaElementMuted obj = liftIO $ getObjectPropertyBool obj "muted"++setDOMHTMLMediaElementMuted :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m ()+setDOMHTMLMediaElementMuted obj val = liftIO $ setObjectPropertyBool obj "muted" val++constructDOMHTMLMediaElementMuted :: Bool -> IO ([Char], GValue)+constructDOMHTMLMediaElementMuted val = constructObjectPropertyBool "muted" val++data DOMHTMLMediaElementMutedPropertyInfo+instance AttrInfo DOMHTMLMediaElementMutedPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementMutedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementMutedPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLMediaElementMutedPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementMutedPropertyInfo = Bool+ type AttrLabel DOMHTMLMediaElementMutedPropertyInfo = "DOMHTMLMediaElement::muted"+ attrGet _ = getDOMHTMLMediaElementMuted+ attrSet _ = setDOMHTMLMediaElementMuted+ attrConstruct _ = constructDOMHTMLMediaElementMuted++-- VVV Prop "network-state"+ -- Type: TBasicType TUInt32+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementNetworkState :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Word32+getDOMHTMLMediaElementNetworkState obj = liftIO $ getObjectPropertyCUInt obj "network-state"++data DOMHTMLMediaElementNetworkStatePropertyInfo+instance AttrInfo DOMHTMLMediaElementNetworkStatePropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementNetworkStatePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementNetworkStatePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementNetworkStatePropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementNetworkStatePropertyInfo = Word32+ type AttrLabel DOMHTMLMediaElementNetworkStatePropertyInfo = "DOMHTMLMediaElement::network-state"+ attrGet _ = getDOMHTMLMediaElementNetworkState+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "paused"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementPaused :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool+getDOMHTMLMediaElementPaused obj = liftIO $ getObjectPropertyBool obj "paused"++data DOMHTMLMediaElementPausedPropertyInfo+instance AttrInfo DOMHTMLMediaElementPausedPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementPausedPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementPausedPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementPausedPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementPausedPropertyInfo = Bool+ type AttrLabel DOMHTMLMediaElementPausedPropertyInfo = "DOMHTMLMediaElement::paused"+ attrGet _ = getDOMHTMLMediaElementPaused+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "playback-rate"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMediaElementPlaybackRate :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Double+getDOMHTMLMediaElementPlaybackRate obj = liftIO $ getObjectPropertyDouble obj "playback-rate"++setDOMHTMLMediaElementPlaybackRate :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Double -> m ()+setDOMHTMLMediaElementPlaybackRate obj val = liftIO $ setObjectPropertyDouble obj "playback-rate" val++constructDOMHTMLMediaElementPlaybackRate :: Double -> IO ([Char], GValue)+constructDOMHTMLMediaElementPlaybackRate val = constructObjectPropertyDouble "playback-rate" val++data DOMHTMLMediaElementPlaybackRatePropertyInfo+instance AttrInfo DOMHTMLMediaElementPlaybackRatePropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementPlaybackRatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementPlaybackRatePropertyInfo = (~) Double+ type AttrBaseTypeConstraint DOMHTMLMediaElementPlaybackRatePropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementPlaybackRatePropertyInfo = Double+ type AttrLabel DOMHTMLMediaElementPlaybackRatePropertyInfo = "DOMHTMLMediaElement::playback-rate"+ attrGet _ = getDOMHTMLMediaElementPlaybackRate+ attrSet _ = setDOMHTMLMediaElementPlaybackRate+ attrConstruct _ = constructDOMHTMLMediaElementPlaybackRate++-- VVV Prop "played"+ -- Type: TInterface "WebKit" "DOMTimeRanges"+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementPlayed :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMTimeRanges+getDOMHTMLMediaElementPlayed obj = liftIO $ getObjectPropertyObject obj "played" DOMTimeRanges++data DOMHTMLMediaElementPlayedPropertyInfo+instance AttrInfo DOMHTMLMediaElementPlayedPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementPlayedPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementPlayedPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementPlayedPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementPlayedPropertyInfo = DOMTimeRanges+ type AttrLabel DOMHTMLMediaElementPlayedPropertyInfo = "DOMHTMLMediaElement::played"+ attrGet _ = getDOMHTMLMediaElementPlayed+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "preload"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMediaElementPreload :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m T.Text+getDOMHTMLMediaElementPreload obj = liftIO $ getObjectPropertyString obj "preload"++setDOMHTMLMediaElementPreload :: (MonadIO m, DOMHTMLMediaElementK o) => o -> T.Text -> m ()+setDOMHTMLMediaElementPreload obj val = liftIO $ setObjectPropertyString obj "preload" val++constructDOMHTMLMediaElementPreload :: T.Text -> IO ([Char], GValue)+constructDOMHTMLMediaElementPreload val = constructObjectPropertyString "preload" val++data DOMHTMLMediaElementPreloadPropertyInfo+instance AttrInfo DOMHTMLMediaElementPreloadPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementPreloadPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementPreloadPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLMediaElementPreloadPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementPreloadPropertyInfo = T.Text+ type AttrLabel DOMHTMLMediaElementPreloadPropertyInfo = "DOMHTMLMediaElement::preload"+ attrGet _ = getDOMHTMLMediaElementPreload+ attrSet _ = setDOMHTMLMediaElementPreload+ attrConstruct _ = constructDOMHTMLMediaElementPreload++-- VVV Prop "ready-state"+ -- Type: TBasicType TUInt32+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementReadyState :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Word32+getDOMHTMLMediaElementReadyState obj = liftIO $ getObjectPropertyCUInt obj "ready-state"++data DOMHTMLMediaElementReadyStatePropertyInfo+instance AttrInfo DOMHTMLMediaElementReadyStatePropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementReadyStatePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementReadyStatePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementReadyStatePropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementReadyStatePropertyInfo = Word32+ type AttrLabel DOMHTMLMediaElementReadyStatePropertyInfo = "DOMHTMLMediaElement::ready-state"+ attrGet _ = getDOMHTMLMediaElementReadyState+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "seekable"+ -- Type: TInterface "WebKit" "DOMTimeRanges"+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementSeekable :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMTimeRanges+getDOMHTMLMediaElementSeekable obj = liftIO $ getObjectPropertyObject obj "seekable" DOMTimeRanges++data DOMHTMLMediaElementSeekablePropertyInfo+instance AttrInfo DOMHTMLMediaElementSeekablePropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementSeekablePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementSeekablePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementSeekablePropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementSeekablePropertyInfo = DOMTimeRanges+ type AttrLabel DOMHTMLMediaElementSeekablePropertyInfo = "DOMHTMLMediaElement::seekable"+ attrGet _ = getDOMHTMLMediaElementSeekable+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "seeking"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementSeeking :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool+getDOMHTMLMediaElementSeeking obj = liftIO $ getObjectPropertyBool obj "seeking"++data DOMHTMLMediaElementSeekingPropertyInfo+instance AttrInfo DOMHTMLMediaElementSeekingPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementSeekingPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementSeekingPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementSeekingPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementSeekingPropertyInfo = Bool+ type AttrLabel DOMHTMLMediaElementSeekingPropertyInfo = "DOMHTMLMediaElement::seeking"+ attrGet _ = getDOMHTMLMediaElementSeeking+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "src"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMediaElementSrc :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m T.Text+getDOMHTMLMediaElementSrc obj = liftIO $ getObjectPropertyString obj "src"++setDOMHTMLMediaElementSrc :: (MonadIO m, DOMHTMLMediaElementK o) => o -> T.Text -> m ()+setDOMHTMLMediaElementSrc obj val = liftIO $ setObjectPropertyString obj "src" val++constructDOMHTMLMediaElementSrc :: T.Text -> IO ([Char], GValue)+constructDOMHTMLMediaElementSrc val = constructObjectPropertyString "src" val++data DOMHTMLMediaElementSrcPropertyInfo+instance AttrInfo DOMHTMLMediaElementSrcPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementSrcPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementSrcPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLMediaElementSrcPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementSrcPropertyInfo = T.Text+ type AttrLabel DOMHTMLMediaElementSrcPropertyInfo = "DOMHTMLMediaElement::src"+ attrGet _ = getDOMHTMLMediaElementSrc+ attrSet _ = setDOMHTMLMediaElementSrc+ attrConstruct _ = constructDOMHTMLMediaElementSrc++-- VVV Prop "text-tracks"+ -- Type: TInterface "WebKit" "DOMTextTrackList"+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementTextTracks :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMTextTrackList+getDOMHTMLMediaElementTextTracks obj = liftIO $ getObjectPropertyObject obj "text-tracks" DOMTextTrackList++data DOMHTMLMediaElementTextTracksPropertyInfo+instance AttrInfo DOMHTMLMediaElementTextTracksPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementTextTracksPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementTextTracksPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementTextTracksPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementTextTracksPropertyInfo = DOMTextTrackList+ type AttrLabel DOMHTMLMediaElementTextTracksPropertyInfo = "DOMHTMLMediaElement::text-tracks"+ attrGet _ = getDOMHTMLMediaElementTextTracks+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "video-tracks"+ -- Type: TInterface "WebKit" "DOMVideoTrackList"+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementVideoTracks :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMVideoTrackList+getDOMHTMLMediaElementVideoTracks obj = liftIO $ getObjectPropertyObject obj "video-tracks" DOMVideoTrackList++data DOMHTMLMediaElementVideoTracksPropertyInfo+instance AttrInfo DOMHTMLMediaElementVideoTracksPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementVideoTracksPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementVideoTracksPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementVideoTracksPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementVideoTracksPropertyInfo = DOMVideoTrackList+ type AttrLabel DOMHTMLMediaElementVideoTracksPropertyInfo = "DOMHTMLMediaElement::video-tracks"+ attrGet _ = getDOMHTMLMediaElementVideoTracks+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "volume"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMediaElementVolume :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Double+getDOMHTMLMediaElementVolume obj = liftIO $ getObjectPropertyDouble obj "volume"++setDOMHTMLMediaElementVolume :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Double -> m ()+setDOMHTMLMediaElementVolume obj val = liftIO $ setObjectPropertyDouble obj "volume" val++constructDOMHTMLMediaElementVolume :: Double -> IO ([Char], GValue)+constructDOMHTMLMediaElementVolume val = constructObjectPropertyDouble "volume" val++data DOMHTMLMediaElementVolumePropertyInfo+instance AttrInfo DOMHTMLMediaElementVolumePropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementVolumePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementVolumePropertyInfo = (~) Double+ type AttrBaseTypeConstraint DOMHTMLMediaElementVolumePropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementVolumePropertyInfo = Double+ type AttrLabel DOMHTMLMediaElementVolumePropertyInfo = "DOMHTMLMediaElement::volume"+ attrGet _ = getDOMHTMLMediaElementVolume+ attrSet _ = setDOMHTMLMediaElementVolume+ attrConstruct _ = constructDOMHTMLMediaElementVolume++-- VVV Prop "webkit-audio-decoded-byte-count"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementWebkitAudioDecodedByteCount :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Word64+getDOMHTMLMediaElementWebkitAudioDecodedByteCount obj = liftIO $ getObjectPropertyUInt64 obj "webkit-audio-decoded-byte-count"++data DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo+instance AttrInfo DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo = Word64+ type AttrLabel DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo = "DOMHTMLMediaElement::webkit-audio-decoded-byte-count"+ attrGet _ = getDOMHTMLMediaElementWebkitAudioDecodedByteCount+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-closed-captions-visible"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMediaElementWebkitClosedCaptionsVisible :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool+getDOMHTMLMediaElementWebkitClosedCaptionsVisible obj = liftIO $ getObjectPropertyBool obj "webkit-closed-captions-visible"++setDOMHTMLMediaElementWebkitClosedCaptionsVisible :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m ()+setDOMHTMLMediaElementWebkitClosedCaptionsVisible obj val = liftIO $ setObjectPropertyBool obj "webkit-closed-captions-visible" val++constructDOMHTMLMediaElementWebkitClosedCaptionsVisible :: Bool -> IO ([Char], GValue)+constructDOMHTMLMediaElementWebkitClosedCaptionsVisible val = constructObjectPropertyBool "webkit-closed-captions-visible" val++data DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo+instance AttrInfo DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo = Bool+ type AttrLabel DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo = "DOMHTMLMediaElement::webkit-closed-captions-visible"+ attrGet _ = getDOMHTMLMediaElementWebkitClosedCaptionsVisible+ attrSet _ = setDOMHTMLMediaElementWebkitClosedCaptionsVisible+ attrConstruct _ = constructDOMHTMLMediaElementWebkitClosedCaptionsVisible++-- VVV Prop "webkit-current-playback-target-is-wireless"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWireless :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool+getDOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWireless obj = liftIO $ getObjectPropertyBool obj "webkit-current-playback-target-is-wireless"++data DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo+instance AttrInfo DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo = Bool+ type AttrLabel DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo = "DOMHTMLMediaElement::webkit-current-playback-target-is-wireless"+ attrGet _ = getDOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWireless+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-has-closed-captions"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementWebkitHasClosedCaptions :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool+getDOMHTMLMediaElementWebkitHasClosedCaptions obj = liftIO $ getObjectPropertyBool obj "webkit-has-closed-captions"++data DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo+instance AttrInfo DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo = Bool+ type AttrLabel DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo = "DOMHTMLMediaElement::webkit-has-closed-captions"+ attrGet _ = getDOMHTMLMediaElementWebkitHasClosedCaptions+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-preserves-pitch"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMediaElementWebkitPreservesPitch :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool+getDOMHTMLMediaElementWebkitPreservesPitch obj = liftIO $ getObjectPropertyBool obj "webkit-preserves-pitch"++setDOMHTMLMediaElementWebkitPreservesPitch :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m ()+setDOMHTMLMediaElementWebkitPreservesPitch obj val = liftIO $ setObjectPropertyBool obj "webkit-preserves-pitch" val++constructDOMHTMLMediaElementWebkitPreservesPitch :: Bool -> IO ([Char], GValue)+constructDOMHTMLMediaElementWebkitPreservesPitch val = constructObjectPropertyBool "webkit-preserves-pitch" val++data DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo+instance AttrInfo DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo = Bool+ type AttrLabel DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo = "DOMHTMLMediaElement::webkit-preserves-pitch"+ attrGet _ = getDOMHTMLMediaElementWebkitPreservesPitch+ attrSet _ = setDOMHTMLMediaElementWebkitPreservesPitch+ attrConstruct _ = constructDOMHTMLMediaElementWebkitPreservesPitch++-- VVV Prop "webkit-video-decoded-byte-count"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMHTMLMediaElementWebkitVideoDecodedByteCount :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Word64+getDOMHTMLMediaElementWebkitVideoDecodedByteCount obj = liftIO $ getObjectPropertyUInt64 obj "webkit-video-decoded-byte-count"++data DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo+instance AttrInfo DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo where+ type AttrAllowedOps DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo = DOMHTMLMediaElementK+ type AttrGetType DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo = Word64+ type AttrLabel DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo = "DOMHTMLMediaElement::webkit-video-decoded-byte-count"+ attrGet _ = getDOMHTMLMediaElementWebkitVideoDecodedByteCount+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMHTMLMediaElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("audio-tracks", DOMHTMLMediaElementAudioTracksPropertyInfo), '("autoplay", DOMHTMLMediaElementAutoplayPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("buffered", DOMHTMLMediaElementBufferedPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("controller", DOMHTMLMediaElementControllerPropertyInfo), '("controls", DOMHTMLMediaElementControlsPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-src", DOMHTMLMediaElementCurrentSrcPropertyInfo), '("current-time", DOMHTMLMediaElementCurrentTimePropertyInfo), '("default-muted", DOMHTMLMediaElementDefaultMutedPropertyInfo), '("default-playback-rate", DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("duration", DOMHTMLMediaElementDurationPropertyInfo), '("ended", DOMHTMLMediaElementEndedPropertyInfo), '("error", DOMHTMLMediaElementErrorPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("loop", DOMHTMLMediaElementLoopPropertyInfo), '("media-group", DOMHTMLMediaElementMediaGroupPropertyInfo), '("muted", DOMHTMLMediaElementMutedPropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("network-state", DOMHTMLMediaElementNetworkStatePropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("paused", DOMHTMLMediaElementPausedPropertyInfo), '("playback-rate", DOMHTMLMediaElementPlaybackRatePropertyInfo), '("played", DOMHTMLMediaElementPlayedPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("preload", DOMHTMLMediaElementPreloadPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("ready-state", DOMHTMLMediaElementReadyStatePropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("seekable", DOMHTMLMediaElementSeekablePropertyInfo), '("seeking", DOMHTMLMediaElementSeekingPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLMediaElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("text-tracks", DOMHTMLMediaElementTextTracksPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("video-tracks", DOMHTMLMediaElementVideoTracksPropertyInfo), '("volume", DOMHTMLMediaElementVolumePropertyInfo), '("webkit-audio-decoded-byte-count", DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo), '("webkit-closed-captions-visible", DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo), '("webkit-current-playback-target-is-wireless", DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo), '("webkit-has-closed-captions", DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo), '("webkit-preserves-pitch", DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkit-video-decoded-byte-count", DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "compact"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMenuElementCompact :: (MonadIO m, DOMHTMLMenuElementK o) => o -> m Bool+getDOMHTMLMenuElementCompact obj = liftIO $ getObjectPropertyBool obj "compact"++setDOMHTMLMenuElementCompact :: (MonadIO m, DOMHTMLMenuElementK o) => o -> Bool -> m ()+setDOMHTMLMenuElementCompact obj val = liftIO $ setObjectPropertyBool obj "compact" val++constructDOMHTMLMenuElementCompact :: Bool -> IO ([Char], GValue)+constructDOMHTMLMenuElementCompact val = constructObjectPropertyBool "compact" val++data DOMHTMLMenuElementCompactPropertyInfo+instance AttrInfo DOMHTMLMenuElementCompactPropertyInfo where+ type AttrAllowedOps DOMHTMLMenuElementCompactPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMenuElementCompactPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLMenuElementCompactPropertyInfo = DOMHTMLMenuElementK+ type AttrGetType DOMHTMLMenuElementCompactPropertyInfo = Bool+ type AttrLabel DOMHTMLMenuElementCompactPropertyInfo = "DOMHTMLMenuElement::compact"+ attrGet _ = getDOMHTMLMenuElementCompact+ attrSet _ = setDOMHTMLMenuElementCompact+ attrConstruct _ = constructDOMHTMLMenuElementCompact++type instance AttributeList DOMHTMLMenuElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("compact", DOMHTMLMenuElementCompactPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "content"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMetaElementContent :: (MonadIO m, DOMHTMLMetaElementK o) => o -> m T.Text+getDOMHTMLMetaElementContent obj = liftIO $ getObjectPropertyString obj "content"++setDOMHTMLMetaElementContent :: (MonadIO m, DOMHTMLMetaElementK o) => o -> T.Text -> m ()+setDOMHTMLMetaElementContent obj val = liftIO $ setObjectPropertyString obj "content" val++constructDOMHTMLMetaElementContent :: T.Text -> IO ([Char], GValue)+constructDOMHTMLMetaElementContent val = constructObjectPropertyString "content" val++data DOMHTMLMetaElementContentPropertyInfo+instance AttrInfo DOMHTMLMetaElementContentPropertyInfo where+ type AttrAllowedOps DOMHTMLMetaElementContentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMetaElementContentPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLMetaElementContentPropertyInfo = DOMHTMLMetaElementK+ type AttrGetType DOMHTMLMetaElementContentPropertyInfo = T.Text+ type AttrLabel DOMHTMLMetaElementContentPropertyInfo = "DOMHTMLMetaElement::content"+ attrGet _ = getDOMHTMLMetaElementContent+ attrSet _ = setDOMHTMLMetaElementContent+ attrConstruct _ = constructDOMHTMLMetaElementContent++-- VVV Prop "http-equiv"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMetaElementHttpEquiv :: (MonadIO m, DOMHTMLMetaElementK o) => o -> m T.Text+getDOMHTMLMetaElementHttpEquiv obj = liftIO $ getObjectPropertyString obj "http-equiv"++setDOMHTMLMetaElementHttpEquiv :: (MonadIO m, DOMHTMLMetaElementK o) => o -> T.Text -> m ()+setDOMHTMLMetaElementHttpEquiv obj val = liftIO $ setObjectPropertyString obj "http-equiv" val++constructDOMHTMLMetaElementHttpEquiv :: T.Text -> IO ([Char], GValue)+constructDOMHTMLMetaElementHttpEquiv val = constructObjectPropertyString "http-equiv" val++data DOMHTMLMetaElementHttpEquivPropertyInfo+instance AttrInfo DOMHTMLMetaElementHttpEquivPropertyInfo where+ type AttrAllowedOps DOMHTMLMetaElementHttpEquivPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMetaElementHttpEquivPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLMetaElementHttpEquivPropertyInfo = DOMHTMLMetaElementK+ type AttrGetType DOMHTMLMetaElementHttpEquivPropertyInfo = T.Text+ type AttrLabel DOMHTMLMetaElementHttpEquivPropertyInfo = "DOMHTMLMetaElement::http-equiv"+ attrGet _ = getDOMHTMLMetaElementHttpEquiv+ attrSet _ = setDOMHTMLMetaElementHttpEquiv+ attrConstruct _ = constructDOMHTMLMetaElementHttpEquiv++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMetaElementName :: (MonadIO m, DOMHTMLMetaElementK o) => o -> m T.Text+getDOMHTMLMetaElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLMetaElementName :: (MonadIO m, DOMHTMLMetaElementK o) => o -> T.Text -> m ()+setDOMHTMLMetaElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLMetaElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLMetaElementName val = constructObjectPropertyString "name" val++data DOMHTMLMetaElementNamePropertyInfo+instance AttrInfo DOMHTMLMetaElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLMetaElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMetaElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLMetaElementNamePropertyInfo = DOMHTMLMetaElementK+ type AttrGetType DOMHTMLMetaElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLMetaElementNamePropertyInfo = "DOMHTMLMetaElement::name"+ attrGet _ = getDOMHTMLMetaElementName+ attrSet _ = setDOMHTMLMetaElementName+ attrConstruct _ = constructDOMHTMLMetaElementName++-- VVV Prop "scheme"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLMetaElementScheme :: (MonadIO m, DOMHTMLMetaElementK o) => o -> m T.Text+getDOMHTMLMetaElementScheme obj = liftIO $ getObjectPropertyString obj "scheme"++setDOMHTMLMetaElementScheme :: (MonadIO m, DOMHTMLMetaElementK o) => o -> T.Text -> m ()+setDOMHTMLMetaElementScheme obj val = liftIO $ setObjectPropertyString obj "scheme" val++constructDOMHTMLMetaElementScheme :: T.Text -> IO ([Char], GValue)+constructDOMHTMLMetaElementScheme val = constructObjectPropertyString "scheme" val++data DOMHTMLMetaElementSchemePropertyInfo+instance AttrInfo DOMHTMLMetaElementSchemePropertyInfo where+ type AttrAllowedOps DOMHTMLMetaElementSchemePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLMetaElementSchemePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLMetaElementSchemePropertyInfo = DOMHTMLMetaElementK+ type AttrGetType DOMHTMLMetaElementSchemePropertyInfo = T.Text+ type AttrLabel DOMHTMLMetaElementSchemePropertyInfo = "DOMHTMLMetaElement::scheme"+ attrGet _ = getDOMHTMLMetaElementScheme+ attrSet _ = setDOMHTMLMetaElementScheme+ attrConstruct _ = constructDOMHTMLMetaElementScheme++type instance AttributeList DOMHTMLMetaElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content", DOMHTMLMetaElementContentPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("http-equiv", DOMHTMLMetaElementHttpEquivPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLMetaElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scheme", DOMHTMLMetaElementSchemePropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "cite"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLModElementCite :: (MonadIO m, DOMHTMLModElementK o) => o -> m T.Text+getDOMHTMLModElementCite obj = liftIO $ getObjectPropertyString obj "cite"++setDOMHTMLModElementCite :: (MonadIO m, DOMHTMLModElementK o) => o -> T.Text -> m ()+setDOMHTMLModElementCite obj val = liftIO $ setObjectPropertyString obj "cite" val++constructDOMHTMLModElementCite :: T.Text -> IO ([Char], GValue)+constructDOMHTMLModElementCite val = constructObjectPropertyString "cite" val++data DOMHTMLModElementCitePropertyInfo+instance AttrInfo DOMHTMLModElementCitePropertyInfo where+ type AttrAllowedOps DOMHTMLModElementCitePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLModElementCitePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLModElementCitePropertyInfo = DOMHTMLModElementK+ type AttrGetType DOMHTMLModElementCitePropertyInfo = T.Text+ type AttrLabel DOMHTMLModElementCitePropertyInfo = "DOMHTMLModElement::cite"+ attrGet _ = getDOMHTMLModElementCite+ attrSet _ = setDOMHTMLModElementCite+ attrConstruct _ = constructDOMHTMLModElementCite++-- VVV Prop "date-time"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLModElementDateTime :: (MonadIO m, DOMHTMLModElementK o) => o -> m T.Text+getDOMHTMLModElementDateTime obj = liftIO $ getObjectPropertyString obj "date-time"++setDOMHTMLModElementDateTime :: (MonadIO m, DOMHTMLModElementK o) => o -> T.Text -> m ()+setDOMHTMLModElementDateTime obj val = liftIO $ setObjectPropertyString obj "date-time" val++constructDOMHTMLModElementDateTime :: T.Text -> IO ([Char], GValue)+constructDOMHTMLModElementDateTime val = constructObjectPropertyString "date-time" val++data DOMHTMLModElementDateTimePropertyInfo+instance AttrInfo DOMHTMLModElementDateTimePropertyInfo where+ type AttrAllowedOps DOMHTMLModElementDateTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLModElementDateTimePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLModElementDateTimePropertyInfo = DOMHTMLModElementK+ type AttrGetType DOMHTMLModElementDateTimePropertyInfo = T.Text+ type AttrLabel DOMHTMLModElementDateTimePropertyInfo = "DOMHTMLModElement::date-time"+ attrGet _ = getDOMHTMLModElementDateTime+ attrSet _ = setDOMHTMLModElementDateTime+ attrConstruct _ = constructDOMHTMLModElementDateTime++type instance AttributeList DOMHTMLModElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("cite", DOMHTMLModElementCitePropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("date-time", DOMHTMLModElementDateTimePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "compact"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLOListElementCompact :: (MonadIO m, DOMHTMLOListElementK o) => o -> m Bool+getDOMHTMLOListElementCompact obj = liftIO $ getObjectPropertyBool obj "compact"++setDOMHTMLOListElementCompact :: (MonadIO m, DOMHTMLOListElementK o) => o -> Bool -> m ()+setDOMHTMLOListElementCompact obj val = liftIO $ setObjectPropertyBool obj "compact" val++constructDOMHTMLOListElementCompact :: Bool -> IO ([Char], GValue)+constructDOMHTMLOListElementCompact val = constructObjectPropertyBool "compact" val++data DOMHTMLOListElementCompactPropertyInfo+instance AttrInfo DOMHTMLOListElementCompactPropertyInfo where+ type AttrAllowedOps DOMHTMLOListElementCompactPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLOListElementCompactPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLOListElementCompactPropertyInfo = DOMHTMLOListElementK+ type AttrGetType DOMHTMLOListElementCompactPropertyInfo = Bool+ type AttrLabel DOMHTMLOListElementCompactPropertyInfo = "DOMHTMLOListElement::compact"+ attrGet _ = getDOMHTMLOListElementCompact+ attrSet _ = setDOMHTMLOListElementCompact+ attrConstruct _ = constructDOMHTMLOListElementCompact++-- VVV Prop "reversed"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLOListElementReversed :: (MonadIO m, DOMHTMLOListElementK o) => o -> m Bool+getDOMHTMLOListElementReversed obj = liftIO $ getObjectPropertyBool obj "reversed"++setDOMHTMLOListElementReversed :: (MonadIO m, DOMHTMLOListElementK o) => o -> Bool -> m ()+setDOMHTMLOListElementReversed obj val = liftIO $ setObjectPropertyBool obj "reversed" val++constructDOMHTMLOListElementReversed :: Bool -> IO ([Char], GValue)+constructDOMHTMLOListElementReversed val = constructObjectPropertyBool "reversed" val++data DOMHTMLOListElementReversedPropertyInfo+instance AttrInfo DOMHTMLOListElementReversedPropertyInfo where+ type AttrAllowedOps DOMHTMLOListElementReversedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLOListElementReversedPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLOListElementReversedPropertyInfo = DOMHTMLOListElementK+ type AttrGetType DOMHTMLOListElementReversedPropertyInfo = Bool+ type AttrLabel DOMHTMLOListElementReversedPropertyInfo = "DOMHTMLOListElement::reversed"+ attrGet _ = getDOMHTMLOListElementReversed+ attrSet _ = setDOMHTMLOListElementReversed+ attrConstruct _ = constructDOMHTMLOListElementReversed++-- VVV Prop "start"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLOListElementStart :: (MonadIO m, DOMHTMLOListElementK o) => o -> m Int64+getDOMHTMLOListElementStart obj = liftIO $ getObjectPropertyInt64 obj "start"++setDOMHTMLOListElementStart :: (MonadIO m, DOMHTMLOListElementK o) => o -> Int64 -> m ()+setDOMHTMLOListElementStart obj val = liftIO $ setObjectPropertyInt64 obj "start" val++constructDOMHTMLOListElementStart :: Int64 -> IO ([Char], GValue)+constructDOMHTMLOListElementStart val = constructObjectPropertyInt64 "start" val++data DOMHTMLOListElementStartPropertyInfo+instance AttrInfo DOMHTMLOListElementStartPropertyInfo where+ type AttrAllowedOps DOMHTMLOListElementStartPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLOListElementStartPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLOListElementStartPropertyInfo = DOMHTMLOListElementK+ type AttrGetType DOMHTMLOListElementStartPropertyInfo = Int64+ type AttrLabel DOMHTMLOListElementStartPropertyInfo = "DOMHTMLOListElement::start"+ attrGet _ = getDOMHTMLOListElementStart+ attrSet _ = setDOMHTMLOListElementStart+ attrConstruct _ = constructDOMHTMLOListElementStart++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLOListElementType :: (MonadIO m, DOMHTMLOListElementK o) => o -> m T.Text+getDOMHTMLOListElementType obj = liftIO $ getObjectPropertyString obj "type"++setDOMHTMLOListElementType :: (MonadIO m, DOMHTMLOListElementK o) => o -> T.Text -> m ()+setDOMHTMLOListElementType obj val = liftIO $ setObjectPropertyString obj "type" val++constructDOMHTMLOListElementType :: T.Text -> IO ([Char], GValue)+constructDOMHTMLOListElementType val = constructObjectPropertyString "type" val++data DOMHTMLOListElementTypePropertyInfo+instance AttrInfo DOMHTMLOListElementTypePropertyInfo where+ type AttrAllowedOps DOMHTMLOListElementTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLOListElementTypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLOListElementTypePropertyInfo = DOMHTMLOListElementK+ type AttrGetType DOMHTMLOListElementTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLOListElementTypePropertyInfo = "DOMHTMLOListElement::type"+ attrGet _ = getDOMHTMLOListElementType+ attrSet _ = setDOMHTMLOListElementType+ attrConstruct _ = constructDOMHTMLOListElementType++type instance AttributeList DOMHTMLOListElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("compact", DOMHTMLOListElementCompactPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("reversed", DOMHTMLOListElementReversedPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("start", DOMHTMLOListElementStartPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLOListElementTypePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLObjectElementAlign :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m T.Text+getDOMHTMLObjectElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLObjectElementAlign :: (MonadIO m, DOMHTMLObjectElementK o) => o -> T.Text -> m ()+setDOMHTMLObjectElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLObjectElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLObjectElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLObjectElementAlignPropertyInfo+instance AttrInfo DOMHTMLObjectElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLObjectElementAlignPropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLObjectElementAlignPropertyInfo = "DOMHTMLObjectElement::align"+ attrGet _ = getDOMHTMLObjectElementAlign+ attrSet _ = setDOMHTMLObjectElementAlign+ attrConstruct _ = constructDOMHTMLObjectElementAlign++-- VVV Prop "archive"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLObjectElementArchive :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m T.Text+getDOMHTMLObjectElementArchive obj = liftIO $ getObjectPropertyString obj "archive"++setDOMHTMLObjectElementArchive :: (MonadIO m, DOMHTMLObjectElementK o) => o -> T.Text -> m ()+setDOMHTMLObjectElementArchive obj val = liftIO $ setObjectPropertyString obj "archive" val++constructDOMHTMLObjectElementArchive :: T.Text -> IO ([Char], GValue)+constructDOMHTMLObjectElementArchive val = constructObjectPropertyString "archive" val++data DOMHTMLObjectElementArchivePropertyInfo+instance AttrInfo DOMHTMLObjectElementArchivePropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementArchivePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementArchivePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLObjectElementArchivePropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementArchivePropertyInfo = T.Text+ type AttrLabel DOMHTMLObjectElementArchivePropertyInfo = "DOMHTMLObjectElement::archive"+ attrGet _ = getDOMHTMLObjectElementArchive+ attrSet _ = setDOMHTMLObjectElementArchive+ attrConstruct _ = constructDOMHTMLObjectElementArchive++-- VVV Prop "border"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLObjectElementBorder :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m T.Text+getDOMHTMLObjectElementBorder obj = liftIO $ getObjectPropertyString obj "border"++setDOMHTMLObjectElementBorder :: (MonadIO m, DOMHTMLObjectElementK o) => o -> T.Text -> m ()+setDOMHTMLObjectElementBorder obj val = liftIO $ setObjectPropertyString obj "border" val++constructDOMHTMLObjectElementBorder :: T.Text -> IO ([Char], GValue)+constructDOMHTMLObjectElementBorder val = constructObjectPropertyString "border" val++data DOMHTMLObjectElementBorderPropertyInfo+instance AttrInfo DOMHTMLObjectElementBorderPropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementBorderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementBorderPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLObjectElementBorderPropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementBorderPropertyInfo = T.Text+ type AttrLabel DOMHTMLObjectElementBorderPropertyInfo = "DOMHTMLObjectElement::border"+ attrGet _ = getDOMHTMLObjectElementBorder+ attrSet _ = setDOMHTMLObjectElementBorder+ attrConstruct _ = constructDOMHTMLObjectElementBorder++-- VVV Prop "code"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLObjectElementCode :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m T.Text+getDOMHTMLObjectElementCode obj = liftIO $ getObjectPropertyString obj "code"++setDOMHTMLObjectElementCode :: (MonadIO m, DOMHTMLObjectElementK o) => o -> T.Text -> m ()+setDOMHTMLObjectElementCode obj val = liftIO $ setObjectPropertyString obj "code" val++constructDOMHTMLObjectElementCode :: T.Text -> IO ([Char], GValue)+constructDOMHTMLObjectElementCode val = constructObjectPropertyString "code" val++data DOMHTMLObjectElementCodePropertyInfo+instance AttrInfo DOMHTMLObjectElementCodePropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementCodePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementCodePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLObjectElementCodePropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementCodePropertyInfo = T.Text+ type AttrLabel DOMHTMLObjectElementCodePropertyInfo = "DOMHTMLObjectElement::code"+ attrGet _ = getDOMHTMLObjectElementCode+ attrSet _ = setDOMHTMLObjectElementCode+ attrConstruct _ = constructDOMHTMLObjectElementCode++-- VVV Prop "code-base"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLObjectElementCodeBase :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m T.Text+getDOMHTMLObjectElementCodeBase obj = liftIO $ getObjectPropertyString obj "code-base"++setDOMHTMLObjectElementCodeBase :: (MonadIO m, DOMHTMLObjectElementK o) => o -> T.Text -> m ()+setDOMHTMLObjectElementCodeBase obj val = liftIO $ setObjectPropertyString obj "code-base" val++constructDOMHTMLObjectElementCodeBase :: T.Text -> IO ([Char], GValue)+constructDOMHTMLObjectElementCodeBase val = constructObjectPropertyString "code-base" val++data DOMHTMLObjectElementCodeBasePropertyInfo+instance AttrInfo DOMHTMLObjectElementCodeBasePropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementCodeBasePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementCodeBasePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLObjectElementCodeBasePropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementCodeBasePropertyInfo = T.Text+ type AttrLabel DOMHTMLObjectElementCodeBasePropertyInfo = "DOMHTMLObjectElement::code-base"+ attrGet _ = getDOMHTMLObjectElementCodeBase+ attrSet _ = setDOMHTMLObjectElementCodeBase+ attrConstruct _ = constructDOMHTMLObjectElementCodeBase++-- VVV Prop "code-type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLObjectElementCodeType :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m T.Text+getDOMHTMLObjectElementCodeType obj = liftIO $ getObjectPropertyString obj "code-type"++setDOMHTMLObjectElementCodeType :: (MonadIO m, DOMHTMLObjectElementK o) => o -> T.Text -> m ()+setDOMHTMLObjectElementCodeType obj val = liftIO $ setObjectPropertyString obj "code-type" val++constructDOMHTMLObjectElementCodeType :: T.Text -> IO ([Char], GValue)+constructDOMHTMLObjectElementCodeType val = constructObjectPropertyString "code-type" val++data DOMHTMLObjectElementCodeTypePropertyInfo+instance AttrInfo DOMHTMLObjectElementCodeTypePropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementCodeTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementCodeTypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLObjectElementCodeTypePropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementCodeTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLObjectElementCodeTypePropertyInfo = "DOMHTMLObjectElement::code-type"+ attrGet _ = getDOMHTMLObjectElementCodeType+ attrSet _ = setDOMHTMLObjectElementCodeType+ attrConstruct _ = constructDOMHTMLObjectElementCodeType++-- VVV Prop "content-document"+ -- Type: TInterface "WebKit" "DOMDocument"+ -- Flags: [PropertyReadable]++getDOMHTMLObjectElementContentDocument :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m DOMDocument+getDOMHTMLObjectElementContentDocument obj = liftIO $ getObjectPropertyObject obj "content-document" DOMDocument++data DOMHTMLObjectElementContentDocumentPropertyInfo+instance AttrInfo DOMHTMLObjectElementContentDocumentPropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementContentDocumentPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementContentDocumentPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLObjectElementContentDocumentPropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementContentDocumentPropertyInfo = DOMDocument+ type AttrLabel DOMHTMLObjectElementContentDocumentPropertyInfo = "DOMHTMLObjectElement::content-document"+ attrGet _ = getDOMHTMLObjectElementContentDocument+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "data"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLObjectElementData :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m T.Text+getDOMHTMLObjectElementData obj = liftIO $ getObjectPropertyString obj "data"++setDOMHTMLObjectElementData :: (MonadIO m, DOMHTMLObjectElementK o) => o -> T.Text -> m ()+setDOMHTMLObjectElementData obj val = liftIO $ setObjectPropertyString obj "data" val++constructDOMHTMLObjectElementData :: T.Text -> IO ([Char], GValue)+constructDOMHTMLObjectElementData val = constructObjectPropertyString "data" val++data DOMHTMLObjectElementDataPropertyInfo+instance AttrInfo DOMHTMLObjectElementDataPropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementDataPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementDataPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLObjectElementDataPropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementDataPropertyInfo = T.Text+ type AttrLabel DOMHTMLObjectElementDataPropertyInfo = "DOMHTMLObjectElement::data"+ attrGet _ = getDOMHTMLObjectElementData+ attrSet _ = setDOMHTMLObjectElementData+ attrConstruct _ = constructDOMHTMLObjectElementData++-- VVV Prop "declare"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLObjectElementDeclare :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m Bool+getDOMHTMLObjectElementDeclare obj = liftIO $ getObjectPropertyBool obj "declare"++setDOMHTMLObjectElementDeclare :: (MonadIO m, DOMHTMLObjectElementK o) => o -> Bool -> m ()+setDOMHTMLObjectElementDeclare obj val = liftIO $ setObjectPropertyBool obj "declare" val++constructDOMHTMLObjectElementDeclare :: Bool -> IO ([Char], GValue)+constructDOMHTMLObjectElementDeclare val = constructObjectPropertyBool "declare" val++data DOMHTMLObjectElementDeclarePropertyInfo+instance AttrInfo DOMHTMLObjectElementDeclarePropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementDeclarePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementDeclarePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLObjectElementDeclarePropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementDeclarePropertyInfo = Bool+ type AttrLabel DOMHTMLObjectElementDeclarePropertyInfo = "DOMHTMLObjectElement::declare"+ attrGet _ = getDOMHTMLObjectElementDeclare+ attrSet _ = setDOMHTMLObjectElementDeclare+ attrConstruct _ = constructDOMHTMLObjectElementDeclare++-- VVV Prop "form"+ -- Type: TInterface "WebKit" "DOMHTMLFormElement"+ -- Flags: [PropertyReadable]++getDOMHTMLObjectElementForm :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m DOMHTMLFormElement+getDOMHTMLObjectElementForm obj = liftIO $ getObjectPropertyObject obj "form" DOMHTMLFormElement++data DOMHTMLObjectElementFormPropertyInfo+instance AttrInfo DOMHTMLObjectElementFormPropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementFormPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementFormPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLObjectElementFormPropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementFormPropertyInfo = DOMHTMLFormElement+ type AttrLabel DOMHTMLObjectElementFormPropertyInfo = "DOMHTMLObjectElement::form"+ attrGet _ = getDOMHTMLObjectElementForm+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "height"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLObjectElementHeight :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m T.Text+getDOMHTMLObjectElementHeight obj = liftIO $ getObjectPropertyString obj "height"++setDOMHTMLObjectElementHeight :: (MonadIO m, DOMHTMLObjectElementK o) => o -> T.Text -> m ()+setDOMHTMLObjectElementHeight obj val = liftIO $ setObjectPropertyString obj "height" val++constructDOMHTMLObjectElementHeight :: T.Text -> IO ([Char], GValue)+constructDOMHTMLObjectElementHeight val = constructObjectPropertyString "height" val++data DOMHTMLObjectElementHeightPropertyInfo+instance AttrInfo DOMHTMLObjectElementHeightPropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementHeightPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLObjectElementHeightPropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementHeightPropertyInfo = T.Text+ type AttrLabel DOMHTMLObjectElementHeightPropertyInfo = "DOMHTMLObjectElement::height"+ attrGet _ = getDOMHTMLObjectElementHeight+ attrSet _ = setDOMHTMLObjectElementHeight+ attrConstruct _ = constructDOMHTMLObjectElementHeight++-- VVV Prop "hspace"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLObjectElementHspace :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m Int64+getDOMHTMLObjectElementHspace obj = liftIO $ getObjectPropertyInt64 obj "hspace"++setDOMHTMLObjectElementHspace :: (MonadIO m, DOMHTMLObjectElementK o) => o -> Int64 -> m ()+setDOMHTMLObjectElementHspace obj val = liftIO $ setObjectPropertyInt64 obj "hspace" val++constructDOMHTMLObjectElementHspace :: Int64 -> IO ([Char], GValue)+constructDOMHTMLObjectElementHspace val = constructObjectPropertyInt64 "hspace" val++data DOMHTMLObjectElementHspacePropertyInfo+instance AttrInfo DOMHTMLObjectElementHspacePropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementHspacePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementHspacePropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLObjectElementHspacePropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementHspacePropertyInfo = Int64+ type AttrLabel DOMHTMLObjectElementHspacePropertyInfo = "DOMHTMLObjectElement::hspace"+ attrGet _ = getDOMHTMLObjectElementHspace+ attrSet _ = setDOMHTMLObjectElementHspace+ attrConstruct _ = constructDOMHTMLObjectElementHspace++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLObjectElementName :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m T.Text+getDOMHTMLObjectElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLObjectElementName :: (MonadIO m, DOMHTMLObjectElementK o) => o -> T.Text -> m ()+setDOMHTMLObjectElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLObjectElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLObjectElementName val = constructObjectPropertyString "name" val++data DOMHTMLObjectElementNamePropertyInfo+instance AttrInfo DOMHTMLObjectElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLObjectElementNamePropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLObjectElementNamePropertyInfo = "DOMHTMLObjectElement::name"+ attrGet _ = getDOMHTMLObjectElementName+ attrSet _ = setDOMHTMLObjectElementName+ attrConstruct _ = constructDOMHTMLObjectElementName++-- VVV Prop "standby"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLObjectElementStandby :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m T.Text+getDOMHTMLObjectElementStandby obj = liftIO $ getObjectPropertyString obj "standby"++setDOMHTMLObjectElementStandby :: (MonadIO m, DOMHTMLObjectElementK o) => o -> T.Text -> m ()+setDOMHTMLObjectElementStandby obj val = liftIO $ setObjectPropertyString obj "standby" val++constructDOMHTMLObjectElementStandby :: T.Text -> IO ([Char], GValue)+constructDOMHTMLObjectElementStandby val = constructObjectPropertyString "standby" val++data DOMHTMLObjectElementStandbyPropertyInfo+instance AttrInfo DOMHTMLObjectElementStandbyPropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementStandbyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementStandbyPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLObjectElementStandbyPropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementStandbyPropertyInfo = T.Text+ type AttrLabel DOMHTMLObjectElementStandbyPropertyInfo = "DOMHTMLObjectElement::standby"+ attrGet _ = getDOMHTMLObjectElementStandby+ attrSet _ = setDOMHTMLObjectElementStandby+ attrConstruct _ = constructDOMHTMLObjectElementStandby++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLObjectElementType :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m T.Text+getDOMHTMLObjectElementType obj = liftIO $ getObjectPropertyString obj "type"++setDOMHTMLObjectElementType :: (MonadIO m, DOMHTMLObjectElementK o) => o -> T.Text -> m ()+setDOMHTMLObjectElementType obj val = liftIO $ setObjectPropertyString obj "type" val++constructDOMHTMLObjectElementType :: T.Text -> IO ([Char], GValue)+constructDOMHTMLObjectElementType val = constructObjectPropertyString "type" val++data DOMHTMLObjectElementTypePropertyInfo+instance AttrInfo DOMHTMLObjectElementTypePropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementTypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLObjectElementTypePropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLObjectElementTypePropertyInfo = "DOMHTMLObjectElement::type"+ attrGet _ = getDOMHTMLObjectElementType+ attrSet _ = setDOMHTMLObjectElementType+ attrConstruct _ = constructDOMHTMLObjectElementType++-- VVV Prop "use-map"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLObjectElementUseMap :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m T.Text+getDOMHTMLObjectElementUseMap obj = liftIO $ getObjectPropertyString obj "use-map"++setDOMHTMLObjectElementUseMap :: (MonadIO m, DOMHTMLObjectElementK o) => o -> T.Text -> m ()+setDOMHTMLObjectElementUseMap obj val = liftIO $ setObjectPropertyString obj "use-map" val++constructDOMHTMLObjectElementUseMap :: T.Text -> IO ([Char], GValue)+constructDOMHTMLObjectElementUseMap val = constructObjectPropertyString "use-map" val++data DOMHTMLObjectElementUseMapPropertyInfo+instance AttrInfo DOMHTMLObjectElementUseMapPropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementUseMapPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementUseMapPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLObjectElementUseMapPropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementUseMapPropertyInfo = T.Text+ type AttrLabel DOMHTMLObjectElementUseMapPropertyInfo = "DOMHTMLObjectElement::use-map"+ attrGet _ = getDOMHTMLObjectElementUseMap+ attrSet _ = setDOMHTMLObjectElementUseMap+ attrConstruct _ = constructDOMHTMLObjectElementUseMap++-- VVV Prop "validation-message"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLObjectElementValidationMessage :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m T.Text+getDOMHTMLObjectElementValidationMessage obj = liftIO $ getObjectPropertyString obj "validation-message"++data DOMHTMLObjectElementValidationMessagePropertyInfo+instance AttrInfo DOMHTMLObjectElementValidationMessagePropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementValidationMessagePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementValidationMessagePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLObjectElementValidationMessagePropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementValidationMessagePropertyInfo = T.Text+ type AttrLabel DOMHTMLObjectElementValidationMessagePropertyInfo = "DOMHTMLObjectElement::validation-message"+ attrGet _ = getDOMHTMLObjectElementValidationMessage+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "validity"+ -- Type: TInterface "WebKit" "DOMValidityState"+ -- Flags: [PropertyReadable]++getDOMHTMLObjectElementValidity :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m DOMValidityState+getDOMHTMLObjectElementValidity obj = liftIO $ getObjectPropertyObject obj "validity" DOMValidityState++data DOMHTMLObjectElementValidityPropertyInfo+instance AttrInfo DOMHTMLObjectElementValidityPropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementValidityPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementValidityPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLObjectElementValidityPropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementValidityPropertyInfo = DOMValidityState+ type AttrLabel DOMHTMLObjectElementValidityPropertyInfo = "DOMHTMLObjectElement::validity"+ attrGet _ = getDOMHTMLObjectElementValidity+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "vspace"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLObjectElementVspace :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m Int64+getDOMHTMLObjectElementVspace obj = liftIO $ getObjectPropertyInt64 obj "vspace"++setDOMHTMLObjectElementVspace :: (MonadIO m, DOMHTMLObjectElementK o) => o -> Int64 -> m ()+setDOMHTMLObjectElementVspace obj val = liftIO $ setObjectPropertyInt64 obj "vspace" val++constructDOMHTMLObjectElementVspace :: Int64 -> IO ([Char], GValue)+constructDOMHTMLObjectElementVspace val = constructObjectPropertyInt64 "vspace" val++data DOMHTMLObjectElementVspacePropertyInfo+instance AttrInfo DOMHTMLObjectElementVspacePropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementVspacePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementVspacePropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLObjectElementVspacePropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementVspacePropertyInfo = Int64+ type AttrLabel DOMHTMLObjectElementVspacePropertyInfo = "DOMHTMLObjectElement::vspace"+ attrGet _ = getDOMHTMLObjectElementVspace+ attrSet _ = setDOMHTMLObjectElementVspace+ attrConstruct _ = constructDOMHTMLObjectElementVspace++-- VVV Prop "width"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLObjectElementWidth :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m T.Text+getDOMHTMLObjectElementWidth obj = liftIO $ getObjectPropertyString obj "width"++setDOMHTMLObjectElementWidth :: (MonadIO m, DOMHTMLObjectElementK o) => o -> T.Text -> m ()+setDOMHTMLObjectElementWidth obj val = liftIO $ setObjectPropertyString obj "width" val++constructDOMHTMLObjectElementWidth :: T.Text -> IO ([Char], GValue)+constructDOMHTMLObjectElementWidth val = constructObjectPropertyString "width" val++data DOMHTMLObjectElementWidthPropertyInfo+instance AttrInfo DOMHTMLObjectElementWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementWidthPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLObjectElementWidthPropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementWidthPropertyInfo = T.Text+ type AttrLabel DOMHTMLObjectElementWidthPropertyInfo = "DOMHTMLObjectElement::width"+ attrGet _ = getDOMHTMLObjectElementWidth+ attrSet _ = setDOMHTMLObjectElementWidth+ attrConstruct _ = constructDOMHTMLObjectElementWidth++-- VVV Prop "will-validate"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMHTMLObjectElementWillValidate :: (MonadIO m, DOMHTMLObjectElementK o) => o -> m Bool+getDOMHTMLObjectElementWillValidate obj = liftIO $ getObjectPropertyBool obj "will-validate"++data DOMHTMLObjectElementWillValidatePropertyInfo+instance AttrInfo DOMHTMLObjectElementWillValidatePropertyInfo where+ type AttrAllowedOps DOMHTMLObjectElementWillValidatePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLObjectElementWillValidatePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLObjectElementWillValidatePropertyInfo = DOMHTMLObjectElementK+ type AttrGetType DOMHTMLObjectElementWillValidatePropertyInfo = Bool+ type AttrLabel DOMHTMLObjectElementWillValidatePropertyInfo = "DOMHTMLObjectElement::will-validate"+ attrGet _ = getDOMHTMLObjectElementWillValidate+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMHTMLObjectElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLObjectElementAlignPropertyInfo), '("archive", DOMHTMLObjectElementArchivePropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("border", DOMHTMLObjectElementBorderPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("code", DOMHTMLObjectElementCodePropertyInfo), '("code-base", DOMHTMLObjectElementCodeBasePropertyInfo), '("code-type", DOMHTMLObjectElementCodeTypePropertyInfo), '("content-document", DOMHTMLObjectElementContentDocumentPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("data", DOMHTMLObjectElementDataPropertyInfo), '("declare", DOMHTMLObjectElementDeclarePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLObjectElementFormPropertyInfo), '("height", DOMHTMLObjectElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("hspace", DOMHTMLObjectElementHspacePropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLObjectElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("standby", DOMHTMLObjectElementStandbyPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLObjectElementTypePropertyInfo), '("use-map", DOMHTMLObjectElementUseMapPropertyInfo), '("validation-message", DOMHTMLObjectElementValidationMessagePropertyInfo), '("validity", DOMHTMLObjectElementValidityPropertyInfo), '("vspace", DOMHTMLObjectElementVspacePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLObjectElementWidthPropertyInfo), '("will-validate", DOMHTMLObjectElementWillValidatePropertyInfo)]++-- VVV Prop "disabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLOptGroupElementDisabled :: (MonadIO m, DOMHTMLOptGroupElementK o) => o -> m Bool+getDOMHTMLOptGroupElementDisabled obj = liftIO $ getObjectPropertyBool obj "disabled"++setDOMHTMLOptGroupElementDisabled :: (MonadIO m, DOMHTMLOptGroupElementK o) => o -> Bool -> m ()+setDOMHTMLOptGroupElementDisabled obj val = liftIO $ setObjectPropertyBool obj "disabled" val++constructDOMHTMLOptGroupElementDisabled :: Bool -> IO ([Char], GValue)+constructDOMHTMLOptGroupElementDisabled val = constructObjectPropertyBool "disabled" val++data DOMHTMLOptGroupElementDisabledPropertyInfo+instance AttrInfo DOMHTMLOptGroupElementDisabledPropertyInfo where+ type AttrAllowedOps DOMHTMLOptGroupElementDisabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLOptGroupElementDisabledPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLOptGroupElementDisabledPropertyInfo = DOMHTMLOptGroupElementK+ type AttrGetType DOMHTMLOptGroupElementDisabledPropertyInfo = Bool+ type AttrLabel DOMHTMLOptGroupElementDisabledPropertyInfo = "DOMHTMLOptGroupElement::disabled"+ attrGet _ = getDOMHTMLOptGroupElementDisabled+ attrSet _ = setDOMHTMLOptGroupElementDisabled+ attrConstruct _ = constructDOMHTMLOptGroupElementDisabled++-- VVV Prop "label"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLOptGroupElementLabel :: (MonadIO m, DOMHTMLOptGroupElementK o) => o -> m T.Text+getDOMHTMLOptGroupElementLabel obj = liftIO $ getObjectPropertyString obj "label"++setDOMHTMLOptGroupElementLabel :: (MonadIO m, DOMHTMLOptGroupElementK o) => o -> T.Text -> m ()+setDOMHTMLOptGroupElementLabel obj val = liftIO $ setObjectPropertyString obj "label" val++constructDOMHTMLOptGroupElementLabel :: T.Text -> IO ([Char], GValue)+constructDOMHTMLOptGroupElementLabel val = constructObjectPropertyString "label" val++data DOMHTMLOptGroupElementLabelPropertyInfo+instance AttrInfo DOMHTMLOptGroupElementLabelPropertyInfo where+ type AttrAllowedOps DOMHTMLOptGroupElementLabelPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLOptGroupElementLabelPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLOptGroupElementLabelPropertyInfo = DOMHTMLOptGroupElementK+ type AttrGetType DOMHTMLOptGroupElementLabelPropertyInfo = T.Text+ type AttrLabel DOMHTMLOptGroupElementLabelPropertyInfo = "DOMHTMLOptGroupElement::label"+ attrGet _ = getDOMHTMLOptGroupElementLabel+ attrSet _ = setDOMHTMLOptGroupElementLabel+ attrConstruct _ = constructDOMHTMLOptGroupElementLabel++type instance AttributeList DOMHTMLOptGroupElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLOptGroupElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("label", DOMHTMLOptGroupElementLabelPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "default-selected"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLOptionElementDefaultSelected :: (MonadIO m, DOMHTMLOptionElementK o) => o -> m Bool+getDOMHTMLOptionElementDefaultSelected obj = liftIO $ getObjectPropertyBool obj "default-selected"++setDOMHTMLOptionElementDefaultSelected :: (MonadIO m, DOMHTMLOptionElementK o) => o -> Bool -> m ()+setDOMHTMLOptionElementDefaultSelected obj val = liftIO $ setObjectPropertyBool obj "default-selected" val++constructDOMHTMLOptionElementDefaultSelected :: Bool -> IO ([Char], GValue)+constructDOMHTMLOptionElementDefaultSelected val = constructObjectPropertyBool "default-selected" val++data DOMHTMLOptionElementDefaultSelectedPropertyInfo+instance AttrInfo DOMHTMLOptionElementDefaultSelectedPropertyInfo where+ type AttrAllowedOps DOMHTMLOptionElementDefaultSelectedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLOptionElementDefaultSelectedPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLOptionElementDefaultSelectedPropertyInfo = DOMHTMLOptionElementK+ type AttrGetType DOMHTMLOptionElementDefaultSelectedPropertyInfo = Bool+ type AttrLabel DOMHTMLOptionElementDefaultSelectedPropertyInfo = "DOMHTMLOptionElement::default-selected"+ attrGet _ = getDOMHTMLOptionElementDefaultSelected+ attrSet _ = setDOMHTMLOptionElementDefaultSelected+ attrConstruct _ = constructDOMHTMLOptionElementDefaultSelected++-- VVV Prop "disabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLOptionElementDisabled :: (MonadIO m, DOMHTMLOptionElementK o) => o -> m Bool+getDOMHTMLOptionElementDisabled obj = liftIO $ getObjectPropertyBool obj "disabled"++setDOMHTMLOptionElementDisabled :: (MonadIO m, DOMHTMLOptionElementK o) => o -> Bool -> m ()+setDOMHTMLOptionElementDisabled obj val = liftIO $ setObjectPropertyBool obj "disabled" val++constructDOMHTMLOptionElementDisabled :: Bool -> IO ([Char], GValue)+constructDOMHTMLOptionElementDisabled val = constructObjectPropertyBool "disabled" val++data DOMHTMLOptionElementDisabledPropertyInfo+instance AttrInfo DOMHTMLOptionElementDisabledPropertyInfo where+ type AttrAllowedOps DOMHTMLOptionElementDisabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLOptionElementDisabledPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLOptionElementDisabledPropertyInfo = DOMHTMLOptionElementK+ type AttrGetType DOMHTMLOptionElementDisabledPropertyInfo = Bool+ type AttrLabel DOMHTMLOptionElementDisabledPropertyInfo = "DOMHTMLOptionElement::disabled"+ attrGet _ = getDOMHTMLOptionElementDisabled+ attrSet _ = setDOMHTMLOptionElementDisabled+ attrConstruct _ = constructDOMHTMLOptionElementDisabled++-- VVV Prop "form"+ -- Type: TInterface "WebKit" "DOMHTMLFormElement"+ -- Flags: [PropertyReadable]++getDOMHTMLOptionElementForm :: (MonadIO m, DOMHTMLOptionElementK o) => o -> m DOMHTMLFormElement+getDOMHTMLOptionElementForm obj = liftIO $ getObjectPropertyObject obj "form" DOMHTMLFormElement++data DOMHTMLOptionElementFormPropertyInfo+instance AttrInfo DOMHTMLOptionElementFormPropertyInfo where+ type AttrAllowedOps DOMHTMLOptionElementFormPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLOptionElementFormPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLOptionElementFormPropertyInfo = DOMHTMLOptionElementK+ type AttrGetType DOMHTMLOptionElementFormPropertyInfo = DOMHTMLFormElement+ type AttrLabel DOMHTMLOptionElementFormPropertyInfo = "DOMHTMLOptionElement::form"+ attrGet _ = getDOMHTMLOptionElementForm+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "index"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMHTMLOptionElementIndex :: (MonadIO m, DOMHTMLOptionElementK o) => o -> m Int64+getDOMHTMLOptionElementIndex obj = liftIO $ getObjectPropertyInt64 obj "index"++data DOMHTMLOptionElementIndexPropertyInfo+instance AttrInfo DOMHTMLOptionElementIndexPropertyInfo where+ type AttrAllowedOps DOMHTMLOptionElementIndexPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLOptionElementIndexPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLOptionElementIndexPropertyInfo = DOMHTMLOptionElementK+ type AttrGetType DOMHTMLOptionElementIndexPropertyInfo = Int64+ type AttrLabel DOMHTMLOptionElementIndexPropertyInfo = "DOMHTMLOptionElement::index"+ attrGet _ = getDOMHTMLOptionElementIndex+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "label"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLOptionElementLabel :: (MonadIO m, DOMHTMLOptionElementK o) => o -> m T.Text+getDOMHTMLOptionElementLabel obj = liftIO $ getObjectPropertyString obj "label"++setDOMHTMLOptionElementLabel :: (MonadIO m, DOMHTMLOptionElementK o) => o -> T.Text -> m ()+setDOMHTMLOptionElementLabel obj val = liftIO $ setObjectPropertyString obj "label" val++constructDOMHTMLOptionElementLabel :: T.Text -> IO ([Char], GValue)+constructDOMHTMLOptionElementLabel val = constructObjectPropertyString "label" val++data DOMHTMLOptionElementLabelPropertyInfo+instance AttrInfo DOMHTMLOptionElementLabelPropertyInfo where+ type AttrAllowedOps DOMHTMLOptionElementLabelPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLOptionElementLabelPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLOptionElementLabelPropertyInfo = DOMHTMLOptionElementK+ type AttrGetType DOMHTMLOptionElementLabelPropertyInfo = T.Text+ type AttrLabel DOMHTMLOptionElementLabelPropertyInfo = "DOMHTMLOptionElement::label"+ attrGet _ = getDOMHTMLOptionElementLabel+ attrSet _ = setDOMHTMLOptionElementLabel+ attrConstruct _ = constructDOMHTMLOptionElementLabel++-- VVV Prop "selected"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLOptionElementSelected :: (MonadIO m, DOMHTMLOptionElementK o) => o -> m Bool+getDOMHTMLOptionElementSelected obj = liftIO $ getObjectPropertyBool obj "selected"++setDOMHTMLOptionElementSelected :: (MonadIO m, DOMHTMLOptionElementK o) => o -> Bool -> m ()+setDOMHTMLOptionElementSelected obj val = liftIO $ setObjectPropertyBool obj "selected" val++constructDOMHTMLOptionElementSelected :: Bool -> IO ([Char], GValue)+constructDOMHTMLOptionElementSelected val = constructObjectPropertyBool "selected" val++data DOMHTMLOptionElementSelectedPropertyInfo+instance AttrInfo DOMHTMLOptionElementSelectedPropertyInfo where+ type AttrAllowedOps DOMHTMLOptionElementSelectedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLOptionElementSelectedPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLOptionElementSelectedPropertyInfo = DOMHTMLOptionElementK+ type AttrGetType DOMHTMLOptionElementSelectedPropertyInfo = Bool+ type AttrLabel DOMHTMLOptionElementSelectedPropertyInfo = "DOMHTMLOptionElement::selected"+ attrGet _ = getDOMHTMLOptionElementSelected+ attrSet _ = setDOMHTMLOptionElementSelected+ attrConstruct _ = constructDOMHTMLOptionElementSelected++-- VVV Prop "text"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLOptionElementText :: (MonadIO m, DOMHTMLOptionElementK o) => o -> m T.Text+getDOMHTMLOptionElementText obj = liftIO $ getObjectPropertyString obj "text"++data DOMHTMLOptionElementTextPropertyInfo+instance AttrInfo DOMHTMLOptionElementTextPropertyInfo where+ type AttrAllowedOps DOMHTMLOptionElementTextPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLOptionElementTextPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLOptionElementTextPropertyInfo = DOMHTMLOptionElementK+ type AttrGetType DOMHTMLOptionElementTextPropertyInfo = T.Text+ type AttrLabel DOMHTMLOptionElementTextPropertyInfo = "DOMHTMLOptionElement::text"+ attrGet _ = getDOMHTMLOptionElementText+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "value"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLOptionElementValue :: (MonadIO m, DOMHTMLOptionElementK o) => o -> m T.Text+getDOMHTMLOptionElementValue obj = liftIO $ getObjectPropertyString obj "value"++setDOMHTMLOptionElementValue :: (MonadIO m, DOMHTMLOptionElementK o) => o -> T.Text -> m ()+setDOMHTMLOptionElementValue obj val = liftIO $ setObjectPropertyString obj "value" val++constructDOMHTMLOptionElementValue :: T.Text -> IO ([Char], GValue)+constructDOMHTMLOptionElementValue val = constructObjectPropertyString "value" val++data DOMHTMLOptionElementValuePropertyInfo+instance AttrInfo DOMHTMLOptionElementValuePropertyInfo where+ type AttrAllowedOps DOMHTMLOptionElementValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLOptionElementValuePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLOptionElementValuePropertyInfo = DOMHTMLOptionElementK+ type AttrGetType DOMHTMLOptionElementValuePropertyInfo = T.Text+ type AttrLabel DOMHTMLOptionElementValuePropertyInfo = "DOMHTMLOptionElement::value"+ attrGet _ = getDOMHTMLOptionElementValue+ attrSet _ = setDOMHTMLOptionElementValue+ attrConstruct _ = constructDOMHTMLOptionElementValue++type instance AttributeList DOMHTMLOptionElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("default-selected", DOMHTMLOptionElementDefaultSelectedPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLOptionElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLOptionElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("index", DOMHTMLOptionElementIndexPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("label", DOMHTMLOptionElementLabelPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("selected", DOMHTMLOptionElementSelectedPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text", DOMHTMLOptionElementTextPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("value", DOMHTMLOptionElementValuePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMHTMLOptionsCollectionLength :: (MonadIO m, DOMHTMLOptionsCollectionK o) => o -> m Word64+getDOMHTMLOptionsCollectionLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMHTMLOptionsCollectionLengthPropertyInfo+instance AttrInfo DOMHTMLOptionsCollectionLengthPropertyInfo where+ type AttrAllowedOps DOMHTMLOptionsCollectionLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLOptionsCollectionLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLOptionsCollectionLengthPropertyInfo = DOMHTMLOptionsCollectionK+ type AttrGetType DOMHTMLOptionsCollectionLengthPropertyInfo = Word64+ type AttrLabel DOMHTMLOptionsCollectionLengthPropertyInfo = "DOMHTMLOptionsCollection::length"+ attrGet _ = getDOMHTMLOptionsCollectionLength+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "selected-index"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLOptionsCollectionSelectedIndex :: (MonadIO m, DOMHTMLOptionsCollectionK o) => o -> m Int64+getDOMHTMLOptionsCollectionSelectedIndex obj = liftIO $ getObjectPropertyInt64 obj "selected-index"++setDOMHTMLOptionsCollectionSelectedIndex :: (MonadIO m, DOMHTMLOptionsCollectionK o) => o -> Int64 -> m ()+setDOMHTMLOptionsCollectionSelectedIndex obj val = liftIO $ setObjectPropertyInt64 obj "selected-index" val++constructDOMHTMLOptionsCollectionSelectedIndex :: Int64 -> IO ([Char], GValue)+constructDOMHTMLOptionsCollectionSelectedIndex val = constructObjectPropertyInt64 "selected-index" val++data DOMHTMLOptionsCollectionSelectedIndexPropertyInfo+instance AttrInfo DOMHTMLOptionsCollectionSelectedIndexPropertyInfo where+ type AttrAllowedOps DOMHTMLOptionsCollectionSelectedIndexPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLOptionsCollectionSelectedIndexPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLOptionsCollectionSelectedIndexPropertyInfo = DOMHTMLOptionsCollectionK+ type AttrGetType DOMHTMLOptionsCollectionSelectedIndexPropertyInfo = Int64+ type AttrLabel DOMHTMLOptionsCollectionSelectedIndexPropertyInfo = "DOMHTMLOptionsCollection::selected-index"+ attrGet _ = getDOMHTMLOptionsCollectionSelectedIndex+ attrSet _ = setDOMHTMLOptionsCollectionSelectedIndex+ attrConstruct _ = constructDOMHTMLOptionsCollectionSelectedIndex++type instance AttributeList DOMHTMLOptionsCollection = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMHTMLOptionsCollectionLengthPropertyInfo), '("selected-index", DOMHTMLOptionsCollectionSelectedIndexPropertyInfo)]++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLParagraphElementAlign :: (MonadIO m, DOMHTMLParagraphElementK o) => o -> m T.Text+getDOMHTMLParagraphElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLParagraphElementAlign :: (MonadIO m, DOMHTMLParagraphElementK o) => o -> T.Text -> m ()+setDOMHTMLParagraphElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLParagraphElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLParagraphElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLParagraphElementAlignPropertyInfo+instance AttrInfo DOMHTMLParagraphElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLParagraphElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLParagraphElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLParagraphElementAlignPropertyInfo = DOMHTMLParagraphElementK+ type AttrGetType DOMHTMLParagraphElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLParagraphElementAlignPropertyInfo = "DOMHTMLParagraphElement::align"+ attrGet _ = getDOMHTMLParagraphElementAlign+ attrSet _ = setDOMHTMLParagraphElementAlign+ attrConstruct _ = constructDOMHTMLParagraphElementAlign++type instance AttributeList DOMHTMLParagraphElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLParagraphElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLParamElementName :: (MonadIO m, DOMHTMLParamElementK o) => o -> m T.Text+getDOMHTMLParamElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLParamElementName :: (MonadIO m, DOMHTMLParamElementK o) => o -> T.Text -> m ()+setDOMHTMLParamElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLParamElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLParamElementName val = constructObjectPropertyString "name" val++data DOMHTMLParamElementNamePropertyInfo+instance AttrInfo DOMHTMLParamElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLParamElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLParamElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLParamElementNamePropertyInfo = DOMHTMLParamElementK+ type AttrGetType DOMHTMLParamElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLParamElementNamePropertyInfo = "DOMHTMLParamElement::name"+ attrGet _ = getDOMHTMLParamElementName+ attrSet _ = setDOMHTMLParamElementName+ attrConstruct _ = constructDOMHTMLParamElementName++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLParamElementType :: (MonadIO m, DOMHTMLParamElementK o) => o -> m T.Text+getDOMHTMLParamElementType obj = liftIO $ getObjectPropertyString obj "type"++setDOMHTMLParamElementType :: (MonadIO m, DOMHTMLParamElementK o) => o -> T.Text -> m ()+setDOMHTMLParamElementType obj val = liftIO $ setObjectPropertyString obj "type" val++constructDOMHTMLParamElementType :: T.Text -> IO ([Char], GValue)+constructDOMHTMLParamElementType val = constructObjectPropertyString "type" val++data DOMHTMLParamElementTypePropertyInfo+instance AttrInfo DOMHTMLParamElementTypePropertyInfo where+ type AttrAllowedOps DOMHTMLParamElementTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLParamElementTypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLParamElementTypePropertyInfo = DOMHTMLParamElementK+ type AttrGetType DOMHTMLParamElementTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLParamElementTypePropertyInfo = "DOMHTMLParamElement::type"+ attrGet _ = getDOMHTMLParamElementType+ attrSet _ = setDOMHTMLParamElementType+ attrConstruct _ = constructDOMHTMLParamElementType++-- VVV Prop "value"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLParamElementValue :: (MonadIO m, DOMHTMLParamElementK o) => o -> m T.Text+getDOMHTMLParamElementValue obj = liftIO $ getObjectPropertyString obj "value"++setDOMHTMLParamElementValue :: (MonadIO m, DOMHTMLParamElementK o) => o -> T.Text -> m ()+setDOMHTMLParamElementValue obj val = liftIO $ setObjectPropertyString obj "value" val++constructDOMHTMLParamElementValue :: T.Text -> IO ([Char], GValue)+constructDOMHTMLParamElementValue val = constructObjectPropertyString "value" val++data DOMHTMLParamElementValuePropertyInfo+instance AttrInfo DOMHTMLParamElementValuePropertyInfo where+ type AttrAllowedOps DOMHTMLParamElementValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLParamElementValuePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLParamElementValuePropertyInfo = DOMHTMLParamElementK+ type AttrGetType DOMHTMLParamElementValuePropertyInfo = T.Text+ type AttrLabel DOMHTMLParamElementValuePropertyInfo = "DOMHTMLParamElement::value"+ attrGet _ = getDOMHTMLParamElementValue+ attrSet _ = setDOMHTMLParamElementValue+ attrConstruct _ = constructDOMHTMLParamElementValue++-- VVV Prop "value-type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLParamElementValueType :: (MonadIO m, DOMHTMLParamElementK o) => o -> m T.Text+getDOMHTMLParamElementValueType obj = liftIO $ getObjectPropertyString obj "value-type"++setDOMHTMLParamElementValueType :: (MonadIO m, DOMHTMLParamElementK o) => o -> T.Text -> m ()+setDOMHTMLParamElementValueType obj val = liftIO $ setObjectPropertyString obj "value-type" val++constructDOMHTMLParamElementValueType :: T.Text -> IO ([Char], GValue)+constructDOMHTMLParamElementValueType val = constructObjectPropertyString "value-type" val++data DOMHTMLParamElementValueTypePropertyInfo+instance AttrInfo DOMHTMLParamElementValueTypePropertyInfo where+ type AttrAllowedOps DOMHTMLParamElementValueTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLParamElementValueTypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLParamElementValueTypePropertyInfo = DOMHTMLParamElementK+ type AttrGetType DOMHTMLParamElementValueTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLParamElementValueTypePropertyInfo = "DOMHTMLParamElement::value-type"+ attrGet _ = getDOMHTMLParamElementValueType+ attrSet _ = setDOMHTMLParamElementValueType+ attrConstruct _ = constructDOMHTMLParamElementValueType++type instance AttributeList DOMHTMLParamElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLParamElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLParamElementTypePropertyInfo), '("value", DOMHTMLParamElementValuePropertyInfo), '("value-type", DOMHTMLParamElementValueTypePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "width"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLPreElementWidth :: (MonadIO m, DOMHTMLPreElementK o) => o -> m Int64+getDOMHTMLPreElementWidth obj = liftIO $ getObjectPropertyInt64 obj "width"++setDOMHTMLPreElementWidth :: (MonadIO m, DOMHTMLPreElementK o) => o -> Int64 -> m ()+setDOMHTMLPreElementWidth obj val = liftIO $ setObjectPropertyInt64 obj "width" val++constructDOMHTMLPreElementWidth :: Int64 -> IO ([Char], GValue)+constructDOMHTMLPreElementWidth val = constructObjectPropertyInt64 "width" val++data DOMHTMLPreElementWidthPropertyInfo+instance AttrInfo DOMHTMLPreElementWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLPreElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLPreElementWidthPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLPreElementWidthPropertyInfo = DOMHTMLPreElementK+ type AttrGetType DOMHTMLPreElementWidthPropertyInfo = Int64+ type AttrLabel DOMHTMLPreElementWidthPropertyInfo = "DOMHTMLPreElement::width"+ attrGet _ = getDOMHTMLPreElementWidth+ attrSet _ = setDOMHTMLPreElementWidth+ attrConstruct _ = constructDOMHTMLPreElementWidth++-- VVV Prop "wrap"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLPreElementWrap :: (MonadIO m, DOMHTMLPreElementK o) => o -> m Bool+getDOMHTMLPreElementWrap obj = liftIO $ getObjectPropertyBool obj "wrap"++setDOMHTMLPreElementWrap :: (MonadIO m, DOMHTMLPreElementK o) => o -> Bool -> m ()+setDOMHTMLPreElementWrap obj val = liftIO $ setObjectPropertyBool obj "wrap" val++constructDOMHTMLPreElementWrap :: Bool -> IO ([Char], GValue)+constructDOMHTMLPreElementWrap val = constructObjectPropertyBool "wrap" val++data DOMHTMLPreElementWrapPropertyInfo+instance AttrInfo DOMHTMLPreElementWrapPropertyInfo where+ type AttrAllowedOps DOMHTMLPreElementWrapPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLPreElementWrapPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLPreElementWrapPropertyInfo = DOMHTMLPreElementK+ type AttrGetType DOMHTMLPreElementWrapPropertyInfo = Bool+ type AttrLabel DOMHTMLPreElementWrapPropertyInfo = "DOMHTMLPreElement::wrap"+ attrGet _ = getDOMHTMLPreElementWrap+ attrSet _ = setDOMHTMLPreElementWrap+ attrConstruct _ = constructDOMHTMLPreElementWrap++type instance AttributeList DOMHTMLPreElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLPreElementWidthPropertyInfo), '("wrap", DOMHTMLPreElementWrapPropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMHTMLPropertiesCollectionLength :: (MonadIO m, DOMHTMLPropertiesCollectionK o) => o -> m Word64+getDOMHTMLPropertiesCollectionLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMHTMLPropertiesCollectionLengthPropertyInfo+instance AttrInfo DOMHTMLPropertiesCollectionLengthPropertyInfo where+ type AttrAllowedOps DOMHTMLPropertiesCollectionLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLPropertiesCollectionLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLPropertiesCollectionLengthPropertyInfo = DOMHTMLPropertiesCollectionK+ type AttrGetType DOMHTMLPropertiesCollectionLengthPropertyInfo = Word64+ type AttrLabel DOMHTMLPropertiesCollectionLengthPropertyInfo = "DOMHTMLPropertiesCollection::length"+ attrGet _ = getDOMHTMLPropertiesCollectionLength+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "names"+ -- Type: TInterface "WebKit" "DOMDOMStringList"+ -- Flags: [PropertyReadable]++getDOMHTMLPropertiesCollectionNames :: (MonadIO m, DOMHTMLPropertiesCollectionK o) => o -> m DOMDOMStringList+getDOMHTMLPropertiesCollectionNames obj = liftIO $ getObjectPropertyObject obj "names" DOMDOMStringList++data DOMHTMLPropertiesCollectionNamesPropertyInfo+instance AttrInfo DOMHTMLPropertiesCollectionNamesPropertyInfo where+ type AttrAllowedOps DOMHTMLPropertiesCollectionNamesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLPropertiesCollectionNamesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLPropertiesCollectionNamesPropertyInfo = DOMHTMLPropertiesCollectionK+ type AttrGetType DOMHTMLPropertiesCollectionNamesPropertyInfo = DOMDOMStringList+ type AttrLabel DOMHTMLPropertiesCollectionNamesPropertyInfo = "DOMHTMLPropertiesCollection::names"+ attrGet _ = getDOMHTMLPropertiesCollectionNames+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMHTMLPropertiesCollection = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMHTMLPropertiesCollectionLengthPropertyInfo), '("names", DOMHTMLPropertiesCollectionNamesPropertyInfo)]++-- VVV Prop "cite"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLQuoteElementCite :: (MonadIO m, DOMHTMLQuoteElementK o) => o -> m T.Text+getDOMHTMLQuoteElementCite obj = liftIO $ getObjectPropertyString obj "cite"++setDOMHTMLQuoteElementCite :: (MonadIO m, DOMHTMLQuoteElementK o) => o -> T.Text -> m ()+setDOMHTMLQuoteElementCite obj val = liftIO $ setObjectPropertyString obj "cite" val++constructDOMHTMLQuoteElementCite :: T.Text -> IO ([Char], GValue)+constructDOMHTMLQuoteElementCite val = constructObjectPropertyString "cite" val++data DOMHTMLQuoteElementCitePropertyInfo+instance AttrInfo DOMHTMLQuoteElementCitePropertyInfo where+ type AttrAllowedOps DOMHTMLQuoteElementCitePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLQuoteElementCitePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLQuoteElementCitePropertyInfo = DOMHTMLQuoteElementK+ type AttrGetType DOMHTMLQuoteElementCitePropertyInfo = T.Text+ type AttrLabel DOMHTMLQuoteElementCitePropertyInfo = "DOMHTMLQuoteElement::cite"+ attrGet _ = getDOMHTMLQuoteElementCite+ attrSet _ = setDOMHTMLQuoteElementCite+ attrConstruct _ = constructDOMHTMLQuoteElementCite++type instance AttributeList DOMHTMLQuoteElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("cite", DOMHTMLQuoteElementCitePropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "async"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLScriptElementAsync :: (MonadIO m, DOMHTMLScriptElementK o) => o -> m Bool+getDOMHTMLScriptElementAsync obj = liftIO $ getObjectPropertyBool obj "async"++setDOMHTMLScriptElementAsync :: (MonadIO m, DOMHTMLScriptElementK o) => o -> Bool -> m ()+setDOMHTMLScriptElementAsync obj val = liftIO $ setObjectPropertyBool obj "async" val++constructDOMHTMLScriptElementAsync :: Bool -> IO ([Char], GValue)+constructDOMHTMLScriptElementAsync val = constructObjectPropertyBool "async" val++data DOMHTMLScriptElementAsyncPropertyInfo+instance AttrInfo DOMHTMLScriptElementAsyncPropertyInfo where+ type AttrAllowedOps DOMHTMLScriptElementAsyncPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLScriptElementAsyncPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLScriptElementAsyncPropertyInfo = DOMHTMLScriptElementK+ type AttrGetType DOMHTMLScriptElementAsyncPropertyInfo = Bool+ type AttrLabel DOMHTMLScriptElementAsyncPropertyInfo = "DOMHTMLScriptElement::async"+ attrGet _ = getDOMHTMLScriptElementAsync+ attrSet _ = setDOMHTMLScriptElementAsync+ attrConstruct _ = constructDOMHTMLScriptElementAsync++-- VVV Prop "charset"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLScriptElementCharset :: (MonadIO m, DOMHTMLScriptElementK o) => o -> m T.Text+getDOMHTMLScriptElementCharset obj = liftIO $ getObjectPropertyString obj "charset"++setDOMHTMLScriptElementCharset :: (MonadIO m, DOMHTMLScriptElementK o) => o -> T.Text -> m ()+setDOMHTMLScriptElementCharset obj val = liftIO $ setObjectPropertyString obj "charset" val++constructDOMHTMLScriptElementCharset :: T.Text -> IO ([Char], GValue)+constructDOMHTMLScriptElementCharset val = constructObjectPropertyString "charset" val++data DOMHTMLScriptElementCharsetPropertyInfo+instance AttrInfo DOMHTMLScriptElementCharsetPropertyInfo where+ type AttrAllowedOps DOMHTMLScriptElementCharsetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLScriptElementCharsetPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLScriptElementCharsetPropertyInfo = DOMHTMLScriptElementK+ type AttrGetType DOMHTMLScriptElementCharsetPropertyInfo = T.Text+ type AttrLabel DOMHTMLScriptElementCharsetPropertyInfo = "DOMHTMLScriptElement::charset"+ attrGet _ = getDOMHTMLScriptElementCharset+ attrSet _ = setDOMHTMLScriptElementCharset+ attrConstruct _ = constructDOMHTMLScriptElementCharset++-- VVV Prop "cross-origin"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLScriptElementCrossOrigin :: (MonadIO m, DOMHTMLScriptElementK o) => o -> m T.Text+getDOMHTMLScriptElementCrossOrigin obj = liftIO $ getObjectPropertyString obj "cross-origin"++setDOMHTMLScriptElementCrossOrigin :: (MonadIO m, DOMHTMLScriptElementK o) => o -> T.Text -> m ()+setDOMHTMLScriptElementCrossOrigin obj val = liftIO $ setObjectPropertyString obj "cross-origin" val++constructDOMHTMLScriptElementCrossOrigin :: T.Text -> IO ([Char], GValue)+constructDOMHTMLScriptElementCrossOrigin val = constructObjectPropertyString "cross-origin" val++data DOMHTMLScriptElementCrossOriginPropertyInfo+instance AttrInfo DOMHTMLScriptElementCrossOriginPropertyInfo where+ type AttrAllowedOps DOMHTMLScriptElementCrossOriginPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLScriptElementCrossOriginPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLScriptElementCrossOriginPropertyInfo = DOMHTMLScriptElementK+ type AttrGetType DOMHTMLScriptElementCrossOriginPropertyInfo = T.Text+ type AttrLabel DOMHTMLScriptElementCrossOriginPropertyInfo = "DOMHTMLScriptElement::cross-origin"+ attrGet _ = getDOMHTMLScriptElementCrossOrigin+ attrSet _ = setDOMHTMLScriptElementCrossOrigin+ attrConstruct _ = constructDOMHTMLScriptElementCrossOrigin++-- VVV Prop "defer"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLScriptElementDefer :: (MonadIO m, DOMHTMLScriptElementK o) => o -> m Bool+getDOMHTMLScriptElementDefer obj = liftIO $ getObjectPropertyBool obj "defer"++setDOMHTMLScriptElementDefer :: (MonadIO m, DOMHTMLScriptElementK o) => o -> Bool -> m ()+setDOMHTMLScriptElementDefer obj val = liftIO $ setObjectPropertyBool obj "defer" val++constructDOMHTMLScriptElementDefer :: Bool -> IO ([Char], GValue)+constructDOMHTMLScriptElementDefer val = constructObjectPropertyBool "defer" val++data DOMHTMLScriptElementDeferPropertyInfo+instance AttrInfo DOMHTMLScriptElementDeferPropertyInfo where+ type AttrAllowedOps DOMHTMLScriptElementDeferPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLScriptElementDeferPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLScriptElementDeferPropertyInfo = DOMHTMLScriptElementK+ type AttrGetType DOMHTMLScriptElementDeferPropertyInfo = Bool+ type AttrLabel DOMHTMLScriptElementDeferPropertyInfo = "DOMHTMLScriptElement::defer"+ attrGet _ = getDOMHTMLScriptElementDefer+ attrSet _ = setDOMHTMLScriptElementDefer+ attrConstruct _ = constructDOMHTMLScriptElementDefer++-- VVV Prop "event"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLScriptElementEvent :: (MonadIO m, DOMHTMLScriptElementK o) => o -> m T.Text+getDOMHTMLScriptElementEvent obj = liftIO $ getObjectPropertyString obj "event"++setDOMHTMLScriptElementEvent :: (MonadIO m, DOMHTMLScriptElementK o) => o -> T.Text -> m ()+setDOMHTMLScriptElementEvent obj val = liftIO $ setObjectPropertyString obj "event" val++constructDOMHTMLScriptElementEvent :: T.Text -> IO ([Char], GValue)+constructDOMHTMLScriptElementEvent val = constructObjectPropertyString "event" val++data DOMHTMLScriptElementEventPropertyInfo+instance AttrInfo DOMHTMLScriptElementEventPropertyInfo where+ type AttrAllowedOps DOMHTMLScriptElementEventPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLScriptElementEventPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLScriptElementEventPropertyInfo = DOMHTMLScriptElementK+ type AttrGetType DOMHTMLScriptElementEventPropertyInfo = T.Text+ type AttrLabel DOMHTMLScriptElementEventPropertyInfo = "DOMHTMLScriptElement::event"+ attrGet _ = getDOMHTMLScriptElementEvent+ attrSet _ = setDOMHTMLScriptElementEvent+ attrConstruct _ = constructDOMHTMLScriptElementEvent++-- VVV Prop "html-for"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLScriptElementHtmlFor :: (MonadIO m, DOMHTMLScriptElementK o) => o -> m T.Text+getDOMHTMLScriptElementHtmlFor obj = liftIO $ getObjectPropertyString obj "html-for"++setDOMHTMLScriptElementHtmlFor :: (MonadIO m, DOMHTMLScriptElementK o) => o -> T.Text -> m ()+setDOMHTMLScriptElementHtmlFor obj val = liftIO $ setObjectPropertyString obj "html-for" val++constructDOMHTMLScriptElementHtmlFor :: T.Text -> IO ([Char], GValue)+constructDOMHTMLScriptElementHtmlFor val = constructObjectPropertyString "html-for" val++data DOMHTMLScriptElementHtmlForPropertyInfo+instance AttrInfo DOMHTMLScriptElementHtmlForPropertyInfo where+ type AttrAllowedOps DOMHTMLScriptElementHtmlForPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLScriptElementHtmlForPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLScriptElementHtmlForPropertyInfo = DOMHTMLScriptElementK+ type AttrGetType DOMHTMLScriptElementHtmlForPropertyInfo = T.Text+ type AttrLabel DOMHTMLScriptElementHtmlForPropertyInfo = "DOMHTMLScriptElement::html-for"+ attrGet _ = getDOMHTMLScriptElementHtmlFor+ attrSet _ = setDOMHTMLScriptElementHtmlFor+ attrConstruct _ = constructDOMHTMLScriptElementHtmlFor++-- VVV Prop "nonce"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLScriptElementNonce :: (MonadIO m, DOMHTMLScriptElementK o) => o -> m T.Text+getDOMHTMLScriptElementNonce obj = liftIO $ getObjectPropertyString obj "nonce"++setDOMHTMLScriptElementNonce :: (MonadIO m, DOMHTMLScriptElementK o) => o -> T.Text -> m ()+setDOMHTMLScriptElementNonce obj val = liftIO $ setObjectPropertyString obj "nonce" val++constructDOMHTMLScriptElementNonce :: T.Text -> IO ([Char], GValue)+constructDOMHTMLScriptElementNonce val = constructObjectPropertyString "nonce" val++data DOMHTMLScriptElementNoncePropertyInfo+instance AttrInfo DOMHTMLScriptElementNoncePropertyInfo where+ type AttrAllowedOps DOMHTMLScriptElementNoncePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLScriptElementNoncePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLScriptElementNoncePropertyInfo = DOMHTMLScriptElementK+ type AttrGetType DOMHTMLScriptElementNoncePropertyInfo = T.Text+ type AttrLabel DOMHTMLScriptElementNoncePropertyInfo = "DOMHTMLScriptElement::nonce"+ attrGet _ = getDOMHTMLScriptElementNonce+ attrSet _ = setDOMHTMLScriptElementNonce+ attrConstruct _ = constructDOMHTMLScriptElementNonce++-- VVV Prop "src"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLScriptElementSrc :: (MonadIO m, DOMHTMLScriptElementK o) => o -> m T.Text+getDOMHTMLScriptElementSrc obj = liftIO $ getObjectPropertyString obj "src"++setDOMHTMLScriptElementSrc :: (MonadIO m, DOMHTMLScriptElementK o) => o -> T.Text -> m ()+setDOMHTMLScriptElementSrc obj val = liftIO $ setObjectPropertyString obj "src" val++constructDOMHTMLScriptElementSrc :: T.Text -> IO ([Char], GValue)+constructDOMHTMLScriptElementSrc val = constructObjectPropertyString "src" val++data DOMHTMLScriptElementSrcPropertyInfo+instance AttrInfo DOMHTMLScriptElementSrcPropertyInfo where+ type AttrAllowedOps DOMHTMLScriptElementSrcPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLScriptElementSrcPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLScriptElementSrcPropertyInfo = DOMHTMLScriptElementK+ type AttrGetType DOMHTMLScriptElementSrcPropertyInfo = T.Text+ type AttrLabel DOMHTMLScriptElementSrcPropertyInfo = "DOMHTMLScriptElement::src"+ attrGet _ = getDOMHTMLScriptElementSrc+ attrSet _ = setDOMHTMLScriptElementSrc+ attrConstruct _ = constructDOMHTMLScriptElementSrc++-- VVV Prop "text"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLScriptElementText :: (MonadIO m, DOMHTMLScriptElementK o) => o -> m T.Text+getDOMHTMLScriptElementText obj = liftIO $ getObjectPropertyString obj "text"++setDOMHTMLScriptElementText :: (MonadIO m, DOMHTMLScriptElementK o) => o -> T.Text -> m ()+setDOMHTMLScriptElementText obj val = liftIO $ setObjectPropertyString obj "text" val++constructDOMHTMLScriptElementText :: T.Text -> IO ([Char], GValue)+constructDOMHTMLScriptElementText val = constructObjectPropertyString "text" val++data DOMHTMLScriptElementTextPropertyInfo+instance AttrInfo DOMHTMLScriptElementTextPropertyInfo where+ type AttrAllowedOps DOMHTMLScriptElementTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLScriptElementTextPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLScriptElementTextPropertyInfo = DOMHTMLScriptElementK+ type AttrGetType DOMHTMLScriptElementTextPropertyInfo = T.Text+ type AttrLabel DOMHTMLScriptElementTextPropertyInfo = "DOMHTMLScriptElement::text"+ attrGet _ = getDOMHTMLScriptElementText+ attrSet _ = setDOMHTMLScriptElementText+ attrConstruct _ = constructDOMHTMLScriptElementText++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLScriptElementType :: (MonadIO m, DOMHTMLScriptElementK o) => o -> m T.Text+getDOMHTMLScriptElementType obj = liftIO $ getObjectPropertyString obj "type"++setDOMHTMLScriptElementType :: (MonadIO m, DOMHTMLScriptElementK o) => o -> T.Text -> m ()+setDOMHTMLScriptElementType obj val = liftIO $ setObjectPropertyString obj "type" val++constructDOMHTMLScriptElementType :: T.Text -> IO ([Char], GValue)+constructDOMHTMLScriptElementType val = constructObjectPropertyString "type" val++data DOMHTMLScriptElementTypePropertyInfo+instance AttrInfo DOMHTMLScriptElementTypePropertyInfo where+ type AttrAllowedOps DOMHTMLScriptElementTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLScriptElementTypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLScriptElementTypePropertyInfo = DOMHTMLScriptElementK+ type AttrGetType DOMHTMLScriptElementTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLScriptElementTypePropertyInfo = "DOMHTMLScriptElement::type"+ attrGet _ = getDOMHTMLScriptElementType+ attrSet _ = setDOMHTMLScriptElementType+ attrConstruct _ = constructDOMHTMLScriptElementType++type instance AttributeList DOMHTMLScriptElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("async", DOMHTMLScriptElementAsyncPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("charset", DOMHTMLScriptElementCharsetPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("cross-origin", DOMHTMLScriptElementCrossOriginPropertyInfo), '("defer", DOMHTMLScriptElementDeferPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("event", DOMHTMLScriptElementEventPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("html-for", DOMHTMLScriptElementHtmlForPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("nonce", DOMHTMLScriptElementNoncePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLScriptElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text", DOMHTMLScriptElementTextPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLScriptElementTypePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "autofocus"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLSelectElementAutofocus :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m Bool+getDOMHTMLSelectElementAutofocus obj = liftIO $ getObjectPropertyBool obj "autofocus"++setDOMHTMLSelectElementAutofocus :: (MonadIO m, DOMHTMLSelectElementK o) => o -> Bool -> m ()+setDOMHTMLSelectElementAutofocus obj val = liftIO $ setObjectPropertyBool obj "autofocus" val++constructDOMHTMLSelectElementAutofocus :: Bool -> IO ([Char], GValue)+constructDOMHTMLSelectElementAutofocus val = constructObjectPropertyBool "autofocus" val++data DOMHTMLSelectElementAutofocusPropertyInfo+instance AttrInfo DOMHTMLSelectElementAutofocusPropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementAutofocusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementAutofocusPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLSelectElementAutofocusPropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementAutofocusPropertyInfo = Bool+ type AttrLabel DOMHTMLSelectElementAutofocusPropertyInfo = "DOMHTMLSelectElement::autofocus"+ attrGet _ = getDOMHTMLSelectElementAutofocus+ attrSet _ = setDOMHTMLSelectElementAutofocus+ attrConstruct _ = constructDOMHTMLSelectElementAutofocus++-- VVV Prop "disabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLSelectElementDisabled :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m Bool+getDOMHTMLSelectElementDisabled obj = liftIO $ getObjectPropertyBool obj "disabled"++setDOMHTMLSelectElementDisabled :: (MonadIO m, DOMHTMLSelectElementK o) => o -> Bool -> m ()+setDOMHTMLSelectElementDisabled obj val = liftIO $ setObjectPropertyBool obj "disabled" val++constructDOMHTMLSelectElementDisabled :: Bool -> IO ([Char], GValue)+constructDOMHTMLSelectElementDisabled val = constructObjectPropertyBool "disabled" val++data DOMHTMLSelectElementDisabledPropertyInfo+instance AttrInfo DOMHTMLSelectElementDisabledPropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementDisabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementDisabledPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLSelectElementDisabledPropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementDisabledPropertyInfo = Bool+ type AttrLabel DOMHTMLSelectElementDisabledPropertyInfo = "DOMHTMLSelectElement::disabled"+ attrGet _ = getDOMHTMLSelectElementDisabled+ attrSet _ = setDOMHTMLSelectElementDisabled+ attrConstruct _ = constructDOMHTMLSelectElementDisabled++-- VVV Prop "form"+ -- Type: TInterface "WebKit" "DOMHTMLFormElement"+ -- Flags: [PropertyReadable]++getDOMHTMLSelectElementForm :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m DOMHTMLFormElement+getDOMHTMLSelectElementForm obj = liftIO $ getObjectPropertyObject obj "form" DOMHTMLFormElement++data DOMHTMLSelectElementFormPropertyInfo+instance AttrInfo DOMHTMLSelectElementFormPropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementFormPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementFormPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLSelectElementFormPropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementFormPropertyInfo = DOMHTMLFormElement+ type AttrLabel DOMHTMLSelectElementFormPropertyInfo = "DOMHTMLSelectElement::form"+ attrGet _ = getDOMHTMLSelectElementForm+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "labels"+ -- Type: TInterface "WebKit" "DOMNodeList"+ -- Flags: [PropertyReadable]++getDOMHTMLSelectElementLabels :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m DOMNodeList+getDOMHTMLSelectElementLabels obj = liftIO $ getObjectPropertyObject obj "labels" DOMNodeList++data DOMHTMLSelectElementLabelsPropertyInfo+instance AttrInfo DOMHTMLSelectElementLabelsPropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementLabelsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementLabelsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLSelectElementLabelsPropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementLabelsPropertyInfo = DOMNodeList+ type AttrLabel DOMHTMLSelectElementLabelsPropertyInfo = "DOMHTMLSelectElement::labels"+ attrGet _ = getDOMHTMLSelectElementLabels+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLSelectElementLength :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m Word64+getDOMHTMLSelectElementLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++setDOMHTMLSelectElementLength :: (MonadIO m, DOMHTMLSelectElementK o) => o -> Word64 -> m ()+setDOMHTMLSelectElementLength obj val = liftIO $ setObjectPropertyUInt64 obj "length" val++constructDOMHTMLSelectElementLength :: Word64 -> IO ([Char], GValue)+constructDOMHTMLSelectElementLength val = constructObjectPropertyUInt64 "length" val++data DOMHTMLSelectElementLengthPropertyInfo+instance AttrInfo DOMHTMLSelectElementLengthPropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementLengthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementLengthPropertyInfo = (~) Word64+ type AttrBaseTypeConstraint DOMHTMLSelectElementLengthPropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementLengthPropertyInfo = Word64+ type AttrLabel DOMHTMLSelectElementLengthPropertyInfo = "DOMHTMLSelectElement::length"+ attrGet _ = getDOMHTMLSelectElementLength+ attrSet _ = setDOMHTMLSelectElementLength+ attrConstruct _ = constructDOMHTMLSelectElementLength++-- VVV Prop "multiple"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLSelectElementMultiple :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m Bool+getDOMHTMLSelectElementMultiple obj = liftIO $ getObjectPropertyBool obj "multiple"++setDOMHTMLSelectElementMultiple :: (MonadIO m, DOMHTMLSelectElementK o) => o -> Bool -> m ()+setDOMHTMLSelectElementMultiple obj val = liftIO $ setObjectPropertyBool obj "multiple" val++constructDOMHTMLSelectElementMultiple :: Bool -> IO ([Char], GValue)+constructDOMHTMLSelectElementMultiple val = constructObjectPropertyBool "multiple" val++data DOMHTMLSelectElementMultiplePropertyInfo+instance AttrInfo DOMHTMLSelectElementMultiplePropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementMultiplePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementMultiplePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLSelectElementMultiplePropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementMultiplePropertyInfo = Bool+ type AttrLabel DOMHTMLSelectElementMultiplePropertyInfo = "DOMHTMLSelectElement::multiple"+ attrGet _ = getDOMHTMLSelectElementMultiple+ attrSet _ = setDOMHTMLSelectElementMultiple+ attrConstruct _ = constructDOMHTMLSelectElementMultiple++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLSelectElementName :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m T.Text+getDOMHTMLSelectElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLSelectElementName :: (MonadIO m, DOMHTMLSelectElementK o) => o -> T.Text -> m ()+setDOMHTMLSelectElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLSelectElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLSelectElementName val = constructObjectPropertyString "name" val++data DOMHTMLSelectElementNamePropertyInfo+instance AttrInfo DOMHTMLSelectElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLSelectElementNamePropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLSelectElementNamePropertyInfo = "DOMHTMLSelectElement::name"+ attrGet _ = getDOMHTMLSelectElementName+ attrSet _ = setDOMHTMLSelectElementName+ attrConstruct _ = constructDOMHTMLSelectElementName++-- VVV Prop "options"+ -- Type: TInterface "WebKit" "DOMHTMLOptionsCollection"+ -- Flags: [PropertyReadable]++getDOMHTMLSelectElementOptions :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m DOMHTMLOptionsCollection+getDOMHTMLSelectElementOptions obj = liftIO $ getObjectPropertyObject obj "options" DOMHTMLOptionsCollection++data DOMHTMLSelectElementOptionsPropertyInfo+instance AttrInfo DOMHTMLSelectElementOptionsPropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementOptionsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementOptionsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLSelectElementOptionsPropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementOptionsPropertyInfo = DOMHTMLOptionsCollection+ type AttrLabel DOMHTMLSelectElementOptionsPropertyInfo = "DOMHTMLSelectElement::options"+ attrGet _ = getDOMHTMLSelectElementOptions+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "required"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLSelectElementRequired :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m Bool+getDOMHTMLSelectElementRequired obj = liftIO $ getObjectPropertyBool obj "required"++setDOMHTMLSelectElementRequired :: (MonadIO m, DOMHTMLSelectElementK o) => o -> Bool -> m ()+setDOMHTMLSelectElementRequired obj val = liftIO $ setObjectPropertyBool obj "required" val++constructDOMHTMLSelectElementRequired :: Bool -> IO ([Char], GValue)+constructDOMHTMLSelectElementRequired val = constructObjectPropertyBool "required" val++data DOMHTMLSelectElementRequiredPropertyInfo+instance AttrInfo DOMHTMLSelectElementRequiredPropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementRequiredPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementRequiredPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLSelectElementRequiredPropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementRequiredPropertyInfo = Bool+ type AttrLabel DOMHTMLSelectElementRequiredPropertyInfo = "DOMHTMLSelectElement::required"+ attrGet _ = getDOMHTMLSelectElementRequired+ attrSet _ = setDOMHTMLSelectElementRequired+ attrConstruct _ = constructDOMHTMLSelectElementRequired++-- VVV Prop "selected-index"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLSelectElementSelectedIndex :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m Int64+getDOMHTMLSelectElementSelectedIndex obj = liftIO $ getObjectPropertyInt64 obj "selected-index"++setDOMHTMLSelectElementSelectedIndex :: (MonadIO m, DOMHTMLSelectElementK o) => o -> Int64 -> m ()+setDOMHTMLSelectElementSelectedIndex obj val = liftIO $ setObjectPropertyInt64 obj "selected-index" val++constructDOMHTMLSelectElementSelectedIndex :: Int64 -> IO ([Char], GValue)+constructDOMHTMLSelectElementSelectedIndex val = constructObjectPropertyInt64 "selected-index" val++data DOMHTMLSelectElementSelectedIndexPropertyInfo+instance AttrInfo DOMHTMLSelectElementSelectedIndexPropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementSelectedIndexPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementSelectedIndexPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLSelectElementSelectedIndexPropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementSelectedIndexPropertyInfo = Int64+ type AttrLabel DOMHTMLSelectElementSelectedIndexPropertyInfo = "DOMHTMLSelectElement::selected-index"+ attrGet _ = getDOMHTMLSelectElementSelectedIndex+ attrSet _ = setDOMHTMLSelectElementSelectedIndex+ attrConstruct _ = constructDOMHTMLSelectElementSelectedIndex++-- VVV Prop "selected-options"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMHTMLSelectElementSelectedOptions :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m DOMHTMLCollection+getDOMHTMLSelectElementSelectedOptions obj = liftIO $ getObjectPropertyObject obj "selected-options" DOMHTMLCollection++data DOMHTMLSelectElementSelectedOptionsPropertyInfo+instance AttrInfo DOMHTMLSelectElementSelectedOptionsPropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementSelectedOptionsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementSelectedOptionsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLSelectElementSelectedOptionsPropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementSelectedOptionsPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMHTMLSelectElementSelectedOptionsPropertyInfo = "DOMHTMLSelectElement::selected-options"+ attrGet _ = getDOMHTMLSelectElementSelectedOptions+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "size"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLSelectElementSize :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m Int64+getDOMHTMLSelectElementSize obj = liftIO $ getObjectPropertyInt64 obj "size"++setDOMHTMLSelectElementSize :: (MonadIO m, DOMHTMLSelectElementK o) => o -> Int64 -> m ()+setDOMHTMLSelectElementSize obj val = liftIO $ setObjectPropertyInt64 obj "size" val++constructDOMHTMLSelectElementSize :: Int64 -> IO ([Char], GValue)+constructDOMHTMLSelectElementSize val = constructObjectPropertyInt64 "size" val++data DOMHTMLSelectElementSizePropertyInfo+instance AttrInfo DOMHTMLSelectElementSizePropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementSizePropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLSelectElementSizePropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementSizePropertyInfo = Int64+ type AttrLabel DOMHTMLSelectElementSizePropertyInfo = "DOMHTMLSelectElement::size"+ attrGet _ = getDOMHTMLSelectElementSize+ attrSet _ = setDOMHTMLSelectElementSize+ attrConstruct _ = constructDOMHTMLSelectElementSize++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLSelectElementType :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m T.Text+getDOMHTMLSelectElementType obj = liftIO $ getObjectPropertyString obj "type"++data DOMHTMLSelectElementTypePropertyInfo+instance AttrInfo DOMHTMLSelectElementTypePropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLSelectElementTypePropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLSelectElementTypePropertyInfo = "DOMHTMLSelectElement::type"+ attrGet _ = getDOMHTMLSelectElementType+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "validation-message"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLSelectElementValidationMessage :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m T.Text+getDOMHTMLSelectElementValidationMessage obj = liftIO $ getObjectPropertyString obj "validation-message"++data DOMHTMLSelectElementValidationMessagePropertyInfo+instance AttrInfo DOMHTMLSelectElementValidationMessagePropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementValidationMessagePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementValidationMessagePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLSelectElementValidationMessagePropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementValidationMessagePropertyInfo = T.Text+ type AttrLabel DOMHTMLSelectElementValidationMessagePropertyInfo = "DOMHTMLSelectElement::validation-message"+ attrGet _ = getDOMHTMLSelectElementValidationMessage+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "validity"+ -- Type: TInterface "WebKit" "DOMValidityState"+ -- Flags: [PropertyReadable]++getDOMHTMLSelectElementValidity :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m DOMValidityState+getDOMHTMLSelectElementValidity obj = liftIO $ getObjectPropertyObject obj "validity" DOMValidityState++data DOMHTMLSelectElementValidityPropertyInfo+instance AttrInfo DOMHTMLSelectElementValidityPropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementValidityPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementValidityPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLSelectElementValidityPropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementValidityPropertyInfo = DOMValidityState+ type AttrLabel DOMHTMLSelectElementValidityPropertyInfo = "DOMHTMLSelectElement::validity"+ attrGet _ = getDOMHTMLSelectElementValidity+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "value"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLSelectElementValue :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m T.Text+getDOMHTMLSelectElementValue obj = liftIO $ getObjectPropertyString obj "value"++setDOMHTMLSelectElementValue :: (MonadIO m, DOMHTMLSelectElementK o) => o -> T.Text -> m ()+setDOMHTMLSelectElementValue obj val = liftIO $ setObjectPropertyString obj "value" val++constructDOMHTMLSelectElementValue :: T.Text -> IO ([Char], GValue)+constructDOMHTMLSelectElementValue val = constructObjectPropertyString "value" val++data DOMHTMLSelectElementValuePropertyInfo+instance AttrInfo DOMHTMLSelectElementValuePropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementValuePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLSelectElementValuePropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementValuePropertyInfo = T.Text+ type AttrLabel DOMHTMLSelectElementValuePropertyInfo = "DOMHTMLSelectElement::value"+ attrGet _ = getDOMHTMLSelectElementValue+ attrSet _ = setDOMHTMLSelectElementValue+ attrConstruct _ = constructDOMHTMLSelectElementValue++-- VVV Prop "will-validate"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMHTMLSelectElementWillValidate :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m Bool+getDOMHTMLSelectElementWillValidate obj = liftIO $ getObjectPropertyBool obj "will-validate"++data DOMHTMLSelectElementWillValidatePropertyInfo+instance AttrInfo DOMHTMLSelectElementWillValidatePropertyInfo where+ type AttrAllowedOps DOMHTMLSelectElementWillValidatePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLSelectElementWillValidatePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLSelectElementWillValidatePropertyInfo = DOMHTMLSelectElementK+ type AttrGetType DOMHTMLSelectElementWillValidatePropertyInfo = Bool+ type AttrLabel DOMHTMLSelectElementWillValidatePropertyInfo = "DOMHTMLSelectElement::will-validate"+ attrGet _ = getDOMHTMLSelectElementWillValidate+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMHTMLSelectElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autofocus", DOMHTMLSelectElementAutofocusPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLSelectElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLSelectElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("labels", DOMHTMLSelectElementLabelsPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("length", DOMHTMLSelectElementLengthPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("multiple", DOMHTMLSelectElementMultiplePropertyInfo), '("name", DOMHTMLSelectElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("options", DOMHTMLSelectElementOptionsPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("required", DOMHTMLSelectElementRequiredPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("selected-index", DOMHTMLSelectElementSelectedIndexPropertyInfo), '("selected-options", DOMHTMLSelectElementSelectedOptionsPropertyInfo), '("size", DOMHTMLSelectElementSizePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLSelectElementTypePropertyInfo), '("validation-message", DOMHTMLSelectElementValidationMessagePropertyInfo), '("validity", DOMHTMLSelectElementValidityPropertyInfo), '("value", DOMHTMLSelectElementValuePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("will-validate", DOMHTMLSelectElementWillValidatePropertyInfo)]++-- VVV Prop "disabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLStyleElementDisabled :: (MonadIO m, DOMHTMLStyleElementK o) => o -> m Bool+getDOMHTMLStyleElementDisabled obj = liftIO $ getObjectPropertyBool obj "disabled"++setDOMHTMLStyleElementDisabled :: (MonadIO m, DOMHTMLStyleElementK o) => o -> Bool -> m ()+setDOMHTMLStyleElementDisabled obj val = liftIO $ setObjectPropertyBool obj "disabled" val++constructDOMHTMLStyleElementDisabled :: Bool -> IO ([Char], GValue)+constructDOMHTMLStyleElementDisabled val = constructObjectPropertyBool "disabled" val++data DOMHTMLStyleElementDisabledPropertyInfo+instance AttrInfo DOMHTMLStyleElementDisabledPropertyInfo where+ type AttrAllowedOps DOMHTMLStyleElementDisabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLStyleElementDisabledPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLStyleElementDisabledPropertyInfo = DOMHTMLStyleElementK+ type AttrGetType DOMHTMLStyleElementDisabledPropertyInfo = Bool+ type AttrLabel DOMHTMLStyleElementDisabledPropertyInfo = "DOMHTMLStyleElement::disabled"+ attrGet _ = getDOMHTMLStyleElementDisabled+ attrSet _ = setDOMHTMLStyleElementDisabled+ attrConstruct _ = constructDOMHTMLStyleElementDisabled++-- VVV Prop "media"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLStyleElementMedia :: (MonadIO m, DOMHTMLStyleElementK o) => o -> m T.Text+getDOMHTMLStyleElementMedia obj = liftIO $ getObjectPropertyString obj "media"++setDOMHTMLStyleElementMedia :: (MonadIO m, DOMHTMLStyleElementK o) => o -> T.Text -> m ()+setDOMHTMLStyleElementMedia obj val = liftIO $ setObjectPropertyString obj "media" val++constructDOMHTMLStyleElementMedia :: T.Text -> IO ([Char], GValue)+constructDOMHTMLStyleElementMedia val = constructObjectPropertyString "media" val++data DOMHTMLStyleElementMediaPropertyInfo+instance AttrInfo DOMHTMLStyleElementMediaPropertyInfo where+ type AttrAllowedOps DOMHTMLStyleElementMediaPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLStyleElementMediaPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLStyleElementMediaPropertyInfo = DOMHTMLStyleElementK+ type AttrGetType DOMHTMLStyleElementMediaPropertyInfo = T.Text+ type AttrLabel DOMHTMLStyleElementMediaPropertyInfo = "DOMHTMLStyleElement::media"+ attrGet _ = getDOMHTMLStyleElementMedia+ attrSet _ = setDOMHTMLStyleElementMedia+ attrConstruct _ = constructDOMHTMLStyleElementMedia++-- VVV Prop "sheet"+ -- Type: TInterface "WebKit" "DOMStyleSheet"+ -- Flags: [PropertyReadable]++getDOMHTMLStyleElementSheet :: (MonadIO m, DOMHTMLStyleElementK o) => o -> m DOMStyleSheet+getDOMHTMLStyleElementSheet obj = liftIO $ getObjectPropertyObject obj "sheet" DOMStyleSheet++data DOMHTMLStyleElementSheetPropertyInfo+instance AttrInfo DOMHTMLStyleElementSheetPropertyInfo where+ type AttrAllowedOps DOMHTMLStyleElementSheetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLStyleElementSheetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLStyleElementSheetPropertyInfo = DOMHTMLStyleElementK+ type AttrGetType DOMHTMLStyleElementSheetPropertyInfo = DOMStyleSheet+ type AttrLabel DOMHTMLStyleElementSheetPropertyInfo = "DOMHTMLStyleElement::sheet"+ attrGet _ = getDOMHTMLStyleElementSheet+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLStyleElementType :: (MonadIO m, DOMHTMLStyleElementK o) => o -> m T.Text+getDOMHTMLStyleElementType obj = liftIO $ getObjectPropertyString obj "type"++setDOMHTMLStyleElementType :: (MonadIO m, DOMHTMLStyleElementK o) => o -> T.Text -> m ()+setDOMHTMLStyleElementType obj val = liftIO $ setObjectPropertyString obj "type" val++constructDOMHTMLStyleElementType :: T.Text -> IO ([Char], GValue)+constructDOMHTMLStyleElementType val = constructObjectPropertyString "type" val++data DOMHTMLStyleElementTypePropertyInfo+instance AttrInfo DOMHTMLStyleElementTypePropertyInfo where+ type AttrAllowedOps DOMHTMLStyleElementTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLStyleElementTypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLStyleElementTypePropertyInfo = DOMHTMLStyleElementK+ type AttrGetType DOMHTMLStyleElementTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLStyleElementTypePropertyInfo = "DOMHTMLStyleElement::type"+ attrGet _ = getDOMHTMLStyleElementType+ attrSet _ = setDOMHTMLStyleElementType+ attrConstruct _ = constructDOMHTMLStyleElementType++type instance AttributeList DOMHTMLStyleElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLStyleElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("media", DOMHTMLStyleElementMediaPropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("sheet", DOMHTMLStyleElementSheetPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLStyleElementTypePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableCaptionElementAlign :: (MonadIO m, DOMHTMLTableCaptionElementK o) => o -> m T.Text+getDOMHTMLTableCaptionElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLTableCaptionElementAlign :: (MonadIO m, DOMHTMLTableCaptionElementK o) => o -> T.Text -> m ()+setDOMHTMLTableCaptionElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLTableCaptionElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableCaptionElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLTableCaptionElementAlignPropertyInfo+instance AttrInfo DOMHTMLTableCaptionElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLTableCaptionElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableCaptionElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableCaptionElementAlignPropertyInfo = DOMHTMLTableCaptionElementK+ type AttrGetType DOMHTMLTableCaptionElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableCaptionElementAlignPropertyInfo = "DOMHTMLTableCaptionElement::align"+ attrGet _ = getDOMHTMLTableCaptionElementAlign+ attrSet _ = setDOMHTMLTableCaptionElementAlign+ attrConstruct _ = constructDOMHTMLTableCaptionElementAlign++type instance AttributeList DOMHTMLTableCaptionElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableCaptionElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "abbr"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableCellElementAbbr :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> m T.Text+getDOMHTMLTableCellElementAbbr obj = liftIO $ getObjectPropertyString obj "abbr"++setDOMHTMLTableCellElementAbbr :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> T.Text -> m ()+setDOMHTMLTableCellElementAbbr obj val = liftIO $ setObjectPropertyString obj "abbr" val++constructDOMHTMLTableCellElementAbbr :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableCellElementAbbr val = constructObjectPropertyString "abbr" val++data DOMHTMLTableCellElementAbbrPropertyInfo+instance AttrInfo DOMHTMLTableCellElementAbbrPropertyInfo where+ type AttrAllowedOps DOMHTMLTableCellElementAbbrPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableCellElementAbbrPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableCellElementAbbrPropertyInfo = DOMHTMLTableCellElementK+ type AttrGetType DOMHTMLTableCellElementAbbrPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableCellElementAbbrPropertyInfo = "DOMHTMLTableCellElement::abbr"+ attrGet _ = getDOMHTMLTableCellElementAbbr+ attrSet _ = setDOMHTMLTableCellElementAbbr+ attrConstruct _ = constructDOMHTMLTableCellElementAbbr++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableCellElementAlign :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> m T.Text+getDOMHTMLTableCellElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLTableCellElementAlign :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> T.Text -> m ()+setDOMHTMLTableCellElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLTableCellElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableCellElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLTableCellElementAlignPropertyInfo+instance AttrInfo DOMHTMLTableCellElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLTableCellElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableCellElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableCellElementAlignPropertyInfo = DOMHTMLTableCellElementK+ type AttrGetType DOMHTMLTableCellElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableCellElementAlignPropertyInfo = "DOMHTMLTableCellElement::align"+ attrGet _ = getDOMHTMLTableCellElementAlign+ attrSet _ = setDOMHTMLTableCellElementAlign+ attrConstruct _ = constructDOMHTMLTableCellElementAlign++-- VVV Prop "axis"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableCellElementAxis :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> m T.Text+getDOMHTMLTableCellElementAxis obj = liftIO $ getObjectPropertyString obj "axis"++setDOMHTMLTableCellElementAxis :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> T.Text -> m ()+setDOMHTMLTableCellElementAxis obj val = liftIO $ setObjectPropertyString obj "axis" val++constructDOMHTMLTableCellElementAxis :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableCellElementAxis val = constructObjectPropertyString "axis" val++data DOMHTMLTableCellElementAxisPropertyInfo+instance AttrInfo DOMHTMLTableCellElementAxisPropertyInfo where+ type AttrAllowedOps DOMHTMLTableCellElementAxisPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableCellElementAxisPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableCellElementAxisPropertyInfo = DOMHTMLTableCellElementK+ type AttrGetType DOMHTMLTableCellElementAxisPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableCellElementAxisPropertyInfo = "DOMHTMLTableCellElement::axis"+ attrGet _ = getDOMHTMLTableCellElementAxis+ attrSet _ = setDOMHTMLTableCellElementAxis+ attrConstruct _ = constructDOMHTMLTableCellElementAxis++-- VVV Prop "bg-color"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableCellElementBgColor :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> m T.Text+getDOMHTMLTableCellElementBgColor obj = liftIO $ getObjectPropertyString obj "bg-color"++setDOMHTMLTableCellElementBgColor :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> T.Text -> m ()+setDOMHTMLTableCellElementBgColor obj val = liftIO $ setObjectPropertyString obj "bg-color" val++constructDOMHTMLTableCellElementBgColor :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableCellElementBgColor val = constructObjectPropertyString "bg-color" val++data DOMHTMLTableCellElementBgColorPropertyInfo+instance AttrInfo DOMHTMLTableCellElementBgColorPropertyInfo where+ type AttrAllowedOps DOMHTMLTableCellElementBgColorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableCellElementBgColorPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableCellElementBgColorPropertyInfo = DOMHTMLTableCellElementK+ type AttrGetType DOMHTMLTableCellElementBgColorPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableCellElementBgColorPropertyInfo = "DOMHTMLTableCellElement::bg-color"+ attrGet _ = getDOMHTMLTableCellElementBgColor+ attrSet _ = setDOMHTMLTableCellElementBgColor+ attrConstruct _ = constructDOMHTMLTableCellElementBgColor++-- VVV Prop "cell-index"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMHTMLTableCellElementCellIndex :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> m Int64+getDOMHTMLTableCellElementCellIndex obj = liftIO $ getObjectPropertyInt64 obj "cell-index"++data DOMHTMLTableCellElementCellIndexPropertyInfo+instance AttrInfo DOMHTMLTableCellElementCellIndexPropertyInfo where+ type AttrAllowedOps DOMHTMLTableCellElementCellIndexPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableCellElementCellIndexPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTableCellElementCellIndexPropertyInfo = DOMHTMLTableCellElementK+ type AttrGetType DOMHTMLTableCellElementCellIndexPropertyInfo = Int64+ type AttrLabel DOMHTMLTableCellElementCellIndexPropertyInfo = "DOMHTMLTableCellElement::cell-index"+ attrGet _ = getDOMHTMLTableCellElementCellIndex+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "ch"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableCellElementCh :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> m T.Text+getDOMHTMLTableCellElementCh obj = liftIO $ getObjectPropertyString obj "ch"++setDOMHTMLTableCellElementCh :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> T.Text -> m ()+setDOMHTMLTableCellElementCh obj val = liftIO $ setObjectPropertyString obj "ch" val++constructDOMHTMLTableCellElementCh :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableCellElementCh val = constructObjectPropertyString "ch" val++data DOMHTMLTableCellElementChPropertyInfo+instance AttrInfo DOMHTMLTableCellElementChPropertyInfo where+ type AttrAllowedOps DOMHTMLTableCellElementChPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableCellElementChPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableCellElementChPropertyInfo = DOMHTMLTableCellElementK+ type AttrGetType DOMHTMLTableCellElementChPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableCellElementChPropertyInfo = "DOMHTMLTableCellElement::ch"+ attrGet _ = getDOMHTMLTableCellElementCh+ attrSet _ = setDOMHTMLTableCellElementCh+ attrConstruct _ = constructDOMHTMLTableCellElementCh++-- VVV Prop "ch-off"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableCellElementChOff :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> m T.Text+getDOMHTMLTableCellElementChOff obj = liftIO $ getObjectPropertyString obj "ch-off"++setDOMHTMLTableCellElementChOff :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> T.Text -> m ()+setDOMHTMLTableCellElementChOff obj val = liftIO $ setObjectPropertyString obj "ch-off" val++constructDOMHTMLTableCellElementChOff :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableCellElementChOff val = constructObjectPropertyString "ch-off" val++data DOMHTMLTableCellElementChOffPropertyInfo+instance AttrInfo DOMHTMLTableCellElementChOffPropertyInfo where+ type AttrAllowedOps DOMHTMLTableCellElementChOffPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableCellElementChOffPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableCellElementChOffPropertyInfo = DOMHTMLTableCellElementK+ type AttrGetType DOMHTMLTableCellElementChOffPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableCellElementChOffPropertyInfo = "DOMHTMLTableCellElement::ch-off"+ attrGet _ = getDOMHTMLTableCellElementChOff+ attrSet _ = setDOMHTMLTableCellElementChOff+ attrConstruct _ = constructDOMHTMLTableCellElementChOff++-- VVV Prop "col-span"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableCellElementColSpan :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> m Int64+getDOMHTMLTableCellElementColSpan obj = liftIO $ getObjectPropertyInt64 obj "col-span"++setDOMHTMLTableCellElementColSpan :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> Int64 -> m ()+setDOMHTMLTableCellElementColSpan obj val = liftIO $ setObjectPropertyInt64 obj "col-span" val++constructDOMHTMLTableCellElementColSpan :: Int64 -> IO ([Char], GValue)+constructDOMHTMLTableCellElementColSpan val = constructObjectPropertyInt64 "col-span" val++data DOMHTMLTableCellElementColSpanPropertyInfo+instance AttrInfo DOMHTMLTableCellElementColSpanPropertyInfo where+ type AttrAllowedOps DOMHTMLTableCellElementColSpanPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableCellElementColSpanPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLTableCellElementColSpanPropertyInfo = DOMHTMLTableCellElementK+ type AttrGetType DOMHTMLTableCellElementColSpanPropertyInfo = Int64+ type AttrLabel DOMHTMLTableCellElementColSpanPropertyInfo = "DOMHTMLTableCellElement::col-span"+ attrGet _ = getDOMHTMLTableCellElementColSpan+ attrSet _ = setDOMHTMLTableCellElementColSpan+ attrConstruct _ = constructDOMHTMLTableCellElementColSpan++-- VVV Prop "headers"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableCellElementHeaders :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> m T.Text+getDOMHTMLTableCellElementHeaders obj = liftIO $ getObjectPropertyString obj "headers"++setDOMHTMLTableCellElementHeaders :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> T.Text -> m ()+setDOMHTMLTableCellElementHeaders obj val = liftIO $ setObjectPropertyString obj "headers" val++constructDOMHTMLTableCellElementHeaders :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableCellElementHeaders val = constructObjectPropertyString "headers" val++data DOMHTMLTableCellElementHeadersPropertyInfo+instance AttrInfo DOMHTMLTableCellElementHeadersPropertyInfo where+ type AttrAllowedOps DOMHTMLTableCellElementHeadersPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableCellElementHeadersPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableCellElementHeadersPropertyInfo = DOMHTMLTableCellElementK+ type AttrGetType DOMHTMLTableCellElementHeadersPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableCellElementHeadersPropertyInfo = "DOMHTMLTableCellElement::headers"+ attrGet _ = getDOMHTMLTableCellElementHeaders+ attrSet _ = setDOMHTMLTableCellElementHeaders+ attrConstruct _ = constructDOMHTMLTableCellElementHeaders++-- VVV Prop "height"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableCellElementHeight :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> m T.Text+getDOMHTMLTableCellElementHeight obj = liftIO $ getObjectPropertyString obj "height"++setDOMHTMLTableCellElementHeight :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> T.Text -> m ()+setDOMHTMLTableCellElementHeight obj val = liftIO $ setObjectPropertyString obj "height" val++constructDOMHTMLTableCellElementHeight :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableCellElementHeight val = constructObjectPropertyString "height" val++data DOMHTMLTableCellElementHeightPropertyInfo+instance AttrInfo DOMHTMLTableCellElementHeightPropertyInfo where+ type AttrAllowedOps DOMHTMLTableCellElementHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableCellElementHeightPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableCellElementHeightPropertyInfo = DOMHTMLTableCellElementK+ type AttrGetType DOMHTMLTableCellElementHeightPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableCellElementHeightPropertyInfo = "DOMHTMLTableCellElement::height"+ attrGet _ = getDOMHTMLTableCellElementHeight+ attrSet _ = setDOMHTMLTableCellElementHeight+ attrConstruct _ = constructDOMHTMLTableCellElementHeight++-- VVV Prop "no-wrap"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableCellElementNoWrap :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> m Bool+getDOMHTMLTableCellElementNoWrap obj = liftIO $ getObjectPropertyBool obj "no-wrap"++setDOMHTMLTableCellElementNoWrap :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> Bool -> m ()+setDOMHTMLTableCellElementNoWrap obj val = liftIO $ setObjectPropertyBool obj "no-wrap" val++constructDOMHTMLTableCellElementNoWrap :: Bool -> IO ([Char], GValue)+constructDOMHTMLTableCellElementNoWrap val = constructObjectPropertyBool "no-wrap" val++data DOMHTMLTableCellElementNoWrapPropertyInfo+instance AttrInfo DOMHTMLTableCellElementNoWrapPropertyInfo where+ type AttrAllowedOps DOMHTMLTableCellElementNoWrapPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableCellElementNoWrapPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLTableCellElementNoWrapPropertyInfo = DOMHTMLTableCellElementK+ type AttrGetType DOMHTMLTableCellElementNoWrapPropertyInfo = Bool+ type AttrLabel DOMHTMLTableCellElementNoWrapPropertyInfo = "DOMHTMLTableCellElement::no-wrap"+ attrGet _ = getDOMHTMLTableCellElementNoWrap+ attrSet _ = setDOMHTMLTableCellElementNoWrap+ attrConstruct _ = constructDOMHTMLTableCellElementNoWrap++-- VVV Prop "row-span"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableCellElementRowSpan :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> m Int64+getDOMHTMLTableCellElementRowSpan obj = liftIO $ getObjectPropertyInt64 obj "row-span"++setDOMHTMLTableCellElementRowSpan :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> Int64 -> m ()+setDOMHTMLTableCellElementRowSpan obj val = liftIO $ setObjectPropertyInt64 obj "row-span" val++constructDOMHTMLTableCellElementRowSpan :: Int64 -> IO ([Char], GValue)+constructDOMHTMLTableCellElementRowSpan val = constructObjectPropertyInt64 "row-span" val++data DOMHTMLTableCellElementRowSpanPropertyInfo+instance AttrInfo DOMHTMLTableCellElementRowSpanPropertyInfo where+ type AttrAllowedOps DOMHTMLTableCellElementRowSpanPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableCellElementRowSpanPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLTableCellElementRowSpanPropertyInfo = DOMHTMLTableCellElementK+ type AttrGetType DOMHTMLTableCellElementRowSpanPropertyInfo = Int64+ type AttrLabel DOMHTMLTableCellElementRowSpanPropertyInfo = "DOMHTMLTableCellElement::row-span"+ attrGet _ = getDOMHTMLTableCellElementRowSpan+ attrSet _ = setDOMHTMLTableCellElementRowSpan+ attrConstruct _ = constructDOMHTMLTableCellElementRowSpan++-- VVV Prop "scope"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableCellElementScope :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> m T.Text+getDOMHTMLTableCellElementScope obj = liftIO $ getObjectPropertyString obj "scope"++setDOMHTMLTableCellElementScope :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> T.Text -> m ()+setDOMHTMLTableCellElementScope obj val = liftIO $ setObjectPropertyString obj "scope" val++constructDOMHTMLTableCellElementScope :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableCellElementScope val = constructObjectPropertyString "scope" val++data DOMHTMLTableCellElementScopePropertyInfo+instance AttrInfo DOMHTMLTableCellElementScopePropertyInfo where+ type AttrAllowedOps DOMHTMLTableCellElementScopePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableCellElementScopePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableCellElementScopePropertyInfo = DOMHTMLTableCellElementK+ type AttrGetType DOMHTMLTableCellElementScopePropertyInfo = T.Text+ type AttrLabel DOMHTMLTableCellElementScopePropertyInfo = "DOMHTMLTableCellElement::scope"+ attrGet _ = getDOMHTMLTableCellElementScope+ attrSet _ = setDOMHTMLTableCellElementScope+ attrConstruct _ = constructDOMHTMLTableCellElementScope++-- VVV Prop "v-align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableCellElementVAlign :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> m T.Text+getDOMHTMLTableCellElementVAlign obj = liftIO $ getObjectPropertyString obj "v-align"++setDOMHTMLTableCellElementVAlign :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> T.Text -> m ()+setDOMHTMLTableCellElementVAlign obj val = liftIO $ setObjectPropertyString obj "v-align" val++constructDOMHTMLTableCellElementVAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableCellElementVAlign val = constructObjectPropertyString "v-align" val++data DOMHTMLTableCellElementVAlignPropertyInfo+instance AttrInfo DOMHTMLTableCellElementVAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLTableCellElementVAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableCellElementVAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableCellElementVAlignPropertyInfo = DOMHTMLTableCellElementK+ type AttrGetType DOMHTMLTableCellElementVAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableCellElementVAlignPropertyInfo = "DOMHTMLTableCellElement::v-align"+ attrGet _ = getDOMHTMLTableCellElementVAlign+ attrSet _ = setDOMHTMLTableCellElementVAlign+ attrConstruct _ = constructDOMHTMLTableCellElementVAlign++-- VVV Prop "width"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableCellElementWidth :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> m T.Text+getDOMHTMLTableCellElementWidth obj = liftIO $ getObjectPropertyString obj "width"++setDOMHTMLTableCellElementWidth :: (MonadIO m, DOMHTMLTableCellElementK o) => o -> T.Text -> m ()+setDOMHTMLTableCellElementWidth obj val = liftIO $ setObjectPropertyString obj "width" val++constructDOMHTMLTableCellElementWidth :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableCellElementWidth val = constructObjectPropertyString "width" val++data DOMHTMLTableCellElementWidthPropertyInfo+instance AttrInfo DOMHTMLTableCellElementWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLTableCellElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableCellElementWidthPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableCellElementWidthPropertyInfo = DOMHTMLTableCellElementK+ type AttrGetType DOMHTMLTableCellElementWidthPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableCellElementWidthPropertyInfo = "DOMHTMLTableCellElement::width"+ attrGet _ = getDOMHTMLTableCellElementWidth+ attrSet _ = setDOMHTMLTableCellElementWidth+ attrConstruct _ = constructDOMHTMLTableCellElementWidth++type instance AttributeList DOMHTMLTableCellElement = '[ '("abbr", DOMHTMLTableCellElementAbbrPropertyInfo), '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableCellElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("axis", DOMHTMLTableCellElementAxisPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("bg-color", DOMHTMLTableCellElementBgColorPropertyInfo), '("cell-index", DOMHTMLTableCellElementCellIndexPropertyInfo), '("ch", DOMHTMLTableCellElementChPropertyInfo), '("ch-off", DOMHTMLTableCellElementChOffPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("col-span", DOMHTMLTableCellElementColSpanPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("headers", DOMHTMLTableCellElementHeadersPropertyInfo), '("height", DOMHTMLTableCellElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("no-wrap", DOMHTMLTableCellElementNoWrapPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("row-span", DOMHTMLTableCellElementRowSpanPropertyInfo), '("scope", DOMHTMLTableCellElementScopePropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("v-align", DOMHTMLTableCellElementVAlignPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLTableCellElementWidthPropertyInfo)]++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableColElementAlign :: (MonadIO m, DOMHTMLTableColElementK o) => o -> m T.Text+getDOMHTMLTableColElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLTableColElementAlign :: (MonadIO m, DOMHTMLTableColElementK o) => o -> T.Text -> m ()+setDOMHTMLTableColElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLTableColElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableColElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLTableColElementAlignPropertyInfo+instance AttrInfo DOMHTMLTableColElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLTableColElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableColElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableColElementAlignPropertyInfo = DOMHTMLTableColElementK+ type AttrGetType DOMHTMLTableColElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableColElementAlignPropertyInfo = "DOMHTMLTableColElement::align"+ attrGet _ = getDOMHTMLTableColElementAlign+ attrSet _ = setDOMHTMLTableColElementAlign+ attrConstruct _ = constructDOMHTMLTableColElementAlign++-- VVV Prop "ch"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableColElementCh :: (MonadIO m, DOMHTMLTableColElementK o) => o -> m T.Text+getDOMHTMLTableColElementCh obj = liftIO $ getObjectPropertyString obj "ch"++setDOMHTMLTableColElementCh :: (MonadIO m, DOMHTMLTableColElementK o) => o -> T.Text -> m ()+setDOMHTMLTableColElementCh obj val = liftIO $ setObjectPropertyString obj "ch" val++constructDOMHTMLTableColElementCh :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableColElementCh val = constructObjectPropertyString "ch" val++data DOMHTMLTableColElementChPropertyInfo+instance AttrInfo DOMHTMLTableColElementChPropertyInfo where+ type AttrAllowedOps DOMHTMLTableColElementChPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableColElementChPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableColElementChPropertyInfo = DOMHTMLTableColElementK+ type AttrGetType DOMHTMLTableColElementChPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableColElementChPropertyInfo = "DOMHTMLTableColElement::ch"+ attrGet _ = getDOMHTMLTableColElementCh+ attrSet _ = setDOMHTMLTableColElementCh+ attrConstruct _ = constructDOMHTMLTableColElementCh++-- VVV Prop "ch-off"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableColElementChOff :: (MonadIO m, DOMHTMLTableColElementK o) => o -> m T.Text+getDOMHTMLTableColElementChOff obj = liftIO $ getObjectPropertyString obj "ch-off"++setDOMHTMLTableColElementChOff :: (MonadIO m, DOMHTMLTableColElementK o) => o -> T.Text -> m ()+setDOMHTMLTableColElementChOff obj val = liftIO $ setObjectPropertyString obj "ch-off" val++constructDOMHTMLTableColElementChOff :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableColElementChOff val = constructObjectPropertyString "ch-off" val++data DOMHTMLTableColElementChOffPropertyInfo+instance AttrInfo DOMHTMLTableColElementChOffPropertyInfo where+ type AttrAllowedOps DOMHTMLTableColElementChOffPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableColElementChOffPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableColElementChOffPropertyInfo = DOMHTMLTableColElementK+ type AttrGetType DOMHTMLTableColElementChOffPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableColElementChOffPropertyInfo = "DOMHTMLTableColElement::ch-off"+ attrGet _ = getDOMHTMLTableColElementChOff+ attrSet _ = setDOMHTMLTableColElementChOff+ attrConstruct _ = constructDOMHTMLTableColElementChOff++-- VVV Prop "span"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableColElementSpan :: (MonadIO m, DOMHTMLTableColElementK o) => o -> m Int64+getDOMHTMLTableColElementSpan obj = liftIO $ getObjectPropertyInt64 obj "span"++setDOMHTMLTableColElementSpan :: (MonadIO m, DOMHTMLTableColElementK o) => o -> Int64 -> m ()+setDOMHTMLTableColElementSpan obj val = liftIO $ setObjectPropertyInt64 obj "span" val++constructDOMHTMLTableColElementSpan :: Int64 -> IO ([Char], GValue)+constructDOMHTMLTableColElementSpan val = constructObjectPropertyInt64 "span" val++data DOMHTMLTableColElementSpanPropertyInfo+instance AttrInfo DOMHTMLTableColElementSpanPropertyInfo where+ type AttrAllowedOps DOMHTMLTableColElementSpanPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableColElementSpanPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLTableColElementSpanPropertyInfo = DOMHTMLTableColElementK+ type AttrGetType DOMHTMLTableColElementSpanPropertyInfo = Int64+ type AttrLabel DOMHTMLTableColElementSpanPropertyInfo = "DOMHTMLTableColElement::span"+ attrGet _ = getDOMHTMLTableColElementSpan+ attrSet _ = setDOMHTMLTableColElementSpan+ attrConstruct _ = constructDOMHTMLTableColElementSpan++-- VVV Prop "v-align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableColElementVAlign :: (MonadIO m, DOMHTMLTableColElementK o) => o -> m T.Text+getDOMHTMLTableColElementVAlign obj = liftIO $ getObjectPropertyString obj "v-align"++setDOMHTMLTableColElementVAlign :: (MonadIO m, DOMHTMLTableColElementK o) => o -> T.Text -> m ()+setDOMHTMLTableColElementVAlign obj val = liftIO $ setObjectPropertyString obj "v-align" val++constructDOMHTMLTableColElementVAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableColElementVAlign val = constructObjectPropertyString "v-align" val++data DOMHTMLTableColElementVAlignPropertyInfo+instance AttrInfo DOMHTMLTableColElementVAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLTableColElementVAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableColElementVAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableColElementVAlignPropertyInfo = DOMHTMLTableColElementK+ type AttrGetType DOMHTMLTableColElementVAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableColElementVAlignPropertyInfo = "DOMHTMLTableColElement::v-align"+ attrGet _ = getDOMHTMLTableColElementVAlign+ attrSet _ = setDOMHTMLTableColElementVAlign+ attrConstruct _ = constructDOMHTMLTableColElementVAlign++-- VVV Prop "width"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableColElementWidth :: (MonadIO m, DOMHTMLTableColElementK o) => o -> m T.Text+getDOMHTMLTableColElementWidth obj = liftIO $ getObjectPropertyString obj "width"++setDOMHTMLTableColElementWidth :: (MonadIO m, DOMHTMLTableColElementK o) => o -> T.Text -> m ()+setDOMHTMLTableColElementWidth obj val = liftIO $ setObjectPropertyString obj "width" val++constructDOMHTMLTableColElementWidth :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableColElementWidth val = constructObjectPropertyString "width" val++data DOMHTMLTableColElementWidthPropertyInfo+instance AttrInfo DOMHTMLTableColElementWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLTableColElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableColElementWidthPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableColElementWidthPropertyInfo = DOMHTMLTableColElementK+ type AttrGetType DOMHTMLTableColElementWidthPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableColElementWidthPropertyInfo = "DOMHTMLTableColElement::width"+ attrGet _ = getDOMHTMLTableColElementWidth+ attrSet _ = setDOMHTMLTableColElementWidth+ attrConstruct _ = constructDOMHTMLTableColElementWidth++type instance AttributeList DOMHTMLTableColElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableColElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("ch", DOMHTMLTableColElementChPropertyInfo), '("ch-off", DOMHTMLTableColElementChOffPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("span", DOMHTMLTableColElementSpanPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("v-align", DOMHTMLTableColElementVAlignPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLTableColElementWidthPropertyInfo)]++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableElementAlign :: (MonadIO m, DOMHTMLTableElementK o) => o -> m T.Text+getDOMHTMLTableElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLTableElementAlign :: (MonadIO m, DOMHTMLTableElementK o) => o -> T.Text -> m ()+setDOMHTMLTableElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLTableElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLTableElementAlignPropertyInfo+instance AttrInfo DOMHTMLTableElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLTableElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableElementAlignPropertyInfo = DOMHTMLTableElementK+ type AttrGetType DOMHTMLTableElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableElementAlignPropertyInfo = "DOMHTMLTableElement::align"+ attrGet _ = getDOMHTMLTableElementAlign+ attrSet _ = setDOMHTMLTableElementAlign+ attrConstruct _ = constructDOMHTMLTableElementAlign++-- VVV Prop "bg-color"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableElementBgColor :: (MonadIO m, DOMHTMLTableElementK o) => o -> m T.Text+getDOMHTMLTableElementBgColor obj = liftIO $ getObjectPropertyString obj "bg-color"++setDOMHTMLTableElementBgColor :: (MonadIO m, DOMHTMLTableElementK o) => o -> T.Text -> m ()+setDOMHTMLTableElementBgColor obj val = liftIO $ setObjectPropertyString obj "bg-color" val++constructDOMHTMLTableElementBgColor :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableElementBgColor val = constructObjectPropertyString "bg-color" val++data DOMHTMLTableElementBgColorPropertyInfo+instance AttrInfo DOMHTMLTableElementBgColorPropertyInfo where+ type AttrAllowedOps DOMHTMLTableElementBgColorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableElementBgColorPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableElementBgColorPropertyInfo = DOMHTMLTableElementK+ type AttrGetType DOMHTMLTableElementBgColorPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableElementBgColorPropertyInfo = "DOMHTMLTableElement::bg-color"+ attrGet _ = getDOMHTMLTableElementBgColor+ attrSet _ = setDOMHTMLTableElementBgColor+ attrConstruct _ = constructDOMHTMLTableElementBgColor++-- VVV Prop "border"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableElementBorder :: (MonadIO m, DOMHTMLTableElementK o) => o -> m T.Text+getDOMHTMLTableElementBorder obj = liftIO $ getObjectPropertyString obj "border"++setDOMHTMLTableElementBorder :: (MonadIO m, DOMHTMLTableElementK o) => o -> T.Text -> m ()+setDOMHTMLTableElementBorder obj val = liftIO $ setObjectPropertyString obj "border" val++constructDOMHTMLTableElementBorder :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableElementBorder val = constructObjectPropertyString "border" val++data DOMHTMLTableElementBorderPropertyInfo+instance AttrInfo DOMHTMLTableElementBorderPropertyInfo where+ type AttrAllowedOps DOMHTMLTableElementBorderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableElementBorderPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableElementBorderPropertyInfo = DOMHTMLTableElementK+ type AttrGetType DOMHTMLTableElementBorderPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableElementBorderPropertyInfo = "DOMHTMLTableElement::border"+ attrGet _ = getDOMHTMLTableElementBorder+ attrSet _ = setDOMHTMLTableElementBorder+ attrConstruct _ = constructDOMHTMLTableElementBorder++-- VVV Prop "caption"+ -- Type: TInterface "WebKit" "DOMHTMLTableCaptionElement"+ -- Flags: [PropertyReadable]++getDOMHTMLTableElementCaption :: (MonadIO m, DOMHTMLTableElementK o) => o -> m DOMHTMLTableCaptionElement+getDOMHTMLTableElementCaption obj = liftIO $ getObjectPropertyObject obj "caption" DOMHTMLTableCaptionElement++data DOMHTMLTableElementCaptionPropertyInfo+instance AttrInfo DOMHTMLTableElementCaptionPropertyInfo where+ type AttrAllowedOps DOMHTMLTableElementCaptionPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableElementCaptionPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTableElementCaptionPropertyInfo = DOMHTMLTableElementK+ type AttrGetType DOMHTMLTableElementCaptionPropertyInfo = DOMHTMLTableCaptionElement+ type AttrLabel DOMHTMLTableElementCaptionPropertyInfo = "DOMHTMLTableElement::caption"+ attrGet _ = getDOMHTMLTableElementCaption+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "cell-padding"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableElementCellPadding :: (MonadIO m, DOMHTMLTableElementK o) => o -> m T.Text+getDOMHTMLTableElementCellPadding obj = liftIO $ getObjectPropertyString obj "cell-padding"++setDOMHTMLTableElementCellPadding :: (MonadIO m, DOMHTMLTableElementK o) => o -> T.Text -> m ()+setDOMHTMLTableElementCellPadding obj val = liftIO $ setObjectPropertyString obj "cell-padding" val++constructDOMHTMLTableElementCellPadding :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableElementCellPadding val = constructObjectPropertyString "cell-padding" val++data DOMHTMLTableElementCellPaddingPropertyInfo+instance AttrInfo DOMHTMLTableElementCellPaddingPropertyInfo where+ type AttrAllowedOps DOMHTMLTableElementCellPaddingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableElementCellPaddingPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableElementCellPaddingPropertyInfo = DOMHTMLTableElementK+ type AttrGetType DOMHTMLTableElementCellPaddingPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableElementCellPaddingPropertyInfo = "DOMHTMLTableElement::cell-padding"+ attrGet _ = getDOMHTMLTableElementCellPadding+ attrSet _ = setDOMHTMLTableElementCellPadding+ attrConstruct _ = constructDOMHTMLTableElementCellPadding++-- VVV Prop "cell-spacing"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableElementCellSpacing :: (MonadIO m, DOMHTMLTableElementK o) => o -> m T.Text+getDOMHTMLTableElementCellSpacing obj = liftIO $ getObjectPropertyString obj "cell-spacing"++setDOMHTMLTableElementCellSpacing :: (MonadIO m, DOMHTMLTableElementK o) => o -> T.Text -> m ()+setDOMHTMLTableElementCellSpacing obj val = liftIO $ setObjectPropertyString obj "cell-spacing" val++constructDOMHTMLTableElementCellSpacing :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableElementCellSpacing val = constructObjectPropertyString "cell-spacing" val++data DOMHTMLTableElementCellSpacingPropertyInfo+instance AttrInfo DOMHTMLTableElementCellSpacingPropertyInfo where+ type AttrAllowedOps DOMHTMLTableElementCellSpacingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableElementCellSpacingPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableElementCellSpacingPropertyInfo = DOMHTMLTableElementK+ type AttrGetType DOMHTMLTableElementCellSpacingPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableElementCellSpacingPropertyInfo = "DOMHTMLTableElement::cell-spacing"+ attrGet _ = getDOMHTMLTableElementCellSpacing+ attrSet _ = setDOMHTMLTableElementCellSpacing+ attrConstruct _ = constructDOMHTMLTableElementCellSpacing++-- VVV Prop "frame"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableElementFrame :: (MonadIO m, DOMHTMLTableElementK o) => o -> m T.Text+getDOMHTMLTableElementFrame obj = liftIO $ getObjectPropertyString obj "frame"++setDOMHTMLTableElementFrame :: (MonadIO m, DOMHTMLTableElementK o) => o -> T.Text -> m ()+setDOMHTMLTableElementFrame obj val = liftIO $ setObjectPropertyString obj "frame" val++constructDOMHTMLTableElementFrame :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableElementFrame val = constructObjectPropertyString "frame" val++data DOMHTMLTableElementFramePropertyInfo+instance AttrInfo DOMHTMLTableElementFramePropertyInfo where+ type AttrAllowedOps DOMHTMLTableElementFramePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableElementFramePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableElementFramePropertyInfo = DOMHTMLTableElementK+ type AttrGetType DOMHTMLTableElementFramePropertyInfo = T.Text+ type AttrLabel DOMHTMLTableElementFramePropertyInfo = "DOMHTMLTableElement::frame"+ attrGet _ = getDOMHTMLTableElementFrame+ attrSet _ = setDOMHTMLTableElementFrame+ attrConstruct _ = constructDOMHTMLTableElementFrame++-- VVV Prop "rows"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMHTMLTableElementRows :: (MonadIO m, DOMHTMLTableElementK o) => o -> m DOMHTMLCollection+getDOMHTMLTableElementRows obj = liftIO $ getObjectPropertyObject obj "rows" DOMHTMLCollection++data DOMHTMLTableElementRowsPropertyInfo+instance AttrInfo DOMHTMLTableElementRowsPropertyInfo where+ type AttrAllowedOps DOMHTMLTableElementRowsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableElementRowsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTableElementRowsPropertyInfo = DOMHTMLTableElementK+ type AttrGetType DOMHTMLTableElementRowsPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMHTMLTableElementRowsPropertyInfo = "DOMHTMLTableElement::rows"+ attrGet _ = getDOMHTMLTableElementRows+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "rules"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableElementRules :: (MonadIO m, DOMHTMLTableElementK o) => o -> m T.Text+getDOMHTMLTableElementRules obj = liftIO $ getObjectPropertyString obj "rules"++setDOMHTMLTableElementRules :: (MonadIO m, DOMHTMLTableElementK o) => o -> T.Text -> m ()+setDOMHTMLTableElementRules obj val = liftIO $ setObjectPropertyString obj "rules" val++constructDOMHTMLTableElementRules :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableElementRules val = constructObjectPropertyString "rules" val++data DOMHTMLTableElementRulesPropertyInfo+instance AttrInfo DOMHTMLTableElementRulesPropertyInfo where+ type AttrAllowedOps DOMHTMLTableElementRulesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableElementRulesPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableElementRulesPropertyInfo = DOMHTMLTableElementK+ type AttrGetType DOMHTMLTableElementRulesPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableElementRulesPropertyInfo = "DOMHTMLTableElement::rules"+ attrGet _ = getDOMHTMLTableElementRules+ attrSet _ = setDOMHTMLTableElementRules+ attrConstruct _ = constructDOMHTMLTableElementRules++-- VVV Prop "summary"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableElementSummary :: (MonadIO m, DOMHTMLTableElementK o) => o -> m T.Text+getDOMHTMLTableElementSummary obj = liftIO $ getObjectPropertyString obj "summary"++setDOMHTMLTableElementSummary :: (MonadIO m, DOMHTMLTableElementK o) => o -> T.Text -> m ()+setDOMHTMLTableElementSummary obj val = liftIO $ setObjectPropertyString obj "summary" val++constructDOMHTMLTableElementSummary :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableElementSummary val = constructObjectPropertyString "summary" val++data DOMHTMLTableElementSummaryPropertyInfo+instance AttrInfo DOMHTMLTableElementSummaryPropertyInfo where+ type AttrAllowedOps DOMHTMLTableElementSummaryPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableElementSummaryPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableElementSummaryPropertyInfo = DOMHTMLTableElementK+ type AttrGetType DOMHTMLTableElementSummaryPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableElementSummaryPropertyInfo = "DOMHTMLTableElement::summary"+ attrGet _ = getDOMHTMLTableElementSummary+ attrSet _ = setDOMHTMLTableElementSummary+ attrConstruct _ = constructDOMHTMLTableElementSummary++-- VVV Prop "t-bodies"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMHTMLTableElementTBodies :: (MonadIO m, DOMHTMLTableElementK o) => o -> m DOMHTMLCollection+getDOMHTMLTableElementTBodies obj = liftIO $ getObjectPropertyObject obj "t-bodies" DOMHTMLCollection++data DOMHTMLTableElementTBodiesPropertyInfo+instance AttrInfo DOMHTMLTableElementTBodiesPropertyInfo where+ type AttrAllowedOps DOMHTMLTableElementTBodiesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableElementTBodiesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTableElementTBodiesPropertyInfo = DOMHTMLTableElementK+ type AttrGetType DOMHTMLTableElementTBodiesPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMHTMLTableElementTBodiesPropertyInfo = "DOMHTMLTableElement::t-bodies"+ attrGet _ = getDOMHTMLTableElementTBodies+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "t-foot"+ -- Type: TInterface "WebKit" "DOMHTMLTableSectionElement"+ -- Flags: [PropertyReadable]++getDOMHTMLTableElementTFoot :: (MonadIO m, DOMHTMLTableElementK o) => o -> m DOMHTMLTableSectionElement+getDOMHTMLTableElementTFoot obj = liftIO $ getObjectPropertyObject obj "t-foot" DOMHTMLTableSectionElement++data DOMHTMLTableElementTFootPropertyInfo+instance AttrInfo DOMHTMLTableElementTFootPropertyInfo where+ type AttrAllowedOps DOMHTMLTableElementTFootPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableElementTFootPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTableElementTFootPropertyInfo = DOMHTMLTableElementK+ type AttrGetType DOMHTMLTableElementTFootPropertyInfo = DOMHTMLTableSectionElement+ type AttrLabel DOMHTMLTableElementTFootPropertyInfo = "DOMHTMLTableElement::t-foot"+ attrGet _ = getDOMHTMLTableElementTFoot+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "t-head"+ -- Type: TInterface "WebKit" "DOMHTMLTableSectionElement"+ -- Flags: [PropertyReadable]++getDOMHTMLTableElementTHead :: (MonadIO m, DOMHTMLTableElementK o) => o -> m DOMHTMLTableSectionElement+getDOMHTMLTableElementTHead obj = liftIO $ getObjectPropertyObject obj "t-head" DOMHTMLTableSectionElement++data DOMHTMLTableElementTHeadPropertyInfo+instance AttrInfo DOMHTMLTableElementTHeadPropertyInfo where+ type AttrAllowedOps DOMHTMLTableElementTHeadPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableElementTHeadPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTableElementTHeadPropertyInfo = DOMHTMLTableElementK+ type AttrGetType DOMHTMLTableElementTHeadPropertyInfo = DOMHTMLTableSectionElement+ type AttrLabel DOMHTMLTableElementTHeadPropertyInfo = "DOMHTMLTableElement::t-head"+ attrGet _ = getDOMHTMLTableElementTHead+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "width"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableElementWidth :: (MonadIO m, DOMHTMLTableElementK o) => o -> m T.Text+getDOMHTMLTableElementWidth obj = liftIO $ getObjectPropertyString obj "width"++setDOMHTMLTableElementWidth :: (MonadIO m, DOMHTMLTableElementK o) => o -> T.Text -> m ()+setDOMHTMLTableElementWidth obj val = liftIO $ setObjectPropertyString obj "width" val++constructDOMHTMLTableElementWidth :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableElementWidth val = constructObjectPropertyString "width" val++data DOMHTMLTableElementWidthPropertyInfo+instance AttrInfo DOMHTMLTableElementWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLTableElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableElementWidthPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableElementWidthPropertyInfo = DOMHTMLTableElementK+ type AttrGetType DOMHTMLTableElementWidthPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableElementWidthPropertyInfo = "DOMHTMLTableElement::width"+ attrGet _ = getDOMHTMLTableElementWidth+ attrSet _ = setDOMHTMLTableElementWidth+ attrConstruct _ = constructDOMHTMLTableElementWidth++type instance AttributeList DOMHTMLTableElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("bg-color", DOMHTMLTableElementBgColorPropertyInfo), '("border", DOMHTMLTableElementBorderPropertyInfo), '("caption", DOMHTMLTableElementCaptionPropertyInfo), '("cell-padding", DOMHTMLTableElementCellPaddingPropertyInfo), '("cell-spacing", DOMHTMLTableElementCellSpacingPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("frame", DOMHTMLTableElementFramePropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("rows", DOMHTMLTableElementRowsPropertyInfo), '("rules", DOMHTMLTableElementRulesPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("summary", DOMHTMLTableElementSummaryPropertyInfo), '("t-bodies", DOMHTMLTableElementTBodiesPropertyInfo), '("t-foot", DOMHTMLTableElementTFootPropertyInfo), '("t-head", DOMHTMLTableElementTHeadPropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLTableElementWidthPropertyInfo)]++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableRowElementAlign :: (MonadIO m, DOMHTMLTableRowElementK o) => o -> m T.Text+getDOMHTMLTableRowElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLTableRowElementAlign :: (MonadIO m, DOMHTMLTableRowElementK o) => o -> T.Text -> m ()+setDOMHTMLTableRowElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLTableRowElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableRowElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLTableRowElementAlignPropertyInfo+instance AttrInfo DOMHTMLTableRowElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLTableRowElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableRowElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableRowElementAlignPropertyInfo = DOMHTMLTableRowElementK+ type AttrGetType DOMHTMLTableRowElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableRowElementAlignPropertyInfo = "DOMHTMLTableRowElement::align"+ attrGet _ = getDOMHTMLTableRowElementAlign+ attrSet _ = setDOMHTMLTableRowElementAlign+ attrConstruct _ = constructDOMHTMLTableRowElementAlign++-- VVV Prop "bg-color"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableRowElementBgColor :: (MonadIO m, DOMHTMLTableRowElementK o) => o -> m T.Text+getDOMHTMLTableRowElementBgColor obj = liftIO $ getObjectPropertyString obj "bg-color"++setDOMHTMLTableRowElementBgColor :: (MonadIO m, DOMHTMLTableRowElementK o) => o -> T.Text -> m ()+setDOMHTMLTableRowElementBgColor obj val = liftIO $ setObjectPropertyString obj "bg-color" val++constructDOMHTMLTableRowElementBgColor :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableRowElementBgColor val = constructObjectPropertyString "bg-color" val++data DOMHTMLTableRowElementBgColorPropertyInfo+instance AttrInfo DOMHTMLTableRowElementBgColorPropertyInfo where+ type AttrAllowedOps DOMHTMLTableRowElementBgColorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableRowElementBgColorPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableRowElementBgColorPropertyInfo = DOMHTMLTableRowElementK+ type AttrGetType DOMHTMLTableRowElementBgColorPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableRowElementBgColorPropertyInfo = "DOMHTMLTableRowElement::bg-color"+ attrGet _ = getDOMHTMLTableRowElementBgColor+ attrSet _ = setDOMHTMLTableRowElementBgColor+ attrConstruct _ = constructDOMHTMLTableRowElementBgColor++-- VVV Prop "cells"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMHTMLTableRowElementCells :: (MonadIO m, DOMHTMLTableRowElementK o) => o -> m DOMHTMLCollection+getDOMHTMLTableRowElementCells obj = liftIO $ getObjectPropertyObject obj "cells" DOMHTMLCollection++data DOMHTMLTableRowElementCellsPropertyInfo+instance AttrInfo DOMHTMLTableRowElementCellsPropertyInfo where+ type AttrAllowedOps DOMHTMLTableRowElementCellsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableRowElementCellsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTableRowElementCellsPropertyInfo = DOMHTMLTableRowElementK+ type AttrGetType DOMHTMLTableRowElementCellsPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMHTMLTableRowElementCellsPropertyInfo = "DOMHTMLTableRowElement::cells"+ attrGet _ = getDOMHTMLTableRowElementCells+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "ch"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableRowElementCh :: (MonadIO m, DOMHTMLTableRowElementK o) => o -> m T.Text+getDOMHTMLTableRowElementCh obj = liftIO $ getObjectPropertyString obj "ch"++setDOMHTMLTableRowElementCh :: (MonadIO m, DOMHTMLTableRowElementK o) => o -> T.Text -> m ()+setDOMHTMLTableRowElementCh obj val = liftIO $ setObjectPropertyString obj "ch" val++constructDOMHTMLTableRowElementCh :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableRowElementCh val = constructObjectPropertyString "ch" val++data DOMHTMLTableRowElementChPropertyInfo+instance AttrInfo DOMHTMLTableRowElementChPropertyInfo where+ type AttrAllowedOps DOMHTMLTableRowElementChPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableRowElementChPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableRowElementChPropertyInfo = DOMHTMLTableRowElementK+ type AttrGetType DOMHTMLTableRowElementChPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableRowElementChPropertyInfo = "DOMHTMLTableRowElement::ch"+ attrGet _ = getDOMHTMLTableRowElementCh+ attrSet _ = setDOMHTMLTableRowElementCh+ attrConstruct _ = constructDOMHTMLTableRowElementCh++-- VVV Prop "ch-off"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableRowElementChOff :: (MonadIO m, DOMHTMLTableRowElementK o) => o -> m T.Text+getDOMHTMLTableRowElementChOff obj = liftIO $ getObjectPropertyString obj "ch-off"++setDOMHTMLTableRowElementChOff :: (MonadIO m, DOMHTMLTableRowElementK o) => o -> T.Text -> m ()+setDOMHTMLTableRowElementChOff obj val = liftIO $ setObjectPropertyString obj "ch-off" val++constructDOMHTMLTableRowElementChOff :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableRowElementChOff val = constructObjectPropertyString "ch-off" val++data DOMHTMLTableRowElementChOffPropertyInfo+instance AttrInfo DOMHTMLTableRowElementChOffPropertyInfo where+ type AttrAllowedOps DOMHTMLTableRowElementChOffPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableRowElementChOffPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableRowElementChOffPropertyInfo = DOMHTMLTableRowElementK+ type AttrGetType DOMHTMLTableRowElementChOffPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableRowElementChOffPropertyInfo = "DOMHTMLTableRowElement::ch-off"+ attrGet _ = getDOMHTMLTableRowElementChOff+ attrSet _ = setDOMHTMLTableRowElementChOff+ attrConstruct _ = constructDOMHTMLTableRowElementChOff++-- VVV Prop "row-index"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMHTMLTableRowElementRowIndex :: (MonadIO m, DOMHTMLTableRowElementK o) => o -> m Int64+getDOMHTMLTableRowElementRowIndex obj = liftIO $ getObjectPropertyInt64 obj "row-index"++data DOMHTMLTableRowElementRowIndexPropertyInfo+instance AttrInfo DOMHTMLTableRowElementRowIndexPropertyInfo where+ type AttrAllowedOps DOMHTMLTableRowElementRowIndexPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableRowElementRowIndexPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTableRowElementRowIndexPropertyInfo = DOMHTMLTableRowElementK+ type AttrGetType DOMHTMLTableRowElementRowIndexPropertyInfo = Int64+ type AttrLabel DOMHTMLTableRowElementRowIndexPropertyInfo = "DOMHTMLTableRowElement::row-index"+ attrGet _ = getDOMHTMLTableRowElementRowIndex+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "section-row-index"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMHTMLTableRowElementSectionRowIndex :: (MonadIO m, DOMHTMLTableRowElementK o) => o -> m Int64+getDOMHTMLTableRowElementSectionRowIndex obj = liftIO $ getObjectPropertyInt64 obj "section-row-index"++data DOMHTMLTableRowElementSectionRowIndexPropertyInfo+instance AttrInfo DOMHTMLTableRowElementSectionRowIndexPropertyInfo where+ type AttrAllowedOps DOMHTMLTableRowElementSectionRowIndexPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableRowElementSectionRowIndexPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTableRowElementSectionRowIndexPropertyInfo = DOMHTMLTableRowElementK+ type AttrGetType DOMHTMLTableRowElementSectionRowIndexPropertyInfo = Int64+ type AttrLabel DOMHTMLTableRowElementSectionRowIndexPropertyInfo = "DOMHTMLTableRowElement::section-row-index"+ attrGet _ = getDOMHTMLTableRowElementSectionRowIndex+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "v-align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableRowElementVAlign :: (MonadIO m, DOMHTMLTableRowElementK o) => o -> m T.Text+getDOMHTMLTableRowElementVAlign obj = liftIO $ getObjectPropertyString obj "v-align"++setDOMHTMLTableRowElementVAlign :: (MonadIO m, DOMHTMLTableRowElementK o) => o -> T.Text -> m ()+setDOMHTMLTableRowElementVAlign obj val = liftIO $ setObjectPropertyString obj "v-align" val++constructDOMHTMLTableRowElementVAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableRowElementVAlign val = constructObjectPropertyString "v-align" val++data DOMHTMLTableRowElementVAlignPropertyInfo+instance AttrInfo DOMHTMLTableRowElementVAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLTableRowElementVAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableRowElementVAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableRowElementVAlignPropertyInfo = DOMHTMLTableRowElementK+ type AttrGetType DOMHTMLTableRowElementVAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableRowElementVAlignPropertyInfo = "DOMHTMLTableRowElement::v-align"+ attrGet _ = getDOMHTMLTableRowElementVAlign+ attrSet _ = setDOMHTMLTableRowElementVAlign+ attrConstruct _ = constructDOMHTMLTableRowElementVAlign++type instance AttributeList DOMHTMLTableRowElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableRowElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("bg-color", DOMHTMLTableRowElementBgColorPropertyInfo), '("cells", DOMHTMLTableRowElementCellsPropertyInfo), '("ch", DOMHTMLTableRowElementChPropertyInfo), '("ch-off", DOMHTMLTableRowElementChOffPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("row-index", DOMHTMLTableRowElementRowIndexPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("section-row-index", DOMHTMLTableRowElementSectionRowIndexPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("v-align", DOMHTMLTableRowElementVAlignPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableSectionElementAlign :: (MonadIO m, DOMHTMLTableSectionElementK o) => o -> m T.Text+getDOMHTMLTableSectionElementAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMHTMLTableSectionElementAlign :: (MonadIO m, DOMHTMLTableSectionElementK o) => o -> T.Text -> m ()+setDOMHTMLTableSectionElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMHTMLTableSectionElementAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableSectionElementAlign val = constructObjectPropertyString "align" val++data DOMHTMLTableSectionElementAlignPropertyInfo+instance AttrInfo DOMHTMLTableSectionElementAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLTableSectionElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableSectionElementAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableSectionElementAlignPropertyInfo = DOMHTMLTableSectionElementK+ type AttrGetType DOMHTMLTableSectionElementAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableSectionElementAlignPropertyInfo = "DOMHTMLTableSectionElement::align"+ attrGet _ = getDOMHTMLTableSectionElementAlign+ attrSet _ = setDOMHTMLTableSectionElementAlign+ attrConstruct _ = constructDOMHTMLTableSectionElementAlign++-- VVV Prop "ch"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableSectionElementCh :: (MonadIO m, DOMHTMLTableSectionElementK o) => o -> m T.Text+getDOMHTMLTableSectionElementCh obj = liftIO $ getObjectPropertyString obj "ch"++setDOMHTMLTableSectionElementCh :: (MonadIO m, DOMHTMLTableSectionElementK o) => o -> T.Text -> m ()+setDOMHTMLTableSectionElementCh obj val = liftIO $ setObjectPropertyString obj "ch" val++constructDOMHTMLTableSectionElementCh :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableSectionElementCh val = constructObjectPropertyString "ch" val++data DOMHTMLTableSectionElementChPropertyInfo+instance AttrInfo DOMHTMLTableSectionElementChPropertyInfo where+ type AttrAllowedOps DOMHTMLTableSectionElementChPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableSectionElementChPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableSectionElementChPropertyInfo = DOMHTMLTableSectionElementK+ type AttrGetType DOMHTMLTableSectionElementChPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableSectionElementChPropertyInfo = "DOMHTMLTableSectionElement::ch"+ attrGet _ = getDOMHTMLTableSectionElementCh+ attrSet _ = setDOMHTMLTableSectionElementCh+ attrConstruct _ = constructDOMHTMLTableSectionElementCh++-- VVV Prop "ch-off"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableSectionElementChOff :: (MonadIO m, DOMHTMLTableSectionElementK o) => o -> m T.Text+getDOMHTMLTableSectionElementChOff obj = liftIO $ getObjectPropertyString obj "ch-off"++setDOMHTMLTableSectionElementChOff :: (MonadIO m, DOMHTMLTableSectionElementK o) => o -> T.Text -> m ()+setDOMHTMLTableSectionElementChOff obj val = liftIO $ setObjectPropertyString obj "ch-off" val++constructDOMHTMLTableSectionElementChOff :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableSectionElementChOff val = constructObjectPropertyString "ch-off" val++data DOMHTMLTableSectionElementChOffPropertyInfo+instance AttrInfo DOMHTMLTableSectionElementChOffPropertyInfo where+ type AttrAllowedOps DOMHTMLTableSectionElementChOffPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableSectionElementChOffPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableSectionElementChOffPropertyInfo = DOMHTMLTableSectionElementK+ type AttrGetType DOMHTMLTableSectionElementChOffPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableSectionElementChOffPropertyInfo = "DOMHTMLTableSectionElement::ch-off"+ attrGet _ = getDOMHTMLTableSectionElementChOff+ attrSet _ = setDOMHTMLTableSectionElementChOff+ attrConstruct _ = constructDOMHTMLTableSectionElementChOff++-- VVV Prop "rows"+ -- Type: TInterface "WebKit" "DOMHTMLCollection"+ -- Flags: [PropertyReadable]++getDOMHTMLTableSectionElementRows :: (MonadIO m, DOMHTMLTableSectionElementK o) => o -> m DOMHTMLCollection+getDOMHTMLTableSectionElementRows obj = liftIO $ getObjectPropertyObject obj "rows" DOMHTMLCollection++data DOMHTMLTableSectionElementRowsPropertyInfo+instance AttrInfo DOMHTMLTableSectionElementRowsPropertyInfo where+ type AttrAllowedOps DOMHTMLTableSectionElementRowsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableSectionElementRowsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTableSectionElementRowsPropertyInfo = DOMHTMLTableSectionElementK+ type AttrGetType DOMHTMLTableSectionElementRowsPropertyInfo = DOMHTMLCollection+ type AttrLabel DOMHTMLTableSectionElementRowsPropertyInfo = "DOMHTMLTableSectionElement::rows"+ attrGet _ = getDOMHTMLTableSectionElementRows+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "v-align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTableSectionElementVAlign :: (MonadIO m, DOMHTMLTableSectionElementK o) => o -> m T.Text+getDOMHTMLTableSectionElementVAlign obj = liftIO $ getObjectPropertyString obj "v-align"++setDOMHTMLTableSectionElementVAlign :: (MonadIO m, DOMHTMLTableSectionElementK o) => o -> T.Text -> m ()+setDOMHTMLTableSectionElementVAlign obj val = liftIO $ setObjectPropertyString obj "v-align" val++constructDOMHTMLTableSectionElementVAlign :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTableSectionElementVAlign val = constructObjectPropertyString "v-align" val++data DOMHTMLTableSectionElementVAlignPropertyInfo+instance AttrInfo DOMHTMLTableSectionElementVAlignPropertyInfo where+ type AttrAllowedOps DOMHTMLTableSectionElementVAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTableSectionElementVAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTableSectionElementVAlignPropertyInfo = DOMHTMLTableSectionElementK+ type AttrGetType DOMHTMLTableSectionElementVAlignPropertyInfo = T.Text+ type AttrLabel DOMHTMLTableSectionElementVAlignPropertyInfo = "DOMHTMLTableSectionElement::v-align"+ attrGet _ = getDOMHTMLTableSectionElementVAlign+ attrSet _ = setDOMHTMLTableSectionElementVAlign+ attrConstruct _ = constructDOMHTMLTableSectionElementVAlign++type instance AttributeList DOMHTMLTableSectionElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableSectionElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("ch", DOMHTMLTableSectionElementChPropertyInfo), '("ch-off", DOMHTMLTableSectionElementChOffPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("rows", DOMHTMLTableSectionElementRowsPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("v-align", DOMHTMLTableSectionElementVAlignPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "autocapitalize"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementAutocapitalize :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m T.Text+getDOMHTMLTextAreaElementAutocapitalize obj = liftIO $ getObjectPropertyString obj "autocapitalize"++setDOMHTMLTextAreaElementAutocapitalize :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> T.Text -> m ()+setDOMHTMLTextAreaElementAutocapitalize obj val = liftIO $ setObjectPropertyString obj "autocapitalize" val++constructDOMHTMLTextAreaElementAutocapitalize :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementAutocapitalize val = constructObjectPropertyString "autocapitalize" val++data DOMHTMLTextAreaElementAutocapitalizePropertyInfo+instance AttrInfo DOMHTMLTextAreaElementAutocapitalizePropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementAutocapitalizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementAutocapitalizePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementAutocapitalizePropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementAutocapitalizePropertyInfo = T.Text+ type AttrLabel DOMHTMLTextAreaElementAutocapitalizePropertyInfo = "DOMHTMLTextAreaElement::autocapitalize"+ attrGet _ = getDOMHTMLTextAreaElementAutocapitalize+ attrSet _ = setDOMHTMLTextAreaElementAutocapitalize+ attrConstruct _ = constructDOMHTMLTextAreaElementAutocapitalize++-- VVV Prop "autocorrect"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementAutocorrect :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m Bool+getDOMHTMLTextAreaElementAutocorrect obj = liftIO $ getObjectPropertyBool obj "autocorrect"++setDOMHTMLTextAreaElementAutocorrect :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> Bool -> m ()+setDOMHTMLTextAreaElementAutocorrect obj val = liftIO $ setObjectPropertyBool obj "autocorrect" val++constructDOMHTMLTextAreaElementAutocorrect :: Bool -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementAutocorrect val = constructObjectPropertyBool "autocorrect" val++data DOMHTMLTextAreaElementAutocorrectPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementAutocorrectPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementAutocorrectPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementAutocorrectPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementAutocorrectPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementAutocorrectPropertyInfo = Bool+ type AttrLabel DOMHTMLTextAreaElementAutocorrectPropertyInfo = "DOMHTMLTextAreaElement::autocorrect"+ attrGet _ = getDOMHTMLTextAreaElementAutocorrect+ attrSet _ = setDOMHTMLTextAreaElementAutocorrect+ attrConstruct _ = constructDOMHTMLTextAreaElementAutocorrect++-- VVV Prop "autofocus"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementAutofocus :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m Bool+getDOMHTMLTextAreaElementAutofocus obj = liftIO $ getObjectPropertyBool obj "autofocus"++setDOMHTMLTextAreaElementAutofocus :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> Bool -> m ()+setDOMHTMLTextAreaElementAutofocus obj val = liftIO $ setObjectPropertyBool obj "autofocus" val++constructDOMHTMLTextAreaElementAutofocus :: Bool -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementAutofocus val = constructObjectPropertyBool "autofocus" val++data DOMHTMLTextAreaElementAutofocusPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementAutofocusPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementAutofocusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementAutofocusPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementAutofocusPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementAutofocusPropertyInfo = Bool+ type AttrLabel DOMHTMLTextAreaElementAutofocusPropertyInfo = "DOMHTMLTextAreaElement::autofocus"+ attrGet _ = getDOMHTMLTextAreaElementAutofocus+ attrSet _ = setDOMHTMLTextAreaElementAutofocus+ attrConstruct _ = constructDOMHTMLTextAreaElementAutofocus++-- VVV Prop "cols"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementCols :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m Int64+getDOMHTMLTextAreaElementCols obj = liftIO $ getObjectPropertyInt64 obj "cols"++setDOMHTMLTextAreaElementCols :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> Int64 -> m ()+setDOMHTMLTextAreaElementCols obj val = liftIO $ setObjectPropertyInt64 obj "cols" val++constructDOMHTMLTextAreaElementCols :: Int64 -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementCols val = constructObjectPropertyInt64 "cols" val++data DOMHTMLTextAreaElementColsPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementColsPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementColsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementColsPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementColsPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementColsPropertyInfo = Int64+ type AttrLabel DOMHTMLTextAreaElementColsPropertyInfo = "DOMHTMLTextAreaElement::cols"+ attrGet _ = getDOMHTMLTextAreaElementCols+ attrSet _ = setDOMHTMLTextAreaElementCols+ attrConstruct _ = constructDOMHTMLTextAreaElementCols++-- VVV Prop "default-value"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementDefaultValue :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m T.Text+getDOMHTMLTextAreaElementDefaultValue obj = liftIO $ getObjectPropertyString obj "default-value"++setDOMHTMLTextAreaElementDefaultValue :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> T.Text -> m ()+setDOMHTMLTextAreaElementDefaultValue obj val = liftIO $ setObjectPropertyString obj "default-value" val++constructDOMHTMLTextAreaElementDefaultValue :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementDefaultValue val = constructObjectPropertyString "default-value" val++data DOMHTMLTextAreaElementDefaultValuePropertyInfo+instance AttrInfo DOMHTMLTextAreaElementDefaultValuePropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementDefaultValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementDefaultValuePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementDefaultValuePropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementDefaultValuePropertyInfo = T.Text+ type AttrLabel DOMHTMLTextAreaElementDefaultValuePropertyInfo = "DOMHTMLTextAreaElement::default-value"+ attrGet _ = getDOMHTMLTextAreaElementDefaultValue+ attrSet _ = setDOMHTMLTextAreaElementDefaultValue+ attrConstruct _ = constructDOMHTMLTextAreaElementDefaultValue++-- VVV Prop "dir-name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementDirName :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m T.Text+getDOMHTMLTextAreaElementDirName obj = liftIO $ getObjectPropertyString obj "dir-name"++setDOMHTMLTextAreaElementDirName :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> T.Text -> m ()+setDOMHTMLTextAreaElementDirName obj val = liftIO $ setObjectPropertyString obj "dir-name" val++constructDOMHTMLTextAreaElementDirName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementDirName val = constructObjectPropertyString "dir-name" val++data DOMHTMLTextAreaElementDirNamePropertyInfo+instance AttrInfo DOMHTMLTextAreaElementDirNamePropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementDirNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementDirNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementDirNamePropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementDirNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLTextAreaElementDirNamePropertyInfo = "DOMHTMLTextAreaElement::dir-name"+ attrGet _ = getDOMHTMLTextAreaElementDirName+ attrSet _ = setDOMHTMLTextAreaElementDirName+ attrConstruct _ = constructDOMHTMLTextAreaElementDirName++-- VVV Prop "disabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementDisabled :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m Bool+getDOMHTMLTextAreaElementDisabled obj = liftIO $ getObjectPropertyBool obj "disabled"++setDOMHTMLTextAreaElementDisabled :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> Bool -> m ()+setDOMHTMLTextAreaElementDisabled obj val = liftIO $ setObjectPropertyBool obj "disabled" val++constructDOMHTMLTextAreaElementDisabled :: Bool -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementDisabled val = constructObjectPropertyBool "disabled" val++data DOMHTMLTextAreaElementDisabledPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementDisabledPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementDisabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementDisabledPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementDisabledPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementDisabledPropertyInfo = Bool+ type AttrLabel DOMHTMLTextAreaElementDisabledPropertyInfo = "DOMHTMLTextAreaElement::disabled"+ attrGet _ = getDOMHTMLTextAreaElementDisabled+ attrSet _ = setDOMHTMLTextAreaElementDisabled+ attrConstruct _ = constructDOMHTMLTextAreaElementDisabled++-- VVV Prop "form"+ -- Type: TInterface "WebKit" "DOMHTMLFormElement"+ -- Flags: [PropertyReadable]++getDOMHTMLTextAreaElementForm :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m DOMHTMLFormElement+getDOMHTMLTextAreaElementForm obj = liftIO $ getObjectPropertyObject obj "form" DOMHTMLFormElement++data DOMHTMLTextAreaElementFormPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementFormPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementFormPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementFormPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementFormPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementFormPropertyInfo = DOMHTMLFormElement+ type AttrLabel DOMHTMLTextAreaElementFormPropertyInfo = "DOMHTMLTextAreaElement::form"+ attrGet _ = getDOMHTMLTextAreaElementForm+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "labels"+ -- Type: TInterface "WebKit" "DOMNodeList"+ -- Flags: [PropertyReadable]++getDOMHTMLTextAreaElementLabels :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m DOMNodeList+getDOMHTMLTextAreaElementLabels obj = liftIO $ getObjectPropertyObject obj "labels" DOMNodeList++data DOMHTMLTextAreaElementLabelsPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementLabelsPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementLabelsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementLabelsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementLabelsPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementLabelsPropertyInfo = DOMNodeList+ type AttrLabel DOMHTMLTextAreaElementLabelsPropertyInfo = "DOMHTMLTextAreaElement::labels"+ attrGet _ = getDOMHTMLTextAreaElementLabels+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "max-length"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementMaxLength :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m Int64+getDOMHTMLTextAreaElementMaxLength obj = liftIO $ getObjectPropertyInt64 obj "max-length"++setDOMHTMLTextAreaElementMaxLength :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> Int64 -> m ()+setDOMHTMLTextAreaElementMaxLength obj val = liftIO $ setObjectPropertyInt64 obj "max-length" val++constructDOMHTMLTextAreaElementMaxLength :: Int64 -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementMaxLength val = constructObjectPropertyInt64 "max-length" val++data DOMHTMLTextAreaElementMaxLengthPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementMaxLengthPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementMaxLengthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementMaxLengthPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementMaxLengthPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementMaxLengthPropertyInfo = Int64+ type AttrLabel DOMHTMLTextAreaElementMaxLengthPropertyInfo = "DOMHTMLTextAreaElement::max-length"+ attrGet _ = getDOMHTMLTextAreaElementMaxLength+ attrSet _ = setDOMHTMLTextAreaElementMaxLength+ attrConstruct _ = constructDOMHTMLTextAreaElementMaxLength++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementName :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m T.Text+getDOMHTMLTextAreaElementName obj = liftIO $ getObjectPropertyString obj "name"++setDOMHTMLTextAreaElementName :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> T.Text -> m ()+setDOMHTMLTextAreaElementName obj val = liftIO $ setObjectPropertyString obj "name" val++constructDOMHTMLTextAreaElementName :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementName val = constructObjectPropertyString "name" val++data DOMHTMLTextAreaElementNamePropertyInfo+instance AttrInfo DOMHTMLTextAreaElementNamePropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementNamePropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementNamePropertyInfo = T.Text+ type AttrLabel DOMHTMLTextAreaElementNamePropertyInfo = "DOMHTMLTextAreaElement::name"+ attrGet _ = getDOMHTMLTextAreaElementName+ attrSet _ = setDOMHTMLTextAreaElementName+ attrConstruct _ = constructDOMHTMLTextAreaElementName++-- VVV Prop "placeholder"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementPlaceholder :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m T.Text+getDOMHTMLTextAreaElementPlaceholder obj = liftIO $ getObjectPropertyString obj "placeholder"++setDOMHTMLTextAreaElementPlaceholder :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> T.Text -> m ()+setDOMHTMLTextAreaElementPlaceholder obj val = liftIO $ setObjectPropertyString obj "placeholder" val++constructDOMHTMLTextAreaElementPlaceholder :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementPlaceholder val = constructObjectPropertyString "placeholder" val++data DOMHTMLTextAreaElementPlaceholderPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementPlaceholderPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementPlaceholderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementPlaceholderPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementPlaceholderPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementPlaceholderPropertyInfo = T.Text+ type AttrLabel DOMHTMLTextAreaElementPlaceholderPropertyInfo = "DOMHTMLTextAreaElement::placeholder"+ attrGet _ = getDOMHTMLTextAreaElementPlaceholder+ attrSet _ = setDOMHTMLTextAreaElementPlaceholder+ attrConstruct _ = constructDOMHTMLTextAreaElementPlaceholder++-- VVV Prop "read-only"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementReadOnly :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m Bool+getDOMHTMLTextAreaElementReadOnly obj = liftIO $ getObjectPropertyBool obj "read-only"++setDOMHTMLTextAreaElementReadOnly :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> Bool -> m ()+setDOMHTMLTextAreaElementReadOnly obj val = liftIO $ setObjectPropertyBool obj "read-only" val++constructDOMHTMLTextAreaElementReadOnly :: Bool -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementReadOnly val = constructObjectPropertyBool "read-only" val++data DOMHTMLTextAreaElementReadOnlyPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementReadOnlyPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementReadOnlyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementReadOnlyPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementReadOnlyPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementReadOnlyPropertyInfo = Bool+ type AttrLabel DOMHTMLTextAreaElementReadOnlyPropertyInfo = "DOMHTMLTextAreaElement::read-only"+ attrGet _ = getDOMHTMLTextAreaElementReadOnly+ attrSet _ = setDOMHTMLTextAreaElementReadOnly+ attrConstruct _ = constructDOMHTMLTextAreaElementReadOnly++-- VVV Prop "required"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementRequired :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m Bool+getDOMHTMLTextAreaElementRequired obj = liftIO $ getObjectPropertyBool obj "required"++setDOMHTMLTextAreaElementRequired :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> Bool -> m ()+setDOMHTMLTextAreaElementRequired obj val = liftIO $ setObjectPropertyBool obj "required" val++constructDOMHTMLTextAreaElementRequired :: Bool -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementRequired val = constructObjectPropertyBool "required" val++data DOMHTMLTextAreaElementRequiredPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementRequiredPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementRequiredPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementRequiredPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementRequiredPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementRequiredPropertyInfo = Bool+ type AttrLabel DOMHTMLTextAreaElementRequiredPropertyInfo = "DOMHTMLTextAreaElement::required"+ attrGet _ = getDOMHTMLTextAreaElementRequired+ attrSet _ = setDOMHTMLTextAreaElementRequired+ attrConstruct _ = constructDOMHTMLTextAreaElementRequired++-- VVV Prop "rows"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementRows :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m Int64+getDOMHTMLTextAreaElementRows obj = liftIO $ getObjectPropertyInt64 obj "rows"++setDOMHTMLTextAreaElementRows :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> Int64 -> m ()+setDOMHTMLTextAreaElementRows obj val = liftIO $ setObjectPropertyInt64 obj "rows" val++constructDOMHTMLTextAreaElementRows :: Int64 -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementRows val = constructObjectPropertyInt64 "rows" val++data DOMHTMLTextAreaElementRowsPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementRowsPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementRowsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementRowsPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementRowsPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementRowsPropertyInfo = Int64+ type AttrLabel DOMHTMLTextAreaElementRowsPropertyInfo = "DOMHTMLTextAreaElement::rows"+ attrGet _ = getDOMHTMLTextAreaElementRows+ attrSet _ = setDOMHTMLTextAreaElementRows+ attrConstruct _ = constructDOMHTMLTextAreaElementRows++-- VVV Prop "selection-direction"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementSelectionDirection :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m T.Text+getDOMHTMLTextAreaElementSelectionDirection obj = liftIO $ getObjectPropertyString obj "selection-direction"++setDOMHTMLTextAreaElementSelectionDirection :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> T.Text -> m ()+setDOMHTMLTextAreaElementSelectionDirection obj val = liftIO $ setObjectPropertyString obj "selection-direction" val++constructDOMHTMLTextAreaElementSelectionDirection :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementSelectionDirection val = constructObjectPropertyString "selection-direction" val++data DOMHTMLTextAreaElementSelectionDirectionPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementSelectionDirectionPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementSelectionDirectionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementSelectionDirectionPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementSelectionDirectionPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementSelectionDirectionPropertyInfo = T.Text+ type AttrLabel DOMHTMLTextAreaElementSelectionDirectionPropertyInfo = "DOMHTMLTextAreaElement::selection-direction"+ attrGet _ = getDOMHTMLTextAreaElementSelectionDirection+ attrSet _ = setDOMHTMLTextAreaElementSelectionDirection+ attrConstruct _ = constructDOMHTMLTextAreaElementSelectionDirection++-- VVV Prop "selection-end"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementSelectionEnd :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m Int64+getDOMHTMLTextAreaElementSelectionEnd obj = liftIO $ getObjectPropertyInt64 obj "selection-end"++setDOMHTMLTextAreaElementSelectionEnd :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> Int64 -> m ()+setDOMHTMLTextAreaElementSelectionEnd obj val = liftIO $ setObjectPropertyInt64 obj "selection-end" val++constructDOMHTMLTextAreaElementSelectionEnd :: Int64 -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementSelectionEnd val = constructObjectPropertyInt64 "selection-end" val++data DOMHTMLTextAreaElementSelectionEndPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementSelectionEndPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementSelectionEndPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementSelectionEndPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementSelectionEndPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementSelectionEndPropertyInfo = Int64+ type AttrLabel DOMHTMLTextAreaElementSelectionEndPropertyInfo = "DOMHTMLTextAreaElement::selection-end"+ attrGet _ = getDOMHTMLTextAreaElementSelectionEnd+ attrSet _ = setDOMHTMLTextAreaElementSelectionEnd+ attrConstruct _ = constructDOMHTMLTextAreaElementSelectionEnd++-- VVV Prop "selection-start"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementSelectionStart :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m Int64+getDOMHTMLTextAreaElementSelectionStart obj = liftIO $ getObjectPropertyInt64 obj "selection-start"++setDOMHTMLTextAreaElementSelectionStart :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> Int64 -> m ()+setDOMHTMLTextAreaElementSelectionStart obj val = liftIO $ setObjectPropertyInt64 obj "selection-start" val++constructDOMHTMLTextAreaElementSelectionStart :: Int64 -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementSelectionStart val = constructObjectPropertyInt64 "selection-start" val++data DOMHTMLTextAreaElementSelectionStartPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementSelectionStartPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementSelectionStartPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementSelectionStartPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementSelectionStartPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementSelectionStartPropertyInfo = Int64+ type AttrLabel DOMHTMLTextAreaElementSelectionStartPropertyInfo = "DOMHTMLTextAreaElement::selection-start"+ attrGet _ = getDOMHTMLTextAreaElementSelectionStart+ attrSet _ = setDOMHTMLTextAreaElementSelectionStart+ attrConstruct _ = constructDOMHTMLTextAreaElementSelectionStart++-- VVV Prop "text-length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMHTMLTextAreaElementTextLength :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m Word64+getDOMHTMLTextAreaElementTextLength obj = liftIO $ getObjectPropertyUInt64 obj "text-length"++data DOMHTMLTextAreaElementTextLengthPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementTextLengthPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementTextLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementTextLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementTextLengthPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementTextLengthPropertyInfo = Word64+ type AttrLabel DOMHTMLTextAreaElementTextLengthPropertyInfo = "DOMHTMLTextAreaElement::text-length"+ attrGet _ = getDOMHTMLTextAreaElementTextLength+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLTextAreaElementType :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m T.Text+getDOMHTMLTextAreaElementType obj = liftIO $ getObjectPropertyString obj "type"++data DOMHTMLTextAreaElementTypePropertyInfo+instance AttrInfo DOMHTMLTextAreaElementTypePropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementTypePropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLTextAreaElementTypePropertyInfo = "DOMHTMLTextAreaElement::type"+ attrGet _ = getDOMHTMLTextAreaElementType+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "validation-message"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMHTMLTextAreaElementValidationMessage :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m T.Text+getDOMHTMLTextAreaElementValidationMessage obj = liftIO $ getObjectPropertyString obj "validation-message"++data DOMHTMLTextAreaElementValidationMessagePropertyInfo+instance AttrInfo DOMHTMLTextAreaElementValidationMessagePropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementValidationMessagePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementValidationMessagePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementValidationMessagePropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementValidationMessagePropertyInfo = T.Text+ type AttrLabel DOMHTMLTextAreaElementValidationMessagePropertyInfo = "DOMHTMLTextAreaElement::validation-message"+ attrGet _ = getDOMHTMLTextAreaElementValidationMessage+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "validity"+ -- Type: TInterface "WebKit" "DOMValidityState"+ -- Flags: [PropertyReadable]++getDOMHTMLTextAreaElementValidity :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m DOMValidityState+getDOMHTMLTextAreaElementValidity obj = liftIO $ getObjectPropertyObject obj "validity" DOMValidityState++data DOMHTMLTextAreaElementValidityPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementValidityPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementValidityPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementValidityPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementValidityPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementValidityPropertyInfo = DOMValidityState+ type AttrLabel DOMHTMLTextAreaElementValidityPropertyInfo = "DOMHTMLTextAreaElement::validity"+ attrGet _ = getDOMHTMLTextAreaElementValidity+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "value"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementValue :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m T.Text+getDOMHTMLTextAreaElementValue obj = liftIO $ getObjectPropertyString obj "value"++setDOMHTMLTextAreaElementValue :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> T.Text -> m ()+setDOMHTMLTextAreaElementValue obj val = liftIO $ setObjectPropertyString obj "value" val++constructDOMHTMLTextAreaElementValue :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementValue val = constructObjectPropertyString "value" val++data DOMHTMLTextAreaElementValuePropertyInfo+instance AttrInfo DOMHTMLTextAreaElementValuePropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementValuePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementValuePropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementValuePropertyInfo = T.Text+ type AttrLabel DOMHTMLTextAreaElementValuePropertyInfo = "DOMHTMLTextAreaElement::value"+ attrGet _ = getDOMHTMLTextAreaElementValue+ attrSet _ = setDOMHTMLTextAreaElementValue+ attrConstruct _ = constructDOMHTMLTextAreaElementValue++-- VVV Prop "will-validate"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMHTMLTextAreaElementWillValidate :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m Bool+getDOMHTMLTextAreaElementWillValidate obj = liftIO $ getObjectPropertyBool obj "will-validate"++data DOMHTMLTextAreaElementWillValidatePropertyInfo+instance AttrInfo DOMHTMLTextAreaElementWillValidatePropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementWillValidatePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementWillValidatePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementWillValidatePropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementWillValidatePropertyInfo = Bool+ type AttrLabel DOMHTMLTextAreaElementWillValidatePropertyInfo = "DOMHTMLTextAreaElement::will-validate"+ attrGet _ = getDOMHTMLTextAreaElementWillValidate+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "wrap"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTextAreaElementWrap :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> m T.Text+getDOMHTMLTextAreaElementWrap obj = liftIO $ getObjectPropertyString obj "wrap"++setDOMHTMLTextAreaElementWrap :: (MonadIO m, DOMHTMLTextAreaElementK o) => o -> T.Text -> m ()+setDOMHTMLTextAreaElementWrap obj val = liftIO $ setObjectPropertyString obj "wrap" val++constructDOMHTMLTextAreaElementWrap :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTextAreaElementWrap val = constructObjectPropertyString "wrap" val++data DOMHTMLTextAreaElementWrapPropertyInfo+instance AttrInfo DOMHTMLTextAreaElementWrapPropertyInfo where+ type AttrAllowedOps DOMHTMLTextAreaElementWrapPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTextAreaElementWrapPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTextAreaElementWrapPropertyInfo = DOMHTMLTextAreaElementK+ type AttrGetType DOMHTMLTextAreaElementWrapPropertyInfo = T.Text+ type AttrLabel DOMHTMLTextAreaElementWrapPropertyInfo = "DOMHTMLTextAreaElement::wrap"+ attrGet _ = getDOMHTMLTextAreaElementWrap+ attrSet _ = setDOMHTMLTextAreaElementWrap+ attrConstruct _ = constructDOMHTMLTextAreaElementWrap++type instance AttributeList DOMHTMLTextAreaElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autocapitalize", DOMHTMLTextAreaElementAutocapitalizePropertyInfo), '("autocorrect", DOMHTMLTextAreaElementAutocorrectPropertyInfo), '("autofocus", DOMHTMLTextAreaElementAutofocusPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("cols", DOMHTMLTextAreaElementColsPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("default-value", DOMHTMLTextAreaElementDefaultValuePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("dir-name", DOMHTMLTextAreaElementDirNamePropertyInfo), '("disabled", DOMHTMLTextAreaElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLTextAreaElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("labels", DOMHTMLTextAreaElementLabelsPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("max-length", DOMHTMLTextAreaElementMaxLengthPropertyInfo), '("name", DOMHTMLTextAreaElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("placeholder", DOMHTMLTextAreaElementPlaceholderPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("read-only", DOMHTMLTextAreaElementReadOnlyPropertyInfo), '("required", DOMHTMLTextAreaElementRequiredPropertyInfo), '("rows", DOMHTMLTextAreaElementRowsPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("selection-direction", DOMHTMLTextAreaElementSelectionDirectionPropertyInfo), '("selection-end", DOMHTMLTextAreaElementSelectionEndPropertyInfo), '("selection-start", DOMHTMLTextAreaElementSelectionStartPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("text-length", DOMHTMLTextAreaElementTextLengthPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLTextAreaElementTypePropertyInfo), '("validation-message", DOMHTMLTextAreaElementValidationMessagePropertyInfo), '("validity", DOMHTMLTextAreaElementValidityPropertyInfo), '("value", DOMHTMLTextAreaElementValuePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("will-validate", DOMHTMLTextAreaElementWillValidatePropertyInfo), '("wrap", DOMHTMLTextAreaElementWrapPropertyInfo)]++-- VVV Prop "text"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLTitleElementText :: (MonadIO m, DOMHTMLTitleElementK o) => o -> m T.Text+getDOMHTMLTitleElementText obj = liftIO $ getObjectPropertyString obj "text"++setDOMHTMLTitleElementText :: (MonadIO m, DOMHTMLTitleElementK o) => o -> T.Text -> m ()+setDOMHTMLTitleElementText obj val = liftIO $ setObjectPropertyString obj "text" val++constructDOMHTMLTitleElementText :: T.Text -> IO ([Char], GValue)+constructDOMHTMLTitleElementText val = constructObjectPropertyString "text" val++data DOMHTMLTitleElementTextPropertyInfo+instance AttrInfo DOMHTMLTitleElementTextPropertyInfo where+ type AttrAllowedOps DOMHTMLTitleElementTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLTitleElementTextPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLTitleElementTextPropertyInfo = DOMHTMLTitleElementK+ type AttrGetType DOMHTMLTitleElementTextPropertyInfo = T.Text+ type AttrLabel DOMHTMLTitleElementTextPropertyInfo = "DOMHTMLTitleElement::text"+ attrGet _ = getDOMHTMLTitleElementText+ attrSet _ = setDOMHTMLTitleElementText+ attrConstruct _ = constructDOMHTMLTitleElementText++type instance AttributeList DOMHTMLTitleElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text", DOMHTMLTitleElementTextPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "compact"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLUListElementCompact :: (MonadIO m, DOMHTMLUListElementK o) => o -> m Bool+getDOMHTMLUListElementCompact obj = liftIO $ getObjectPropertyBool obj "compact"++setDOMHTMLUListElementCompact :: (MonadIO m, DOMHTMLUListElementK o) => o -> Bool -> m ()+setDOMHTMLUListElementCompact obj val = liftIO $ setObjectPropertyBool obj "compact" val++constructDOMHTMLUListElementCompact :: Bool -> IO ([Char], GValue)+constructDOMHTMLUListElementCompact val = constructObjectPropertyBool "compact" val++data DOMHTMLUListElementCompactPropertyInfo+instance AttrInfo DOMHTMLUListElementCompactPropertyInfo where+ type AttrAllowedOps DOMHTMLUListElementCompactPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLUListElementCompactPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLUListElementCompactPropertyInfo = DOMHTMLUListElementK+ type AttrGetType DOMHTMLUListElementCompactPropertyInfo = Bool+ type AttrLabel DOMHTMLUListElementCompactPropertyInfo = "DOMHTMLUListElement::compact"+ attrGet _ = getDOMHTMLUListElementCompact+ attrSet _ = setDOMHTMLUListElementCompact+ attrConstruct _ = constructDOMHTMLUListElementCompact++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLUListElementType :: (MonadIO m, DOMHTMLUListElementK o) => o -> m T.Text+getDOMHTMLUListElementType obj = liftIO $ getObjectPropertyString obj "type"++setDOMHTMLUListElementType :: (MonadIO m, DOMHTMLUListElementK o) => o -> T.Text -> m ()+setDOMHTMLUListElementType obj val = liftIO $ setObjectPropertyString obj "type" val++constructDOMHTMLUListElementType :: T.Text -> IO ([Char], GValue)+constructDOMHTMLUListElementType val = constructObjectPropertyString "type" val++data DOMHTMLUListElementTypePropertyInfo+instance AttrInfo DOMHTMLUListElementTypePropertyInfo where+ type AttrAllowedOps DOMHTMLUListElementTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLUListElementTypePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLUListElementTypePropertyInfo = DOMHTMLUListElementK+ type AttrGetType DOMHTMLUListElementTypePropertyInfo = T.Text+ type AttrLabel DOMHTMLUListElementTypePropertyInfo = "DOMHTMLUListElement::type"+ attrGet _ = getDOMHTMLUListElementType+ attrSet _ = setDOMHTMLUListElementType+ attrConstruct _ = constructDOMHTMLUListElementType++type instance AttributeList DOMHTMLUListElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("compact", DOMHTMLUListElementCompactPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLUListElementTypePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)]++-- VVV Prop "height"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLVideoElementHeight :: (MonadIO m, DOMHTMLVideoElementK o) => o -> m Word64+getDOMHTMLVideoElementHeight obj = liftIO $ getObjectPropertyUInt64 obj "height"++setDOMHTMLVideoElementHeight :: (MonadIO m, DOMHTMLVideoElementK o) => o -> Word64 -> m ()+setDOMHTMLVideoElementHeight obj val = liftIO $ setObjectPropertyUInt64 obj "height" val++constructDOMHTMLVideoElementHeight :: Word64 -> IO ([Char], GValue)+constructDOMHTMLVideoElementHeight val = constructObjectPropertyUInt64 "height" val++data DOMHTMLVideoElementHeightPropertyInfo+instance AttrInfo DOMHTMLVideoElementHeightPropertyInfo where+ type AttrAllowedOps DOMHTMLVideoElementHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLVideoElementHeightPropertyInfo = (~) Word64+ type AttrBaseTypeConstraint DOMHTMLVideoElementHeightPropertyInfo = DOMHTMLVideoElementK+ type AttrGetType DOMHTMLVideoElementHeightPropertyInfo = Word64+ type AttrLabel DOMHTMLVideoElementHeightPropertyInfo = "DOMHTMLVideoElement::height"+ attrGet _ = getDOMHTMLVideoElementHeight+ attrSet _ = setDOMHTMLVideoElementHeight+ attrConstruct _ = constructDOMHTMLVideoElementHeight++-- VVV Prop "poster"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLVideoElementPoster :: (MonadIO m, DOMHTMLVideoElementK o) => o -> m T.Text+getDOMHTMLVideoElementPoster obj = liftIO $ getObjectPropertyString obj "poster"++setDOMHTMLVideoElementPoster :: (MonadIO m, DOMHTMLVideoElementK o) => o -> T.Text -> m ()+setDOMHTMLVideoElementPoster obj val = liftIO $ setObjectPropertyString obj "poster" val++constructDOMHTMLVideoElementPoster :: T.Text -> IO ([Char], GValue)+constructDOMHTMLVideoElementPoster val = constructObjectPropertyString "poster" val++data DOMHTMLVideoElementPosterPropertyInfo+instance AttrInfo DOMHTMLVideoElementPosterPropertyInfo where+ type AttrAllowedOps DOMHTMLVideoElementPosterPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLVideoElementPosterPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMHTMLVideoElementPosterPropertyInfo = DOMHTMLVideoElementK+ type AttrGetType DOMHTMLVideoElementPosterPropertyInfo = T.Text+ type AttrLabel DOMHTMLVideoElementPosterPropertyInfo = "DOMHTMLVideoElement::poster"+ attrGet _ = getDOMHTMLVideoElementPoster+ attrSet _ = setDOMHTMLVideoElementPoster+ attrConstruct _ = constructDOMHTMLVideoElementPoster++-- VVV Prop "video-height"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMHTMLVideoElementVideoHeight :: (MonadIO m, DOMHTMLVideoElementK o) => o -> m Word64+getDOMHTMLVideoElementVideoHeight obj = liftIO $ getObjectPropertyUInt64 obj "video-height"++data DOMHTMLVideoElementVideoHeightPropertyInfo+instance AttrInfo DOMHTMLVideoElementVideoHeightPropertyInfo where+ type AttrAllowedOps DOMHTMLVideoElementVideoHeightPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLVideoElementVideoHeightPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLVideoElementVideoHeightPropertyInfo = DOMHTMLVideoElementK+ type AttrGetType DOMHTMLVideoElementVideoHeightPropertyInfo = Word64+ type AttrLabel DOMHTMLVideoElementVideoHeightPropertyInfo = "DOMHTMLVideoElement::video-height"+ attrGet _ = getDOMHTMLVideoElementVideoHeight+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "video-width"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMHTMLVideoElementVideoWidth :: (MonadIO m, DOMHTMLVideoElementK o) => o -> m Word64+getDOMHTMLVideoElementVideoWidth obj = liftIO $ getObjectPropertyUInt64 obj "video-width"++data DOMHTMLVideoElementVideoWidthPropertyInfo+instance AttrInfo DOMHTMLVideoElementVideoWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLVideoElementVideoWidthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLVideoElementVideoWidthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLVideoElementVideoWidthPropertyInfo = DOMHTMLVideoElementK+ type AttrGetType DOMHTMLVideoElementVideoWidthPropertyInfo = Word64+ type AttrLabel DOMHTMLVideoElementVideoWidthPropertyInfo = "DOMHTMLVideoElement::video-width"+ attrGet _ = getDOMHTMLVideoElementVideoWidth+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-decoded-frame-count"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMHTMLVideoElementWebkitDecodedFrameCount :: (MonadIO m, DOMHTMLVideoElementK o) => o -> m Word64+getDOMHTMLVideoElementWebkitDecodedFrameCount obj = liftIO $ getObjectPropertyUInt64 obj "webkit-decoded-frame-count"++data DOMHTMLVideoElementWebkitDecodedFrameCountPropertyInfo+instance AttrInfo DOMHTMLVideoElementWebkitDecodedFrameCountPropertyInfo where+ type AttrAllowedOps DOMHTMLVideoElementWebkitDecodedFrameCountPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLVideoElementWebkitDecodedFrameCountPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLVideoElementWebkitDecodedFrameCountPropertyInfo = DOMHTMLVideoElementK+ type AttrGetType DOMHTMLVideoElementWebkitDecodedFrameCountPropertyInfo = Word64+ type AttrLabel DOMHTMLVideoElementWebkitDecodedFrameCountPropertyInfo = "DOMHTMLVideoElement::webkit-decoded-frame-count"+ attrGet _ = getDOMHTMLVideoElementWebkitDecodedFrameCount+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-displaying-fullscreen"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMHTMLVideoElementWebkitDisplayingFullscreen :: (MonadIO m, DOMHTMLVideoElementK o) => o -> m Bool+getDOMHTMLVideoElementWebkitDisplayingFullscreen obj = liftIO $ getObjectPropertyBool obj "webkit-displaying-fullscreen"++data DOMHTMLVideoElementWebkitDisplayingFullscreenPropertyInfo+instance AttrInfo DOMHTMLVideoElementWebkitDisplayingFullscreenPropertyInfo where+ type AttrAllowedOps DOMHTMLVideoElementWebkitDisplayingFullscreenPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLVideoElementWebkitDisplayingFullscreenPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLVideoElementWebkitDisplayingFullscreenPropertyInfo = DOMHTMLVideoElementK+ type AttrGetType DOMHTMLVideoElementWebkitDisplayingFullscreenPropertyInfo = Bool+ type AttrLabel DOMHTMLVideoElementWebkitDisplayingFullscreenPropertyInfo = "DOMHTMLVideoElement::webkit-displaying-fullscreen"+ attrGet _ = getDOMHTMLVideoElementWebkitDisplayingFullscreen+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-dropped-frame-count"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMHTMLVideoElementWebkitDroppedFrameCount :: (MonadIO m, DOMHTMLVideoElementK o) => o -> m Word64+getDOMHTMLVideoElementWebkitDroppedFrameCount obj = liftIO $ getObjectPropertyUInt64 obj "webkit-dropped-frame-count"++data DOMHTMLVideoElementWebkitDroppedFrameCountPropertyInfo+instance AttrInfo DOMHTMLVideoElementWebkitDroppedFrameCountPropertyInfo where+ type AttrAllowedOps DOMHTMLVideoElementWebkitDroppedFrameCountPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLVideoElementWebkitDroppedFrameCountPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLVideoElementWebkitDroppedFrameCountPropertyInfo = DOMHTMLVideoElementK+ type AttrGetType DOMHTMLVideoElementWebkitDroppedFrameCountPropertyInfo = Word64+ type AttrLabel DOMHTMLVideoElementWebkitDroppedFrameCountPropertyInfo = "DOMHTMLVideoElement::webkit-dropped-frame-count"+ attrGet _ = getDOMHTMLVideoElementWebkitDroppedFrameCount+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-supports-fullscreen"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMHTMLVideoElementWebkitSupportsFullscreen :: (MonadIO m, DOMHTMLVideoElementK o) => o -> m Bool+getDOMHTMLVideoElementWebkitSupportsFullscreen obj = liftIO $ getObjectPropertyBool obj "webkit-supports-fullscreen"++data DOMHTMLVideoElementWebkitSupportsFullscreenPropertyInfo+instance AttrInfo DOMHTMLVideoElementWebkitSupportsFullscreenPropertyInfo where+ type AttrAllowedOps DOMHTMLVideoElementWebkitSupportsFullscreenPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLVideoElementWebkitSupportsFullscreenPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHTMLVideoElementWebkitSupportsFullscreenPropertyInfo = DOMHTMLVideoElementK+ type AttrGetType DOMHTMLVideoElementWebkitSupportsFullscreenPropertyInfo = Bool+ type AttrLabel DOMHTMLVideoElementWebkitSupportsFullscreenPropertyInfo = "DOMHTMLVideoElement::webkit-supports-fullscreen"+ attrGet _ = getDOMHTMLVideoElementWebkitSupportsFullscreen+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-wireless-video-playback-disabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabled :: (MonadIO m, DOMHTMLVideoElementK o) => o -> m Bool+getDOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabled obj = liftIO $ getObjectPropertyBool obj "webkit-wireless-video-playback-disabled"++setDOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabled :: (MonadIO m, DOMHTMLVideoElementK o) => o -> Bool -> m ()+setDOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabled obj val = liftIO $ setObjectPropertyBool obj "webkit-wireless-video-playback-disabled" val++constructDOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabled :: Bool -> IO ([Char], GValue)+constructDOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabled val = constructObjectPropertyBool "webkit-wireless-video-playback-disabled" val++data DOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabledPropertyInfo+instance AttrInfo DOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabledPropertyInfo where+ type AttrAllowedOps DOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabledPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabledPropertyInfo = DOMHTMLVideoElementK+ type AttrGetType DOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabledPropertyInfo = Bool+ type AttrLabel DOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabledPropertyInfo = "DOMHTMLVideoElement::webkit-wireless-video-playback-disabled"+ attrGet _ = getDOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabled+ attrSet _ = setDOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabled+ attrConstruct _ = constructDOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabled++-- VVV Prop "width"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMHTMLVideoElementWidth :: (MonadIO m, DOMHTMLVideoElementK o) => o -> m Word64+getDOMHTMLVideoElementWidth obj = liftIO $ getObjectPropertyUInt64 obj "width"++setDOMHTMLVideoElementWidth :: (MonadIO m, DOMHTMLVideoElementK o) => o -> Word64 -> m ()+setDOMHTMLVideoElementWidth obj val = liftIO $ setObjectPropertyUInt64 obj "width" val++constructDOMHTMLVideoElementWidth :: Word64 -> IO ([Char], GValue)+constructDOMHTMLVideoElementWidth val = constructObjectPropertyUInt64 "width" val++data DOMHTMLVideoElementWidthPropertyInfo+instance AttrInfo DOMHTMLVideoElementWidthPropertyInfo where+ type AttrAllowedOps DOMHTMLVideoElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMHTMLVideoElementWidthPropertyInfo = (~) Word64+ type AttrBaseTypeConstraint DOMHTMLVideoElementWidthPropertyInfo = DOMHTMLVideoElementK+ type AttrGetType DOMHTMLVideoElementWidthPropertyInfo = Word64+ type AttrLabel DOMHTMLVideoElementWidthPropertyInfo = "DOMHTMLVideoElement::width"+ attrGet _ = getDOMHTMLVideoElementWidth+ attrSet _ = setDOMHTMLVideoElementWidth+ attrConstruct _ = constructDOMHTMLVideoElementWidth++type instance AttributeList DOMHTMLVideoElement = '[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("audio-tracks", DOMHTMLMediaElementAudioTracksPropertyInfo), '("autoplay", DOMHTMLMediaElementAutoplayPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("buffered", DOMHTMLMediaElementBufferedPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("controller", DOMHTMLMediaElementControllerPropertyInfo), '("controls", DOMHTMLMediaElementControlsPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-src", DOMHTMLMediaElementCurrentSrcPropertyInfo), '("current-time", DOMHTMLMediaElementCurrentTimePropertyInfo), '("default-muted", DOMHTMLMediaElementDefaultMutedPropertyInfo), '("default-playback-rate", DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("duration", DOMHTMLMediaElementDurationPropertyInfo), '("ended", DOMHTMLMediaElementEndedPropertyInfo), '("error", DOMHTMLMediaElementErrorPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLVideoElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("loop", DOMHTMLMediaElementLoopPropertyInfo), '("media-group", DOMHTMLMediaElementMediaGroupPropertyInfo), '("muted", DOMHTMLMediaElementMutedPropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("network-state", DOMHTMLMediaElementNetworkStatePropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("paused", DOMHTMLMediaElementPausedPropertyInfo), '("playback-rate", DOMHTMLMediaElementPlaybackRatePropertyInfo), '("played", DOMHTMLMediaElementPlayedPropertyInfo), '("poster", DOMHTMLVideoElementPosterPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("preload", DOMHTMLMediaElementPreloadPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("ready-state", DOMHTMLMediaElementReadyStatePropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("seekable", DOMHTMLMediaElementSeekablePropertyInfo), '("seeking", DOMHTMLMediaElementSeekingPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLMediaElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("text-tracks", DOMHTMLMediaElementTextTracksPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("video-height", DOMHTMLVideoElementVideoHeightPropertyInfo), '("video-tracks", DOMHTMLMediaElementVideoTracksPropertyInfo), '("video-width", DOMHTMLVideoElementVideoWidthPropertyInfo), '("volume", DOMHTMLMediaElementVolumePropertyInfo), '("webkit-audio-decoded-byte-count", DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo), '("webkit-closed-captions-visible", DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo), '("webkit-current-playback-target-is-wireless", DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo), '("webkit-decoded-frame-count", DOMHTMLVideoElementWebkitDecodedFrameCountPropertyInfo), '("webkit-displaying-fullscreen", DOMHTMLVideoElementWebkitDisplayingFullscreenPropertyInfo), '("webkit-dropped-frame-count", DOMHTMLVideoElementWebkitDroppedFrameCountPropertyInfo), '("webkit-has-closed-captions", DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo), '("webkit-preserves-pitch", DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkit-supports-fullscreen", DOMHTMLVideoElementWebkitSupportsFullscreenPropertyInfo), '("webkit-video-decoded-byte-count", DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo), '("webkit-wireless-video-playback-disabled", DOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabledPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLVideoElementWidthPropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMHistoryLength :: (MonadIO m, DOMHistoryK o) => o -> m Word64+getDOMHistoryLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMHistoryLengthPropertyInfo+instance AttrInfo DOMHistoryLengthPropertyInfo where+ type AttrAllowedOps DOMHistoryLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMHistoryLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMHistoryLengthPropertyInfo = DOMHistoryK+ type AttrGetType DOMHistoryLengthPropertyInfo = Word64+ type AttrLabel DOMHistoryLengthPropertyInfo = "DOMHistory::length"+ attrGet _ = getDOMHistoryLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMHistory = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMHistoryLengthPropertyInfo)]++-- VVV Prop "alt-graph-key"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMKeyboardEventAltGraphKey :: (MonadIO m, DOMKeyboardEventK o) => o -> m Bool+getDOMKeyboardEventAltGraphKey obj = liftIO $ getObjectPropertyBool obj "alt-graph-key"++data DOMKeyboardEventAltGraphKeyPropertyInfo+instance AttrInfo DOMKeyboardEventAltGraphKeyPropertyInfo where+ type AttrAllowedOps DOMKeyboardEventAltGraphKeyPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMKeyboardEventAltGraphKeyPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMKeyboardEventAltGraphKeyPropertyInfo = DOMKeyboardEventK+ type AttrGetType DOMKeyboardEventAltGraphKeyPropertyInfo = Bool+ type AttrLabel DOMKeyboardEventAltGraphKeyPropertyInfo = "DOMKeyboardEvent::alt-graph-key"+ attrGet _ = getDOMKeyboardEventAltGraphKey+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "alt-key"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMKeyboardEventAltKey :: (MonadIO m, DOMKeyboardEventK o) => o -> m Bool+getDOMKeyboardEventAltKey obj = liftIO $ getObjectPropertyBool obj "alt-key"++data DOMKeyboardEventAltKeyPropertyInfo+instance AttrInfo DOMKeyboardEventAltKeyPropertyInfo where+ type AttrAllowedOps DOMKeyboardEventAltKeyPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMKeyboardEventAltKeyPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMKeyboardEventAltKeyPropertyInfo = DOMKeyboardEventK+ type AttrGetType DOMKeyboardEventAltKeyPropertyInfo = Bool+ type AttrLabel DOMKeyboardEventAltKeyPropertyInfo = "DOMKeyboardEvent::alt-key"+ attrGet _ = getDOMKeyboardEventAltKey+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "ctrl-key"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMKeyboardEventCtrlKey :: (MonadIO m, DOMKeyboardEventK o) => o -> m Bool+getDOMKeyboardEventCtrlKey obj = liftIO $ getObjectPropertyBool obj "ctrl-key"++data DOMKeyboardEventCtrlKeyPropertyInfo+instance AttrInfo DOMKeyboardEventCtrlKeyPropertyInfo where+ type AttrAllowedOps DOMKeyboardEventCtrlKeyPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMKeyboardEventCtrlKeyPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMKeyboardEventCtrlKeyPropertyInfo = DOMKeyboardEventK+ type AttrGetType DOMKeyboardEventCtrlKeyPropertyInfo = Bool+ type AttrLabel DOMKeyboardEventCtrlKeyPropertyInfo = "DOMKeyboardEvent::ctrl-key"+ attrGet _ = getDOMKeyboardEventCtrlKey+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "key-identifier"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMKeyboardEventKeyIdentifier :: (MonadIO m, DOMKeyboardEventK o) => o -> m T.Text+getDOMKeyboardEventKeyIdentifier obj = liftIO $ getObjectPropertyString obj "key-identifier"++data DOMKeyboardEventKeyIdentifierPropertyInfo+instance AttrInfo DOMKeyboardEventKeyIdentifierPropertyInfo where+ type AttrAllowedOps DOMKeyboardEventKeyIdentifierPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMKeyboardEventKeyIdentifierPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMKeyboardEventKeyIdentifierPropertyInfo = DOMKeyboardEventK+ type AttrGetType DOMKeyboardEventKeyIdentifierPropertyInfo = T.Text+ type AttrLabel DOMKeyboardEventKeyIdentifierPropertyInfo = "DOMKeyboardEvent::key-identifier"+ attrGet _ = getDOMKeyboardEventKeyIdentifier+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "key-location"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMKeyboardEventKeyLocation :: (MonadIO m, DOMKeyboardEventK o) => o -> m Word64+getDOMKeyboardEventKeyLocation obj = liftIO $ getObjectPropertyUInt64 obj "key-location"++data DOMKeyboardEventKeyLocationPropertyInfo+instance AttrInfo DOMKeyboardEventKeyLocationPropertyInfo where+ type AttrAllowedOps DOMKeyboardEventKeyLocationPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMKeyboardEventKeyLocationPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMKeyboardEventKeyLocationPropertyInfo = DOMKeyboardEventK+ type AttrGetType DOMKeyboardEventKeyLocationPropertyInfo = Word64+ type AttrLabel DOMKeyboardEventKeyLocationPropertyInfo = "DOMKeyboardEvent::key-location"+ attrGet _ = getDOMKeyboardEventKeyLocation+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "meta-key"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMKeyboardEventMetaKey :: (MonadIO m, DOMKeyboardEventK o) => o -> m Bool+getDOMKeyboardEventMetaKey obj = liftIO $ getObjectPropertyBool obj "meta-key"++data DOMKeyboardEventMetaKeyPropertyInfo+instance AttrInfo DOMKeyboardEventMetaKeyPropertyInfo where+ type AttrAllowedOps DOMKeyboardEventMetaKeyPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMKeyboardEventMetaKeyPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMKeyboardEventMetaKeyPropertyInfo = DOMKeyboardEventK+ type AttrGetType DOMKeyboardEventMetaKeyPropertyInfo = Bool+ type AttrLabel DOMKeyboardEventMetaKeyPropertyInfo = "DOMKeyboardEvent::meta-key"+ attrGet _ = getDOMKeyboardEventMetaKey+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "shift-key"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMKeyboardEventShiftKey :: (MonadIO m, DOMKeyboardEventK o) => o -> m Bool+getDOMKeyboardEventShiftKey obj = liftIO $ getObjectPropertyBool obj "shift-key"++data DOMKeyboardEventShiftKeyPropertyInfo+instance AttrInfo DOMKeyboardEventShiftKeyPropertyInfo where+ type AttrAllowedOps DOMKeyboardEventShiftKeyPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMKeyboardEventShiftKeyPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMKeyboardEventShiftKeyPropertyInfo = DOMKeyboardEventK+ type AttrGetType DOMKeyboardEventShiftKeyPropertyInfo = Bool+ type AttrLabel DOMKeyboardEventShiftKeyPropertyInfo = "DOMKeyboardEvent::shift-key"+ attrGet _ = getDOMKeyboardEventShiftKey+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMKeyboardEvent = '[ '("alt-graph-key", DOMKeyboardEventAltGraphKeyPropertyInfo), '("alt-key", DOMKeyboardEventAltKeyPropertyInfo), '("bubbles", DOMEventBubblesPropertyInfo), '("cancel-bubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("char-code", DOMUIEventCharCodePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("ctrl-key", DOMKeyboardEventCtrlKeyPropertyInfo), '("current-target", DOMEventCurrentTargetPropertyInfo), '("default-prevented", DOMEventDefaultPreventedPropertyInfo), '("detail", DOMUIEventDetailPropertyInfo), '("event-phase", DOMEventEventPhasePropertyInfo), '("key-code", DOMUIEventKeyCodePropertyInfo), '("key-identifier", DOMKeyboardEventKeyIdentifierPropertyInfo), '("key-location", DOMKeyboardEventKeyLocationPropertyInfo), '("layer-x", DOMUIEventLayerXPropertyInfo), '("layer-y", DOMUIEventLayerYPropertyInfo), '("meta-key", DOMKeyboardEventMetaKeyPropertyInfo), '("page-x", DOMUIEventPageXPropertyInfo), '("page-y", DOMUIEventPageYPropertyInfo), '("return-value", DOMEventReturnValuePropertyInfo), '("shift-key", DOMKeyboardEventShiftKeyPropertyInfo), '("src-element", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("time-stamp", DOMEventTimeStampPropertyInfo), '("type", DOMEventTypePropertyInfo), '("view", DOMUIEventViewPropertyInfo), '("which", DOMUIEventWhichPropertyInfo)]++-- VVV Prop "ancestor-origins"+ -- Type: TInterface "WebKit" "DOMDOMStringList"+ -- Flags: [PropertyReadable]++getDOMLocationAncestorOrigins :: (MonadIO m, DOMLocationK o) => o -> m DOMDOMStringList+getDOMLocationAncestorOrigins obj = liftIO $ getObjectPropertyObject obj "ancestor-origins" DOMDOMStringList++data DOMLocationAncestorOriginsPropertyInfo+instance AttrInfo DOMLocationAncestorOriginsPropertyInfo where+ type AttrAllowedOps DOMLocationAncestorOriginsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMLocationAncestorOriginsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMLocationAncestorOriginsPropertyInfo = DOMLocationK+ type AttrGetType DOMLocationAncestorOriginsPropertyInfo = DOMDOMStringList+ type AttrLabel DOMLocationAncestorOriginsPropertyInfo = "DOMLocation::ancestor-origins"+ attrGet _ = getDOMLocationAncestorOrigins+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "hash"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMLocationHash :: (MonadIO m, DOMLocationK o) => o -> m T.Text+getDOMLocationHash obj = liftIO $ getObjectPropertyString obj "hash"++data DOMLocationHashPropertyInfo+instance AttrInfo DOMLocationHashPropertyInfo where+ type AttrAllowedOps DOMLocationHashPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMLocationHashPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMLocationHashPropertyInfo = DOMLocationK+ type AttrGetType DOMLocationHashPropertyInfo = T.Text+ type AttrLabel DOMLocationHashPropertyInfo = "DOMLocation::hash"+ attrGet _ = getDOMLocationHash+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "host"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMLocationHost :: (MonadIO m, DOMLocationK o) => o -> m T.Text+getDOMLocationHost obj = liftIO $ getObjectPropertyString obj "host"++data DOMLocationHostPropertyInfo+instance AttrInfo DOMLocationHostPropertyInfo where+ type AttrAllowedOps DOMLocationHostPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMLocationHostPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMLocationHostPropertyInfo = DOMLocationK+ type AttrGetType DOMLocationHostPropertyInfo = T.Text+ type AttrLabel DOMLocationHostPropertyInfo = "DOMLocation::host"+ attrGet _ = getDOMLocationHost+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "hostname"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMLocationHostname :: (MonadIO m, DOMLocationK o) => o -> m T.Text+getDOMLocationHostname obj = liftIO $ getObjectPropertyString obj "hostname"++data DOMLocationHostnamePropertyInfo+instance AttrInfo DOMLocationHostnamePropertyInfo where+ type AttrAllowedOps DOMLocationHostnamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMLocationHostnamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMLocationHostnamePropertyInfo = DOMLocationK+ type AttrGetType DOMLocationHostnamePropertyInfo = T.Text+ type AttrLabel DOMLocationHostnamePropertyInfo = "DOMLocation::hostname"+ attrGet _ = getDOMLocationHostname+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "href"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMLocationHref :: (MonadIO m, DOMLocationK o) => o -> m T.Text+getDOMLocationHref obj = liftIO $ getObjectPropertyString obj "href"++data DOMLocationHrefPropertyInfo+instance AttrInfo DOMLocationHrefPropertyInfo where+ type AttrAllowedOps DOMLocationHrefPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMLocationHrefPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMLocationHrefPropertyInfo = DOMLocationK+ type AttrGetType DOMLocationHrefPropertyInfo = T.Text+ type AttrLabel DOMLocationHrefPropertyInfo = "DOMLocation::href"+ attrGet _ = getDOMLocationHref+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "origin"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMLocationOrigin :: (MonadIO m, DOMLocationK o) => o -> m T.Text+getDOMLocationOrigin obj = liftIO $ getObjectPropertyString obj "origin"++data DOMLocationOriginPropertyInfo+instance AttrInfo DOMLocationOriginPropertyInfo where+ type AttrAllowedOps DOMLocationOriginPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMLocationOriginPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMLocationOriginPropertyInfo = DOMLocationK+ type AttrGetType DOMLocationOriginPropertyInfo = T.Text+ type AttrLabel DOMLocationOriginPropertyInfo = "DOMLocation::origin"+ attrGet _ = getDOMLocationOrigin+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "pathname"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMLocationPathname :: (MonadIO m, DOMLocationK o) => o -> m T.Text+getDOMLocationPathname obj = liftIO $ getObjectPropertyString obj "pathname"++data DOMLocationPathnamePropertyInfo+instance AttrInfo DOMLocationPathnamePropertyInfo where+ type AttrAllowedOps DOMLocationPathnamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMLocationPathnamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMLocationPathnamePropertyInfo = DOMLocationK+ type AttrGetType DOMLocationPathnamePropertyInfo = T.Text+ type AttrLabel DOMLocationPathnamePropertyInfo = "DOMLocation::pathname"+ attrGet _ = getDOMLocationPathname+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "port"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMLocationPort :: (MonadIO m, DOMLocationK o) => o -> m T.Text+getDOMLocationPort obj = liftIO $ getObjectPropertyString obj "port"++data DOMLocationPortPropertyInfo+instance AttrInfo DOMLocationPortPropertyInfo where+ type AttrAllowedOps DOMLocationPortPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMLocationPortPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMLocationPortPropertyInfo = DOMLocationK+ type AttrGetType DOMLocationPortPropertyInfo = T.Text+ type AttrLabel DOMLocationPortPropertyInfo = "DOMLocation::port"+ attrGet _ = getDOMLocationPort+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "protocol"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMLocationProtocol :: (MonadIO m, DOMLocationK o) => o -> m T.Text+getDOMLocationProtocol obj = liftIO $ getObjectPropertyString obj "protocol"++data DOMLocationProtocolPropertyInfo+instance AttrInfo DOMLocationProtocolPropertyInfo where+ type AttrAllowedOps DOMLocationProtocolPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMLocationProtocolPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMLocationProtocolPropertyInfo = DOMLocationK+ type AttrGetType DOMLocationProtocolPropertyInfo = T.Text+ type AttrLabel DOMLocationProtocolPropertyInfo = "DOMLocation::protocol"+ attrGet _ = getDOMLocationProtocol+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "search"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMLocationSearch :: (MonadIO m, DOMLocationK o) => o -> m T.Text+getDOMLocationSearch obj = liftIO $ getObjectPropertyString obj "search"++data DOMLocationSearchPropertyInfo+instance AttrInfo DOMLocationSearchPropertyInfo where+ type AttrAllowedOps DOMLocationSearchPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMLocationSearchPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMLocationSearchPropertyInfo = DOMLocationK+ type AttrGetType DOMLocationSearchPropertyInfo = T.Text+ type AttrLabel DOMLocationSearchPropertyInfo = "DOMLocation::search"+ attrGet _ = getDOMLocationSearch+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMLocation = '[ '("ancestor-origins", DOMLocationAncestorOriginsPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("hash", DOMLocationHashPropertyInfo), '("host", DOMLocationHostPropertyInfo), '("hostname", DOMLocationHostnamePropertyInfo), '("href", DOMLocationHrefPropertyInfo), '("origin", DOMLocationOriginPropertyInfo), '("pathname", DOMLocationPathnamePropertyInfo), '("port", DOMLocationPortPropertyInfo), '("protocol", DOMLocationProtocolPropertyInfo), '("search", DOMLocationSearchPropertyInfo)]++-- VVV Prop "buffered"+ -- Type: TInterface "WebKit" "DOMTimeRanges"+ -- Flags: [PropertyReadable]++getDOMMediaControllerBuffered :: (MonadIO m, DOMMediaControllerK o) => o -> m DOMTimeRanges+getDOMMediaControllerBuffered obj = liftIO $ getObjectPropertyObject obj "buffered" DOMTimeRanges++data DOMMediaControllerBufferedPropertyInfo+instance AttrInfo DOMMediaControllerBufferedPropertyInfo where+ type AttrAllowedOps DOMMediaControllerBufferedPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMediaControllerBufferedPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMediaControllerBufferedPropertyInfo = DOMMediaControllerK+ type AttrGetType DOMMediaControllerBufferedPropertyInfo = DOMTimeRanges+ type AttrLabel DOMMediaControllerBufferedPropertyInfo = "DOMMediaController::buffered"+ attrGet _ = getDOMMediaControllerBuffered+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "current-time"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMMediaControllerCurrentTime :: (MonadIO m, DOMMediaControllerK o) => o -> m Double+getDOMMediaControllerCurrentTime obj = liftIO $ getObjectPropertyDouble obj "current-time"++setDOMMediaControllerCurrentTime :: (MonadIO m, DOMMediaControllerK o) => o -> Double -> m ()+setDOMMediaControllerCurrentTime obj val = liftIO $ setObjectPropertyDouble obj "current-time" val++constructDOMMediaControllerCurrentTime :: Double -> IO ([Char], GValue)+constructDOMMediaControllerCurrentTime val = constructObjectPropertyDouble "current-time" val++data DOMMediaControllerCurrentTimePropertyInfo+instance AttrInfo DOMMediaControllerCurrentTimePropertyInfo where+ type AttrAllowedOps DOMMediaControllerCurrentTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMMediaControllerCurrentTimePropertyInfo = (~) Double+ type AttrBaseTypeConstraint DOMMediaControllerCurrentTimePropertyInfo = DOMMediaControllerK+ type AttrGetType DOMMediaControllerCurrentTimePropertyInfo = Double+ type AttrLabel DOMMediaControllerCurrentTimePropertyInfo = "DOMMediaController::current-time"+ attrGet _ = getDOMMediaControllerCurrentTime+ attrSet _ = setDOMMediaControllerCurrentTime+ attrConstruct _ = constructDOMMediaControllerCurrentTime++-- VVV Prop "default-playback-rate"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMMediaControllerDefaultPlaybackRate :: (MonadIO m, DOMMediaControllerK o) => o -> m Double+getDOMMediaControllerDefaultPlaybackRate obj = liftIO $ getObjectPropertyDouble obj "default-playback-rate"++setDOMMediaControllerDefaultPlaybackRate :: (MonadIO m, DOMMediaControllerK o) => o -> Double -> m ()+setDOMMediaControllerDefaultPlaybackRate obj val = liftIO $ setObjectPropertyDouble obj "default-playback-rate" val++constructDOMMediaControllerDefaultPlaybackRate :: Double -> IO ([Char], GValue)+constructDOMMediaControllerDefaultPlaybackRate val = constructObjectPropertyDouble "default-playback-rate" val++data DOMMediaControllerDefaultPlaybackRatePropertyInfo+instance AttrInfo DOMMediaControllerDefaultPlaybackRatePropertyInfo where+ type AttrAllowedOps DOMMediaControllerDefaultPlaybackRatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMMediaControllerDefaultPlaybackRatePropertyInfo = (~) Double+ type AttrBaseTypeConstraint DOMMediaControllerDefaultPlaybackRatePropertyInfo = DOMMediaControllerK+ type AttrGetType DOMMediaControllerDefaultPlaybackRatePropertyInfo = Double+ type AttrLabel DOMMediaControllerDefaultPlaybackRatePropertyInfo = "DOMMediaController::default-playback-rate"+ attrGet _ = getDOMMediaControllerDefaultPlaybackRate+ attrSet _ = setDOMMediaControllerDefaultPlaybackRate+ attrConstruct _ = constructDOMMediaControllerDefaultPlaybackRate++-- VVV Prop "duration"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getDOMMediaControllerDuration :: (MonadIO m, DOMMediaControllerK o) => o -> m Double+getDOMMediaControllerDuration obj = liftIO $ getObjectPropertyDouble obj "duration"++data DOMMediaControllerDurationPropertyInfo+instance AttrInfo DOMMediaControllerDurationPropertyInfo where+ type AttrAllowedOps DOMMediaControllerDurationPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMediaControllerDurationPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMediaControllerDurationPropertyInfo = DOMMediaControllerK+ type AttrGetType DOMMediaControllerDurationPropertyInfo = Double+ type AttrLabel DOMMediaControllerDurationPropertyInfo = "DOMMediaController::duration"+ attrGet _ = getDOMMediaControllerDuration+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "muted"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMMediaControllerMuted :: (MonadIO m, DOMMediaControllerK o) => o -> m Bool+getDOMMediaControllerMuted obj = liftIO $ getObjectPropertyBool obj "muted"++setDOMMediaControllerMuted :: (MonadIO m, DOMMediaControllerK o) => o -> Bool -> m ()+setDOMMediaControllerMuted obj val = liftIO $ setObjectPropertyBool obj "muted" val++constructDOMMediaControllerMuted :: Bool -> IO ([Char], GValue)+constructDOMMediaControllerMuted val = constructObjectPropertyBool "muted" val++data DOMMediaControllerMutedPropertyInfo+instance AttrInfo DOMMediaControllerMutedPropertyInfo where+ type AttrAllowedOps DOMMediaControllerMutedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMMediaControllerMutedPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMMediaControllerMutedPropertyInfo = DOMMediaControllerK+ type AttrGetType DOMMediaControllerMutedPropertyInfo = Bool+ type AttrLabel DOMMediaControllerMutedPropertyInfo = "DOMMediaController::muted"+ attrGet _ = getDOMMediaControllerMuted+ attrSet _ = setDOMMediaControllerMuted+ attrConstruct _ = constructDOMMediaControllerMuted++-- VVV Prop "paused"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMMediaControllerPaused :: (MonadIO m, DOMMediaControllerK o) => o -> m Bool+getDOMMediaControllerPaused obj = liftIO $ getObjectPropertyBool obj "paused"++data DOMMediaControllerPausedPropertyInfo+instance AttrInfo DOMMediaControllerPausedPropertyInfo where+ type AttrAllowedOps DOMMediaControllerPausedPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMediaControllerPausedPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMediaControllerPausedPropertyInfo = DOMMediaControllerK+ type AttrGetType DOMMediaControllerPausedPropertyInfo = Bool+ type AttrLabel DOMMediaControllerPausedPropertyInfo = "DOMMediaController::paused"+ attrGet _ = getDOMMediaControllerPaused+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "playback-rate"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMMediaControllerPlaybackRate :: (MonadIO m, DOMMediaControllerK o) => o -> m Double+getDOMMediaControllerPlaybackRate obj = liftIO $ getObjectPropertyDouble obj "playback-rate"++setDOMMediaControllerPlaybackRate :: (MonadIO m, DOMMediaControllerK o) => o -> Double -> m ()+setDOMMediaControllerPlaybackRate obj val = liftIO $ setObjectPropertyDouble obj "playback-rate" val++constructDOMMediaControllerPlaybackRate :: Double -> IO ([Char], GValue)+constructDOMMediaControllerPlaybackRate val = constructObjectPropertyDouble "playback-rate" val++data DOMMediaControllerPlaybackRatePropertyInfo+instance AttrInfo DOMMediaControllerPlaybackRatePropertyInfo where+ type AttrAllowedOps DOMMediaControllerPlaybackRatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMMediaControllerPlaybackRatePropertyInfo = (~) Double+ type AttrBaseTypeConstraint DOMMediaControllerPlaybackRatePropertyInfo = DOMMediaControllerK+ type AttrGetType DOMMediaControllerPlaybackRatePropertyInfo = Double+ type AttrLabel DOMMediaControllerPlaybackRatePropertyInfo = "DOMMediaController::playback-rate"+ attrGet _ = getDOMMediaControllerPlaybackRate+ attrSet _ = setDOMMediaControllerPlaybackRate+ attrConstruct _ = constructDOMMediaControllerPlaybackRate++-- VVV Prop "playback-state"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMMediaControllerPlaybackState :: (MonadIO m, DOMMediaControllerK o) => o -> m T.Text+getDOMMediaControllerPlaybackState obj = liftIO $ getObjectPropertyString obj "playback-state"++data DOMMediaControllerPlaybackStatePropertyInfo+instance AttrInfo DOMMediaControllerPlaybackStatePropertyInfo where+ type AttrAllowedOps DOMMediaControllerPlaybackStatePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMediaControllerPlaybackStatePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMediaControllerPlaybackStatePropertyInfo = DOMMediaControllerK+ type AttrGetType DOMMediaControllerPlaybackStatePropertyInfo = T.Text+ type AttrLabel DOMMediaControllerPlaybackStatePropertyInfo = "DOMMediaController::playback-state"+ attrGet _ = getDOMMediaControllerPlaybackState+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "played"+ -- Type: TInterface "WebKit" "DOMTimeRanges"+ -- Flags: [PropertyReadable]++getDOMMediaControllerPlayed :: (MonadIO m, DOMMediaControllerK o) => o -> m DOMTimeRanges+getDOMMediaControllerPlayed obj = liftIO $ getObjectPropertyObject obj "played" DOMTimeRanges++data DOMMediaControllerPlayedPropertyInfo+instance AttrInfo DOMMediaControllerPlayedPropertyInfo where+ type AttrAllowedOps DOMMediaControllerPlayedPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMediaControllerPlayedPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMediaControllerPlayedPropertyInfo = DOMMediaControllerK+ type AttrGetType DOMMediaControllerPlayedPropertyInfo = DOMTimeRanges+ type AttrLabel DOMMediaControllerPlayedPropertyInfo = "DOMMediaController::played"+ attrGet _ = getDOMMediaControllerPlayed+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "seekable"+ -- Type: TInterface "WebKit" "DOMTimeRanges"+ -- Flags: [PropertyReadable]++getDOMMediaControllerSeekable :: (MonadIO m, DOMMediaControllerK o) => o -> m DOMTimeRanges+getDOMMediaControllerSeekable obj = liftIO $ getObjectPropertyObject obj "seekable" DOMTimeRanges++data DOMMediaControllerSeekablePropertyInfo+instance AttrInfo DOMMediaControllerSeekablePropertyInfo where+ type AttrAllowedOps DOMMediaControllerSeekablePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMediaControllerSeekablePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMediaControllerSeekablePropertyInfo = DOMMediaControllerK+ type AttrGetType DOMMediaControllerSeekablePropertyInfo = DOMTimeRanges+ type AttrLabel DOMMediaControllerSeekablePropertyInfo = "DOMMediaController::seekable"+ attrGet _ = getDOMMediaControllerSeekable+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "volume"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMMediaControllerVolume :: (MonadIO m, DOMMediaControllerK o) => o -> m Double+getDOMMediaControllerVolume obj = liftIO $ getObjectPropertyDouble obj "volume"++setDOMMediaControllerVolume :: (MonadIO m, DOMMediaControllerK o) => o -> Double -> m ()+setDOMMediaControllerVolume obj val = liftIO $ setObjectPropertyDouble obj "volume" val++constructDOMMediaControllerVolume :: Double -> IO ([Char], GValue)+constructDOMMediaControllerVolume val = constructObjectPropertyDouble "volume" val++data DOMMediaControllerVolumePropertyInfo+instance AttrInfo DOMMediaControllerVolumePropertyInfo where+ type AttrAllowedOps DOMMediaControllerVolumePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMMediaControllerVolumePropertyInfo = (~) Double+ type AttrBaseTypeConstraint DOMMediaControllerVolumePropertyInfo = DOMMediaControllerK+ type AttrGetType DOMMediaControllerVolumePropertyInfo = Double+ type AttrLabel DOMMediaControllerVolumePropertyInfo = "DOMMediaController::volume"+ attrGet _ = getDOMMediaControllerVolume+ attrSet _ = setDOMMediaControllerVolume+ attrConstruct _ = constructDOMMediaControllerVolume++type instance AttributeList DOMMediaController = '[ '("buffered", DOMMediaControllerBufferedPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-time", DOMMediaControllerCurrentTimePropertyInfo), '("default-playback-rate", DOMMediaControllerDefaultPlaybackRatePropertyInfo), '("duration", DOMMediaControllerDurationPropertyInfo), '("muted", DOMMediaControllerMutedPropertyInfo), '("paused", DOMMediaControllerPausedPropertyInfo), '("playback-rate", DOMMediaControllerPlaybackRatePropertyInfo), '("playback-state", DOMMediaControllerPlaybackStatePropertyInfo), '("played", DOMMediaControllerPlayedPropertyInfo), '("seekable", DOMMediaControllerSeekablePropertyInfo), '("volume", DOMMediaControllerVolumePropertyInfo)]++-- VVV Prop "code"+ -- Type: TBasicType TUInt32+ -- Flags: [PropertyReadable]++getDOMMediaErrorCode :: (MonadIO m, DOMMediaErrorK o) => o -> m Word32+getDOMMediaErrorCode obj = liftIO $ getObjectPropertyCUInt obj "code"++data DOMMediaErrorCodePropertyInfo+instance AttrInfo DOMMediaErrorCodePropertyInfo where+ type AttrAllowedOps DOMMediaErrorCodePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMediaErrorCodePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMediaErrorCodePropertyInfo = DOMMediaErrorK+ type AttrGetType DOMMediaErrorCodePropertyInfo = Word32+ type AttrLabel DOMMediaErrorCodePropertyInfo = "DOMMediaError::code"+ attrGet _ = getDOMMediaErrorCode+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMMediaError = '[ '("code", DOMMediaErrorCodePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMMediaListLength :: (MonadIO m, DOMMediaListK o) => o -> m Word64+getDOMMediaListLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMMediaListLengthPropertyInfo+instance AttrInfo DOMMediaListLengthPropertyInfo where+ type AttrAllowedOps DOMMediaListLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMediaListLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMediaListLengthPropertyInfo = DOMMediaListK+ type AttrGetType DOMMediaListLengthPropertyInfo = Word64+ type AttrLabel DOMMediaListLengthPropertyInfo = "DOMMediaList::length"+ attrGet _ = getDOMMediaListLength+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "media-text"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMMediaListMediaText :: (MonadIO m, DOMMediaListK o) => o -> m T.Text+getDOMMediaListMediaText obj = liftIO $ getObjectPropertyString obj "media-text"++setDOMMediaListMediaText :: (MonadIO m, DOMMediaListK o) => o -> T.Text -> m ()+setDOMMediaListMediaText obj val = liftIO $ setObjectPropertyString obj "media-text" val++constructDOMMediaListMediaText :: T.Text -> IO ([Char], GValue)+constructDOMMediaListMediaText val = constructObjectPropertyString "media-text" val++data DOMMediaListMediaTextPropertyInfo+instance AttrInfo DOMMediaListMediaTextPropertyInfo where+ type AttrAllowedOps DOMMediaListMediaTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMMediaListMediaTextPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMMediaListMediaTextPropertyInfo = DOMMediaListK+ type AttrGetType DOMMediaListMediaTextPropertyInfo = T.Text+ type AttrLabel DOMMediaListMediaTextPropertyInfo = "DOMMediaList::media-text"+ attrGet _ = getDOMMediaListMediaText+ attrSet _ = setDOMMediaListMediaText+ attrConstruct _ = constructDOMMediaListMediaText++type instance AttributeList DOMMediaList = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMMediaListLengthPropertyInfo), '("media-text", DOMMediaListMediaTextPropertyInfo)]++-- VVV Prop "matches"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMMediaQueryListMatches :: (MonadIO m, DOMMediaQueryListK o) => o -> m Bool+getDOMMediaQueryListMatches obj = liftIO $ getObjectPropertyBool obj "matches"++data DOMMediaQueryListMatchesPropertyInfo+instance AttrInfo DOMMediaQueryListMatchesPropertyInfo where+ type AttrAllowedOps DOMMediaQueryListMatchesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMediaQueryListMatchesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMediaQueryListMatchesPropertyInfo = DOMMediaQueryListK+ type AttrGetType DOMMediaQueryListMatchesPropertyInfo = Bool+ type AttrLabel DOMMediaQueryListMatchesPropertyInfo = "DOMMediaQueryList::matches"+ attrGet _ = getDOMMediaQueryListMatches+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "media"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMMediaQueryListMedia :: (MonadIO m, DOMMediaQueryListK o) => o -> m T.Text+getDOMMediaQueryListMedia obj = liftIO $ getObjectPropertyString obj "media"++data DOMMediaQueryListMediaPropertyInfo+instance AttrInfo DOMMediaQueryListMediaPropertyInfo where+ type AttrAllowedOps DOMMediaQueryListMediaPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMediaQueryListMediaPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMediaQueryListMediaPropertyInfo = DOMMediaQueryListK+ type AttrGetType DOMMediaQueryListMediaPropertyInfo = T.Text+ type AttrLabel DOMMediaQueryListMediaPropertyInfo = "DOMMediaQueryList::media"+ attrGet _ = getDOMMediaQueryListMedia+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMMediaQueryList = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("matches", DOMMediaQueryListMatchesPropertyInfo), '("media", DOMMediaQueryListMediaPropertyInfo)]++-- VVV Prop "js-heap-size-limit"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMMemoryInfoJsHeapSizeLimit :: (MonadIO m, DOMMemoryInfoK o) => o -> m Word64+getDOMMemoryInfoJsHeapSizeLimit obj = liftIO $ getObjectPropertyUInt64 obj "js-heap-size-limit"++data DOMMemoryInfoJsHeapSizeLimitPropertyInfo+instance AttrInfo DOMMemoryInfoJsHeapSizeLimitPropertyInfo where+ type AttrAllowedOps DOMMemoryInfoJsHeapSizeLimitPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMemoryInfoJsHeapSizeLimitPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMemoryInfoJsHeapSizeLimitPropertyInfo = DOMMemoryInfoK+ type AttrGetType DOMMemoryInfoJsHeapSizeLimitPropertyInfo = Word64+ type AttrLabel DOMMemoryInfoJsHeapSizeLimitPropertyInfo = "DOMMemoryInfo::js-heap-size-limit"+ attrGet _ = getDOMMemoryInfoJsHeapSizeLimit+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "total-js-heap-size"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMMemoryInfoTotalJsHeapSize :: (MonadIO m, DOMMemoryInfoK o) => o -> m Word64+getDOMMemoryInfoTotalJsHeapSize obj = liftIO $ getObjectPropertyUInt64 obj "total-js-heap-size"++data DOMMemoryInfoTotalJsHeapSizePropertyInfo+instance AttrInfo DOMMemoryInfoTotalJsHeapSizePropertyInfo where+ type AttrAllowedOps DOMMemoryInfoTotalJsHeapSizePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMemoryInfoTotalJsHeapSizePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMemoryInfoTotalJsHeapSizePropertyInfo = DOMMemoryInfoK+ type AttrGetType DOMMemoryInfoTotalJsHeapSizePropertyInfo = Word64+ type AttrLabel DOMMemoryInfoTotalJsHeapSizePropertyInfo = "DOMMemoryInfo::total-js-heap-size"+ attrGet _ = getDOMMemoryInfoTotalJsHeapSize+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "used-js-heap-size"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMMemoryInfoUsedJsHeapSize :: (MonadIO m, DOMMemoryInfoK o) => o -> m Word64+getDOMMemoryInfoUsedJsHeapSize obj = liftIO $ getObjectPropertyUInt64 obj "used-js-heap-size"++data DOMMemoryInfoUsedJsHeapSizePropertyInfo+instance AttrInfo DOMMemoryInfoUsedJsHeapSizePropertyInfo where+ type AttrAllowedOps DOMMemoryInfoUsedJsHeapSizePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMemoryInfoUsedJsHeapSizePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMemoryInfoUsedJsHeapSizePropertyInfo = DOMMemoryInfoK+ type AttrGetType DOMMemoryInfoUsedJsHeapSizePropertyInfo = Word64+ type AttrLabel DOMMemoryInfoUsedJsHeapSizePropertyInfo = "DOMMemoryInfo::used-js-heap-size"+ attrGet _ = getDOMMemoryInfoUsedJsHeapSize+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMMemoryInfo = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("js-heap-size-limit", DOMMemoryInfoJsHeapSizeLimitPropertyInfo), '("total-js-heap-size", DOMMemoryInfoTotalJsHeapSizePropertyInfo), '("used-js-heap-size", DOMMemoryInfoUsedJsHeapSizePropertyInfo)]++type instance AttributeList DOMMessagePort = '[ '("core-object", DOMObjectCoreObjectPropertyInfo)]++type instance AttributeList DOMMicroDataItemValue = '[ '("core-object", DOMObjectCoreObjectPropertyInfo)]++-- VVV Prop "alt-key"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMMouseEventAltKey :: (MonadIO m, DOMMouseEventK o) => o -> m Bool+getDOMMouseEventAltKey obj = liftIO $ getObjectPropertyBool obj "alt-key"++data DOMMouseEventAltKeyPropertyInfo+instance AttrInfo DOMMouseEventAltKeyPropertyInfo where+ type AttrAllowedOps DOMMouseEventAltKeyPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventAltKeyPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventAltKeyPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventAltKeyPropertyInfo = Bool+ type AttrLabel DOMMouseEventAltKeyPropertyInfo = "DOMMouseEvent::alt-key"+ attrGet _ = getDOMMouseEventAltKey+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "button"+ -- Type: TBasicType TUInt32+ -- Flags: [PropertyReadable]++getDOMMouseEventButton :: (MonadIO m, DOMMouseEventK o) => o -> m Word32+getDOMMouseEventButton obj = liftIO $ getObjectPropertyCUInt obj "button"++data DOMMouseEventButtonPropertyInfo+instance AttrInfo DOMMouseEventButtonPropertyInfo where+ type AttrAllowedOps DOMMouseEventButtonPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventButtonPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventButtonPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventButtonPropertyInfo = Word32+ type AttrLabel DOMMouseEventButtonPropertyInfo = "DOMMouseEvent::button"+ attrGet _ = getDOMMouseEventButton+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "client-x"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMMouseEventClientX :: (MonadIO m, DOMMouseEventK o) => o -> m Int64+getDOMMouseEventClientX obj = liftIO $ getObjectPropertyInt64 obj "client-x"++data DOMMouseEventClientXPropertyInfo+instance AttrInfo DOMMouseEventClientXPropertyInfo where+ type AttrAllowedOps DOMMouseEventClientXPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventClientXPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventClientXPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventClientXPropertyInfo = Int64+ type AttrLabel DOMMouseEventClientXPropertyInfo = "DOMMouseEvent::client-x"+ attrGet _ = getDOMMouseEventClientX+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "client-y"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMMouseEventClientY :: (MonadIO m, DOMMouseEventK o) => o -> m Int64+getDOMMouseEventClientY obj = liftIO $ getObjectPropertyInt64 obj "client-y"++data DOMMouseEventClientYPropertyInfo+instance AttrInfo DOMMouseEventClientYPropertyInfo where+ type AttrAllowedOps DOMMouseEventClientYPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventClientYPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventClientYPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventClientYPropertyInfo = Int64+ type AttrLabel DOMMouseEventClientYPropertyInfo = "DOMMouseEvent::client-y"+ attrGet _ = getDOMMouseEventClientY+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "ctrl-key"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMMouseEventCtrlKey :: (MonadIO m, DOMMouseEventK o) => o -> m Bool+getDOMMouseEventCtrlKey obj = liftIO $ getObjectPropertyBool obj "ctrl-key"++data DOMMouseEventCtrlKeyPropertyInfo+instance AttrInfo DOMMouseEventCtrlKeyPropertyInfo where+ type AttrAllowedOps DOMMouseEventCtrlKeyPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventCtrlKeyPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventCtrlKeyPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventCtrlKeyPropertyInfo = Bool+ type AttrLabel DOMMouseEventCtrlKeyPropertyInfo = "DOMMouseEvent::ctrl-key"+ attrGet _ = getDOMMouseEventCtrlKey+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "from-element"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMMouseEventFromElement :: (MonadIO m, DOMMouseEventK o) => o -> m DOMNode+getDOMMouseEventFromElement obj = liftIO $ getObjectPropertyObject obj "from-element" DOMNode++data DOMMouseEventFromElementPropertyInfo+instance AttrInfo DOMMouseEventFromElementPropertyInfo where+ type AttrAllowedOps DOMMouseEventFromElementPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventFromElementPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventFromElementPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventFromElementPropertyInfo = DOMNode+ type AttrLabel DOMMouseEventFromElementPropertyInfo = "DOMMouseEvent::from-element"+ attrGet _ = getDOMMouseEventFromElement+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "meta-key"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMMouseEventMetaKey :: (MonadIO m, DOMMouseEventK o) => o -> m Bool+getDOMMouseEventMetaKey obj = liftIO $ getObjectPropertyBool obj "meta-key"++data DOMMouseEventMetaKeyPropertyInfo+instance AttrInfo DOMMouseEventMetaKeyPropertyInfo where+ type AttrAllowedOps DOMMouseEventMetaKeyPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventMetaKeyPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventMetaKeyPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventMetaKeyPropertyInfo = Bool+ type AttrLabel DOMMouseEventMetaKeyPropertyInfo = "DOMMouseEvent::meta-key"+ attrGet _ = getDOMMouseEventMetaKey+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "offset-x"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMMouseEventOffsetX :: (MonadIO m, DOMMouseEventK o) => o -> m Int64+getDOMMouseEventOffsetX obj = liftIO $ getObjectPropertyInt64 obj "offset-x"++data DOMMouseEventOffsetXPropertyInfo+instance AttrInfo DOMMouseEventOffsetXPropertyInfo where+ type AttrAllowedOps DOMMouseEventOffsetXPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventOffsetXPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventOffsetXPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventOffsetXPropertyInfo = Int64+ type AttrLabel DOMMouseEventOffsetXPropertyInfo = "DOMMouseEvent::offset-x"+ attrGet _ = getDOMMouseEventOffsetX+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "offset-y"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMMouseEventOffsetY :: (MonadIO m, DOMMouseEventK o) => o -> m Int64+getDOMMouseEventOffsetY obj = liftIO $ getObjectPropertyInt64 obj "offset-y"++data DOMMouseEventOffsetYPropertyInfo+instance AttrInfo DOMMouseEventOffsetYPropertyInfo where+ type AttrAllowedOps DOMMouseEventOffsetYPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventOffsetYPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventOffsetYPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventOffsetYPropertyInfo = Int64+ type AttrLabel DOMMouseEventOffsetYPropertyInfo = "DOMMouseEvent::offset-y"+ attrGet _ = getDOMMouseEventOffsetY+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "related-target"+ -- Type: TInterface "WebKit" "DOMEventTarget"+ -- Flags: [PropertyReadable]++getDOMMouseEventRelatedTarget :: (MonadIO m, DOMMouseEventK o) => o -> m DOMEventTarget+getDOMMouseEventRelatedTarget obj = liftIO $ getObjectPropertyObject obj "related-target" DOMEventTarget++data DOMMouseEventRelatedTargetPropertyInfo+instance AttrInfo DOMMouseEventRelatedTargetPropertyInfo where+ type AttrAllowedOps DOMMouseEventRelatedTargetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventRelatedTargetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventRelatedTargetPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventRelatedTargetPropertyInfo = DOMEventTarget+ type AttrLabel DOMMouseEventRelatedTargetPropertyInfo = "DOMMouseEvent::related-target"+ attrGet _ = getDOMMouseEventRelatedTarget+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "screen-x"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMMouseEventScreenX :: (MonadIO m, DOMMouseEventK o) => o -> m Int64+getDOMMouseEventScreenX obj = liftIO $ getObjectPropertyInt64 obj "screen-x"++data DOMMouseEventScreenXPropertyInfo+instance AttrInfo DOMMouseEventScreenXPropertyInfo where+ type AttrAllowedOps DOMMouseEventScreenXPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventScreenXPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventScreenXPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventScreenXPropertyInfo = Int64+ type AttrLabel DOMMouseEventScreenXPropertyInfo = "DOMMouseEvent::screen-x"+ attrGet _ = getDOMMouseEventScreenX+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "screen-y"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMMouseEventScreenY :: (MonadIO m, DOMMouseEventK o) => o -> m Int64+getDOMMouseEventScreenY obj = liftIO $ getObjectPropertyInt64 obj "screen-y"++data DOMMouseEventScreenYPropertyInfo+instance AttrInfo DOMMouseEventScreenYPropertyInfo where+ type AttrAllowedOps DOMMouseEventScreenYPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventScreenYPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventScreenYPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventScreenYPropertyInfo = Int64+ type AttrLabel DOMMouseEventScreenYPropertyInfo = "DOMMouseEvent::screen-y"+ attrGet _ = getDOMMouseEventScreenY+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "shift-key"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMMouseEventShiftKey :: (MonadIO m, DOMMouseEventK o) => o -> m Bool+getDOMMouseEventShiftKey obj = liftIO $ getObjectPropertyBool obj "shift-key"++data DOMMouseEventShiftKeyPropertyInfo+instance AttrInfo DOMMouseEventShiftKeyPropertyInfo where+ type AttrAllowedOps DOMMouseEventShiftKeyPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventShiftKeyPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventShiftKeyPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventShiftKeyPropertyInfo = Bool+ type AttrLabel DOMMouseEventShiftKeyPropertyInfo = "DOMMouseEvent::shift-key"+ attrGet _ = getDOMMouseEventShiftKey+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "to-element"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMMouseEventToElement :: (MonadIO m, DOMMouseEventK o) => o -> m DOMNode+getDOMMouseEventToElement obj = liftIO $ getObjectPropertyObject obj "to-element" DOMNode++data DOMMouseEventToElementPropertyInfo+instance AttrInfo DOMMouseEventToElementPropertyInfo where+ type AttrAllowedOps DOMMouseEventToElementPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventToElementPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventToElementPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventToElementPropertyInfo = DOMNode+ type AttrLabel DOMMouseEventToElementPropertyInfo = "DOMMouseEvent::to-element"+ attrGet _ = getDOMMouseEventToElement+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-movement-x"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMMouseEventWebkitMovementX :: (MonadIO m, DOMMouseEventK o) => o -> m Int64+getDOMMouseEventWebkitMovementX obj = liftIO $ getObjectPropertyInt64 obj "webkit-movement-x"++data DOMMouseEventWebkitMovementXPropertyInfo+instance AttrInfo DOMMouseEventWebkitMovementXPropertyInfo where+ type AttrAllowedOps DOMMouseEventWebkitMovementXPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventWebkitMovementXPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventWebkitMovementXPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventWebkitMovementXPropertyInfo = Int64+ type AttrLabel DOMMouseEventWebkitMovementXPropertyInfo = "DOMMouseEvent::webkit-movement-x"+ attrGet _ = getDOMMouseEventWebkitMovementX+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-movement-y"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMMouseEventWebkitMovementY :: (MonadIO m, DOMMouseEventK o) => o -> m Int64+getDOMMouseEventWebkitMovementY obj = liftIO $ getObjectPropertyInt64 obj "webkit-movement-y"++data DOMMouseEventWebkitMovementYPropertyInfo+instance AttrInfo DOMMouseEventWebkitMovementYPropertyInfo where+ type AttrAllowedOps DOMMouseEventWebkitMovementYPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventWebkitMovementYPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventWebkitMovementYPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventWebkitMovementYPropertyInfo = Int64+ type AttrLabel DOMMouseEventWebkitMovementYPropertyInfo = "DOMMouseEvent::webkit-movement-y"+ attrGet _ = getDOMMouseEventWebkitMovementY+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "x"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMMouseEventX :: (MonadIO m, DOMMouseEventK o) => o -> m Int64+getDOMMouseEventX obj = liftIO $ getObjectPropertyInt64 obj "x"++data DOMMouseEventXPropertyInfo+instance AttrInfo DOMMouseEventXPropertyInfo where+ type AttrAllowedOps DOMMouseEventXPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventXPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventXPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventXPropertyInfo = Int64+ type AttrLabel DOMMouseEventXPropertyInfo = "DOMMouseEvent::x"+ attrGet _ = getDOMMouseEventX+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "y"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMMouseEventY :: (MonadIO m, DOMMouseEventK o) => o -> m Int64+getDOMMouseEventY obj = liftIO $ getObjectPropertyInt64 obj "y"++data DOMMouseEventYPropertyInfo+instance AttrInfo DOMMouseEventYPropertyInfo where+ type AttrAllowedOps DOMMouseEventYPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMMouseEventYPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMMouseEventYPropertyInfo = DOMMouseEventK+ type AttrGetType DOMMouseEventYPropertyInfo = Int64+ type AttrLabel DOMMouseEventYPropertyInfo = "DOMMouseEvent::y"+ attrGet _ = getDOMMouseEventY+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMMouseEvent = '[ '("alt-key", DOMMouseEventAltKeyPropertyInfo), '("bubbles", DOMEventBubblesPropertyInfo), '("button", DOMMouseEventButtonPropertyInfo), '("cancel-bubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("char-code", DOMUIEventCharCodePropertyInfo), '("client-x", DOMMouseEventClientXPropertyInfo), '("client-y", DOMMouseEventClientYPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("ctrl-key", DOMMouseEventCtrlKeyPropertyInfo), '("current-target", DOMEventCurrentTargetPropertyInfo), '("default-prevented", DOMEventDefaultPreventedPropertyInfo), '("detail", DOMUIEventDetailPropertyInfo), '("event-phase", DOMEventEventPhasePropertyInfo), '("from-element", DOMMouseEventFromElementPropertyInfo), '("key-code", DOMUIEventKeyCodePropertyInfo), '("layer-x", DOMUIEventLayerXPropertyInfo), '("layer-y", DOMUIEventLayerYPropertyInfo), '("meta-key", DOMMouseEventMetaKeyPropertyInfo), '("offset-x", DOMMouseEventOffsetXPropertyInfo), '("offset-y", DOMMouseEventOffsetYPropertyInfo), '("page-x", DOMUIEventPageXPropertyInfo), '("page-y", DOMUIEventPageYPropertyInfo), '("related-target", DOMMouseEventRelatedTargetPropertyInfo), '("return-value", DOMEventReturnValuePropertyInfo), '("screen-x", DOMMouseEventScreenXPropertyInfo), '("screen-y", DOMMouseEventScreenYPropertyInfo), '("shift-key", DOMMouseEventShiftKeyPropertyInfo), '("src-element", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("time-stamp", DOMEventTimeStampPropertyInfo), '("to-element", DOMMouseEventToElementPropertyInfo), '("type", DOMEventTypePropertyInfo), '("view", DOMUIEventViewPropertyInfo), '("webkit-movement-x", DOMMouseEventWebkitMovementXPropertyInfo), '("webkit-movement-y", DOMMouseEventWebkitMovementYPropertyInfo), '("which", DOMUIEventWhichPropertyInfo), '("x", DOMMouseEventXPropertyInfo), '("y", DOMMouseEventYPropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMNamedNodeMapLength :: (MonadIO m, DOMNamedNodeMapK o) => o -> m Word64+getDOMNamedNodeMapLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMNamedNodeMapLengthPropertyInfo+instance AttrInfo DOMNamedNodeMapLengthPropertyInfo where+ type AttrAllowedOps DOMNamedNodeMapLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNamedNodeMapLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNamedNodeMapLengthPropertyInfo = DOMNamedNodeMapK+ type AttrGetType DOMNamedNodeMapLengthPropertyInfo = Word64+ type AttrLabel DOMNamedNodeMapLengthPropertyInfo = "DOMNamedNodeMap::length"+ attrGet _ = getDOMNamedNodeMapLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMNamedNodeMap = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMNamedNodeMapLengthPropertyInfo)]++-- VVV Prop "app-code-name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMNavigatorAppCodeName :: (MonadIO m, DOMNavigatorK o) => o -> m T.Text+getDOMNavigatorAppCodeName obj = liftIO $ getObjectPropertyString obj "app-code-name"++data DOMNavigatorAppCodeNamePropertyInfo+instance AttrInfo DOMNavigatorAppCodeNamePropertyInfo where+ type AttrAllowedOps DOMNavigatorAppCodeNamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorAppCodeNamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorAppCodeNamePropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorAppCodeNamePropertyInfo = T.Text+ type AttrLabel DOMNavigatorAppCodeNamePropertyInfo = "DOMNavigator::app-code-name"+ attrGet _ = getDOMNavigatorAppCodeName+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "app-name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMNavigatorAppName :: (MonadIO m, DOMNavigatorK o) => o -> m T.Text+getDOMNavigatorAppName obj = liftIO $ getObjectPropertyString obj "app-name"++data DOMNavigatorAppNamePropertyInfo+instance AttrInfo DOMNavigatorAppNamePropertyInfo where+ type AttrAllowedOps DOMNavigatorAppNamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorAppNamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorAppNamePropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorAppNamePropertyInfo = T.Text+ type AttrLabel DOMNavigatorAppNamePropertyInfo = "DOMNavigator::app-name"+ attrGet _ = getDOMNavigatorAppName+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "app-version"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMNavigatorAppVersion :: (MonadIO m, DOMNavigatorK o) => o -> m T.Text+getDOMNavigatorAppVersion obj = liftIO $ getObjectPropertyString obj "app-version"++data DOMNavigatorAppVersionPropertyInfo+instance AttrInfo DOMNavigatorAppVersionPropertyInfo where+ type AttrAllowedOps DOMNavigatorAppVersionPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorAppVersionPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorAppVersionPropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorAppVersionPropertyInfo = T.Text+ type AttrLabel DOMNavigatorAppVersionPropertyInfo = "DOMNavigator::app-version"+ attrGet _ = getDOMNavigatorAppVersion+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "cookie-enabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMNavigatorCookieEnabled :: (MonadIO m, DOMNavigatorK o) => o -> m Bool+getDOMNavigatorCookieEnabled obj = liftIO $ getObjectPropertyBool obj "cookie-enabled"++data DOMNavigatorCookieEnabledPropertyInfo+instance AttrInfo DOMNavigatorCookieEnabledPropertyInfo where+ type AttrAllowedOps DOMNavigatorCookieEnabledPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorCookieEnabledPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorCookieEnabledPropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorCookieEnabledPropertyInfo = Bool+ type AttrLabel DOMNavigatorCookieEnabledPropertyInfo = "DOMNavigator::cookie-enabled"+ attrGet _ = getDOMNavigatorCookieEnabled+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "geolocation"+ -- Type: TInterface "WebKit" "DOMGeolocation"+ -- Flags: [PropertyReadable]++getDOMNavigatorGeolocation :: (MonadIO m, DOMNavigatorK o) => o -> m DOMGeolocation+getDOMNavigatorGeolocation obj = liftIO $ getObjectPropertyObject obj "geolocation" DOMGeolocation++data DOMNavigatorGeolocationPropertyInfo+instance AttrInfo DOMNavigatorGeolocationPropertyInfo where+ type AttrAllowedOps DOMNavigatorGeolocationPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorGeolocationPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorGeolocationPropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorGeolocationPropertyInfo = DOMGeolocation+ type AttrLabel DOMNavigatorGeolocationPropertyInfo = "DOMNavigator::geolocation"+ attrGet _ = getDOMNavigatorGeolocation+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "language"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMNavigatorLanguage :: (MonadIO m, DOMNavigatorK o) => o -> m T.Text+getDOMNavigatorLanguage obj = liftIO $ getObjectPropertyString obj "language"++data DOMNavigatorLanguagePropertyInfo+instance AttrInfo DOMNavigatorLanguagePropertyInfo where+ type AttrAllowedOps DOMNavigatorLanguagePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorLanguagePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorLanguagePropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorLanguagePropertyInfo = T.Text+ type AttrLabel DOMNavigatorLanguagePropertyInfo = "DOMNavigator::language"+ attrGet _ = getDOMNavigatorLanguage+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "mime-types"+ -- Type: TInterface "WebKit" "DOMDOMMimeTypeArray"+ -- Flags: [PropertyReadable]++getDOMNavigatorMimeTypes :: (MonadIO m, DOMNavigatorK o) => o -> m DOMDOMMimeTypeArray+getDOMNavigatorMimeTypes obj = liftIO $ getObjectPropertyObject obj "mime-types" DOMDOMMimeTypeArray++data DOMNavigatorMimeTypesPropertyInfo+instance AttrInfo DOMNavigatorMimeTypesPropertyInfo where+ type AttrAllowedOps DOMNavigatorMimeTypesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorMimeTypesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorMimeTypesPropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorMimeTypesPropertyInfo = DOMDOMMimeTypeArray+ type AttrLabel DOMNavigatorMimeTypesPropertyInfo = "DOMNavigator::mime-types"+ attrGet _ = getDOMNavigatorMimeTypes+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "on-line"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMNavigatorOnLine :: (MonadIO m, DOMNavigatorK o) => o -> m Bool+getDOMNavigatorOnLine obj = liftIO $ getObjectPropertyBool obj "on-line"++data DOMNavigatorOnLinePropertyInfo+instance AttrInfo DOMNavigatorOnLinePropertyInfo where+ type AttrAllowedOps DOMNavigatorOnLinePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorOnLinePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorOnLinePropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorOnLinePropertyInfo = Bool+ type AttrLabel DOMNavigatorOnLinePropertyInfo = "DOMNavigator::on-line"+ attrGet _ = getDOMNavigatorOnLine+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "platform"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMNavigatorPlatform :: (MonadIO m, DOMNavigatorK o) => o -> m T.Text+getDOMNavigatorPlatform obj = liftIO $ getObjectPropertyString obj "platform"++data DOMNavigatorPlatformPropertyInfo+instance AttrInfo DOMNavigatorPlatformPropertyInfo where+ type AttrAllowedOps DOMNavigatorPlatformPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorPlatformPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorPlatformPropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorPlatformPropertyInfo = T.Text+ type AttrLabel DOMNavigatorPlatformPropertyInfo = "DOMNavigator::platform"+ attrGet _ = getDOMNavigatorPlatform+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "plugins"+ -- Type: TInterface "WebKit" "DOMDOMPluginArray"+ -- Flags: [PropertyReadable]++getDOMNavigatorPlugins :: (MonadIO m, DOMNavigatorK o) => o -> m DOMDOMPluginArray+getDOMNavigatorPlugins obj = liftIO $ getObjectPropertyObject obj "plugins" DOMDOMPluginArray++data DOMNavigatorPluginsPropertyInfo+instance AttrInfo DOMNavigatorPluginsPropertyInfo where+ type AttrAllowedOps DOMNavigatorPluginsPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorPluginsPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorPluginsPropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorPluginsPropertyInfo = DOMDOMPluginArray+ type AttrLabel DOMNavigatorPluginsPropertyInfo = "DOMNavigator::plugins"+ attrGet _ = getDOMNavigatorPlugins+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "product"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMNavigatorProduct :: (MonadIO m, DOMNavigatorK o) => o -> m T.Text+getDOMNavigatorProduct obj = liftIO $ getObjectPropertyString obj "product"++data DOMNavigatorProductPropertyInfo+instance AttrInfo DOMNavigatorProductPropertyInfo where+ type AttrAllowedOps DOMNavigatorProductPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorProductPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorProductPropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorProductPropertyInfo = T.Text+ type AttrLabel DOMNavigatorProductPropertyInfo = "DOMNavigator::product"+ attrGet _ = getDOMNavigatorProduct+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "product-sub"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMNavigatorProductSub :: (MonadIO m, DOMNavigatorK o) => o -> m T.Text+getDOMNavigatorProductSub obj = liftIO $ getObjectPropertyString obj "product-sub"++data DOMNavigatorProductSubPropertyInfo+instance AttrInfo DOMNavigatorProductSubPropertyInfo where+ type AttrAllowedOps DOMNavigatorProductSubPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorProductSubPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorProductSubPropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorProductSubPropertyInfo = T.Text+ type AttrLabel DOMNavigatorProductSubPropertyInfo = "DOMNavigator::product-sub"+ attrGet _ = getDOMNavigatorProductSub+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "user-agent"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMNavigatorUserAgent :: (MonadIO m, DOMNavigatorK o) => o -> m T.Text+getDOMNavigatorUserAgent obj = liftIO $ getObjectPropertyString obj "user-agent"++data DOMNavigatorUserAgentPropertyInfo+instance AttrInfo DOMNavigatorUserAgentPropertyInfo where+ type AttrAllowedOps DOMNavigatorUserAgentPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorUserAgentPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorUserAgentPropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorUserAgentPropertyInfo = T.Text+ type AttrLabel DOMNavigatorUserAgentPropertyInfo = "DOMNavigator::user-agent"+ attrGet _ = getDOMNavigatorUserAgent+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "vendor"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMNavigatorVendor :: (MonadIO m, DOMNavigatorK o) => o -> m T.Text+getDOMNavigatorVendor obj = liftIO $ getObjectPropertyString obj "vendor"++data DOMNavigatorVendorPropertyInfo+instance AttrInfo DOMNavigatorVendorPropertyInfo where+ type AttrAllowedOps DOMNavigatorVendorPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorVendorPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorVendorPropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorVendorPropertyInfo = T.Text+ type AttrLabel DOMNavigatorVendorPropertyInfo = "DOMNavigator::vendor"+ attrGet _ = getDOMNavigatorVendor+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "vendor-sub"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMNavigatorVendorSub :: (MonadIO m, DOMNavigatorK o) => o -> m T.Text+getDOMNavigatorVendorSub obj = liftIO $ getObjectPropertyString obj "vendor-sub"++data DOMNavigatorVendorSubPropertyInfo+instance AttrInfo DOMNavigatorVendorSubPropertyInfo where+ type AttrAllowedOps DOMNavigatorVendorSubPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorVendorSubPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorVendorSubPropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorVendorSubPropertyInfo = T.Text+ type AttrLabel DOMNavigatorVendorSubPropertyInfo = "DOMNavigator::vendor-sub"+ attrGet _ = getDOMNavigatorVendorSub+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-battery"+ -- Type: TInterface "WebKit" "DOMBatteryManager"+ -- Flags: [PropertyReadable]++getDOMNavigatorWebkitBattery :: (MonadIO m, DOMNavigatorK o) => o -> m DOMBatteryManager+getDOMNavigatorWebkitBattery obj = liftIO $ getObjectPropertyObject obj "webkit-battery" DOMBatteryManager++data DOMNavigatorWebkitBatteryPropertyInfo+instance AttrInfo DOMNavigatorWebkitBatteryPropertyInfo where+ type AttrAllowedOps DOMNavigatorWebkitBatteryPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorWebkitBatteryPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorWebkitBatteryPropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorWebkitBatteryPropertyInfo = DOMBatteryManager+ type AttrLabel DOMNavigatorWebkitBatteryPropertyInfo = "DOMNavigator::webkit-battery"+ attrGet _ = getDOMNavigatorWebkitBattery+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-persistent-storage"+ -- Type: TInterface "WebKit" "DOMStorageQuota"+ -- Flags: [PropertyReadable]++getDOMNavigatorWebkitPersistentStorage :: (MonadIO m, DOMNavigatorK o) => o -> m DOMStorageQuota+getDOMNavigatorWebkitPersistentStorage obj = liftIO $ getObjectPropertyObject obj "webkit-persistent-storage" DOMStorageQuota++data DOMNavigatorWebkitPersistentStoragePropertyInfo+instance AttrInfo DOMNavigatorWebkitPersistentStoragePropertyInfo where+ type AttrAllowedOps DOMNavigatorWebkitPersistentStoragePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorWebkitPersistentStoragePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorWebkitPersistentStoragePropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorWebkitPersistentStoragePropertyInfo = DOMStorageQuota+ type AttrLabel DOMNavigatorWebkitPersistentStoragePropertyInfo = "DOMNavigator::webkit-persistent-storage"+ attrGet _ = getDOMNavigatorWebkitPersistentStorage+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-temporary-storage"+ -- Type: TInterface "WebKit" "DOMStorageQuota"+ -- Flags: [PropertyReadable]++getDOMNavigatorWebkitTemporaryStorage :: (MonadIO m, DOMNavigatorK o) => o -> m DOMStorageQuota+getDOMNavigatorWebkitTemporaryStorage obj = liftIO $ getObjectPropertyObject obj "webkit-temporary-storage" DOMStorageQuota++data DOMNavigatorWebkitTemporaryStoragePropertyInfo+instance AttrInfo DOMNavigatorWebkitTemporaryStoragePropertyInfo where+ type AttrAllowedOps DOMNavigatorWebkitTemporaryStoragePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNavigatorWebkitTemporaryStoragePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNavigatorWebkitTemporaryStoragePropertyInfo = DOMNavigatorK+ type AttrGetType DOMNavigatorWebkitTemporaryStoragePropertyInfo = DOMStorageQuota+ type AttrLabel DOMNavigatorWebkitTemporaryStoragePropertyInfo = "DOMNavigator::webkit-temporary-storage"+ attrGet _ = getDOMNavigatorWebkitTemporaryStorage+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMNavigator = '[ '("app-code-name", DOMNavigatorAppCodeNamePropertyInfo), '("app-name", DOMNavigatorAppNamePropertyInfo), '("app-version", DOMNavigatorAppVersionPropertyInfo), '("cookie-enabled", DOMNavigatorCookieEnabledPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("geolocation", DOMNavigatorGeolocationPropertyInfo), '("language", DOMNavigatorLanguagePropertyInfo), '("mime-types", DOMNavigatorMimeTypesPropertyInfo), '("on-line", DOMNavigatorOnLinePropertyInfo), '("platform", DOMNavigatorPlatformPropertyInfo), '("plugins", DOMNavigatorPluginsPropertyInfo), '("product", DOMNavigatorProductPropertyInfo), '("product-sub", DOMNavigatorProductSubPropertyInfo), '("user-agent", DOMNavigatorUserAgentPropertyInfo), '("vendor", DOMNavigatorVendorPropertyInfo), '("vendor-sub", DOMNavigatorVendorSubPropertyInfo), '("webkit-battery", DOMNavigatorWebkitBatteryPropertyInfo), '("webkit-persistent-storage", DOMNavigatorWebkitPersistentStoragePropertyInfo), '("webkit-temporary-storage", DOMNavigatorWebkitTemporaryStoragePropertyInfo)]++-- VVV Prop "base-uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMNodeBaseUri :: (MonadIO m, DOMNodeK o) => o -> m T.Text+getDOMNodeBaseUri obj = liftIO $ getObjectPropertyString obj "base-uri"++data DOMNodeBaseUriPropertyInfo+instance AttrInfo DOMNodeBaseUriPropertyInfo where+ type AttrAllowedOps DOMNodeBaseUriPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeBaseUriPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeBaseUriPropertyInfo = DOMNodeK+ type AttrGetType DOMNodeBaseUriPropertyInfo = T.Text+ type AttrLabel DOMNodeBaseUriPropertyInfo = "DOMNode::base-uri"+ attrGet _ = getDOMNodeBaseUri+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "child-nodes"+ -- Type: TInterface "WebKit" "DOMNodeList"+ -- Flags: [PropertyReadable]++getDOMNodeChildNodes :: (MonadIO m, DOMNodeK o) => o -> m DOMNodeList+getDOMNodeChildNodes obj = liftIO $ getObjectPropertyObject obj "child-nodes" DOMNodeList++data DOMNodeChildNodesPropertyInfo+instance AttrInfo DOMNodeChildNodesPropertyInfo where+ type AttrAllowedOps DOMNodeChildNodesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeChildNodesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeChildNodesPropertyInfo = DOMNodeK+ type AttrGetType DOMNodeChildNodesPropertyInfo = DOMNodeList+ type AttrLabel DOMNodeChildNodesPropertyInfo = "DOMNode::child-nodes"+ attrGet _ = getDOMNodeChildNodes+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "first-child"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMNodeFirstChild :: (MonadIO m, DOMNodeK o) => o -> m DOMNode+getDOMNodeFirstChild obj = liftIO $ getObjectPropertyObject obj "first-child" DOMNode++data DOMNodeFirstChildPropertyInfo+instance AttrInfo DOMNodeFirstChildPropertyInfo where+ type AttrAllowedOps DOMNodeFirstChildPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeFirstChildPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeFirstChildPropertyInfo = DOMNodeK+ type AttrGetType DOMNodeFirstChildPropertyInfo = DOMNode+ type AttrLabel DOMNodeFirstChildPropertyInfo = "DOMNode::first-child"+ attrGet _ = getDOMNodeFirstChild+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "last-child"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMNodeLastChild :: (MonadIO m, DOMNodeK o) => o -> m DOMNode+getDOMNodeLastChild obj = liftIO $ getObjectPropertyObject obj "last-child" DOMNode++data DOMNodeLastChildPropertyInfo+instance AttrInfo DOMNodeLastChildPropertyInfo where+ type AttrAllowedOps DOMNodeLastChildPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeLastChildPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeLastChildPropertyInfo = DOMNodeK+ type AttrGetType DOMNodeLastChildPropertyInfo = DOMNode+ type AttrLabel DOMNodeLastChildPropertyInfo = "DOMNode::last-child"+ attrGet _ = getDOMNodeLastChild+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "local-name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMNodeLocalName :: (MonadIO m, DOMNodeK o) => o -> m T.Text+getDOMNodeLocalName obj = liftIO $ getObjectPropertyString obj "local-name"++data DOMNodeLocalNamePropertyInfo+instance AttrInfo DOMNodeLocalNamePropertyInfo where+ type AttrAllowedOps DOMNodeLocalNamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeLocalNamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeLocalNamePropertyInfo = DOMNodeK+ type AttrGetType DOMNodeLocalNamePropertyInfo = T.Text+ type AttrLabel DOMNodeLocalNamePropertyInfo = "DOMNode::local-name"+ attrGet _ = getDOMNodeLocalName+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "namespace-uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMNodeNamespaceUri :: (MonadIO m, DOMNodeK o) => o -> m T.Text+getDOMNodeNamespaceUri obj = liftIO $ getObjectPropertyString obj "namespace-uri"++data DOMNodeNamespaceUriPropertyInfo+instance AttrInfo DOMNodeNamespaceUriPropertyInfo where+ type AttrAllowedOps DOMNodeNamespaceUriPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeNamespaceUriPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeNamespaceUriPropertyInfo = DOMNodeK+ type AttrGetType DOMNodeNamespaceUriPropertyInfo = T.Text+ type AttrLabel DOMNodeNamespaceUriPropertyInfo = "DOMNode::namespace-uri"+ attrGet _ = getDOMNodeNamespaceUri+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "next-sibling"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMNodeNextSibling :: (MonadIO m, DOMNodeK o) => o -> m DOMNode+getDOMNodeNextSibling obj = liftIO $ getObjectPropertyObject obj "next-sibling" DOMNode++data DOMNodeNextSiblingPropertyInfo+instance AttrInfo DOMNodeNextSiblingPropertyInfo where+ type AttrAllowedOps DOMNodeNextSiblingPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeNextSiblingPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeNextSiblingPropertyInfo = DOMNodeK+ type AttrGetType DOMNodeNextSiblingPropertyInfo = DOMNode+ type AttrLabel DOMNodeNextSiblingPropertyInfo = "DOMNode::next-sibling"+ attrGet _ = getDOMNodeNextSibling+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "node-name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMNodeNodeName :: (MonadIO m, DOMNodeK o) => o -> m T.Text+getDOMNodeNodeName obj = liftIO $ getObjectPropertyString obj "node-name"++data DOMNodeNodeNamePropertyInfo+instance AttrInfo DOMNodeNodeNamePropertyInfo where+ type AttrAllowedOps DOMNodeNodeNamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeNodeNamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeNodeNamePropertyInfo = DOMNodeK+ type AttrGetType DOMNodeNodeNamePropertyInfo = T.Text+ type AttrLabel DOMNodeNodeNamePropertyInfo = "DOMNode::node-name"+ attrGet _ = getDOMNodeNodeName+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "node-type"+ -- Type: TBasicType TUInt32+ -- Flags: [PropertyReadable]++getDOMNodeNodeType :: (MonadIO m, DOMNodeK o) => o -> m Word32+getDOMNodeNodeType obj = liftIO $ getObjectPropertyCUInt obj "node-type"++data DOMNodeNodeTypePropertyInfo+instance AttrInfo DOMNodeNodeTypePropertyInfo where+ type AttrAllowedOps DOMNodeNodeTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeNodeTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeNodeTypePropertyInfo = DOMNodeK+ type AttrGetType DOMNodeNodeTypePropertyInfo = Word32+ type AttrLabel DOMNodeNodeTypePropertyInfo = "DOMNode::node-type"+ attrGet _ = getDOMNodeNodeType+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "node-value"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMNodeNodeValue :: (MonadIO m, DOMNodeK o) => o -> m T.Text+getDOMNodeNodeValue obj = liftIO $ getObjectPropertyString obj "node-value"++setDOMNodeNodeValue :: (MonadIO m, DOMNodeK o) => o -> T.Text -> m ()+setDOMNodeNodeValue obj val = liftIO $ setObjectPropertyString obj "node-value" val++constructDOMNodeNodeValue :: T.Text -> IO ([Char], GValue)+constructDOMNodeNodeValue val = constructObjectPropertyString "node-value" val++data DOMNodeNodeValuePropertyInfo+instance AttrInfo DOMNodeNodeValuePropertyInfo where+ type AttrAllowedOps DOMNodeNodeValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMNodeNodeValuePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMNodeNodeValuePropertyInfo = DOMNodeK+ type AttrGetType DOMNodeNodeValuePropertyInfo = T.Text+ type AttrLabel DOMNodeNodeValuePropertyInfo = "DOMNode::node-value"+ attrGet _ = getDOMNodeNodeValue+ attrSet _ = setDOMNodeNodeValue+ attrConstruct _ = constructDOMNodeNodeValue++-- VVV Prop "owner-document"+ -- Type: TInterface "WebKit" "DOMDocument"+ -- Flags: [PropertyReadable]++getDOMNodeOwnerDocument :: (MonadIO m, DOMNodeK o) => o -> m DOMDocument+getDOMNodeOwnerDocument obj = liftIO $ getObjectPropertyObject obj "owner-document" DOMDocument++data DOMNodeOwnerDocumentPropertyInfo+instance AttrInfo DOMNodeOwnerDocumentPropertyInfo where+ type AttrAllowedOps DOMNodeOwnerDocumentPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeOwnerDocumentPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeOwnerDocumentPropertyInfo = DOMNodeK+ type AttrGetType DOMNodeOwnerDocumentPropertyInfo = DOMDocument+ type AttrLabel DOMNodeOwnerDocumentPropertyInfo = "DOMNode::owner-document"+ attrGet _ = getDOMNodeOwnerDocument+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "parent-element"+ -- Type: TInterface "WebKit" "DOMElement"+ -- Flags: [PropertyReadable]++getDOMNodeParentElement :: (MonadIO m, DOMNodeK o) => o -> m DOMElement+getDOMNodeParentElement obj = liftIO $ getObjectPropertyObject obj "parent-element" DOMElement++data DOMNodeParentElementPropertyInfo+instance AttrInfo DOMNodeParentElementPropertyInfo where+ type AttrAllowedOps DOMNodeParentElementPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeParentElementPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeParentElementPropertyInfo = DOMNodeK+ type AttrGetType DOMNodeParentElementPropertyInfo = DOMElement+ type AttrLabel DOMNodeParentElementPropertyInfo = "DOMNode::parent-element"+ attrGet _ = getDOMNodeParentElement+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "parent-node"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMNodeParentNode :: (MonadIO m, DOMNodeK o) => o -> m DOMNode+getDOMNodeParentNode obj = liftIO $ getObjectPropertyObject obj "parent-node" DOMNode++data DOMNodeParentNodePropertyInfo+instance AttrInfo DOMNodeParentNodePropertyInfo where+ type AttrAllowedOps DOMNodeParentNodePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeParentNodePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeParentNodePropertyInfo = DOMNodeK+ type AttrGetType DOMNodeParentNodePropertyInfo = DOMNode+ type AttrLabel DOMNodeParentNodePropertyInfo = "DOMNode::parent-node"+ attrGet _ = getDOMNodeParentNode+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "prefix"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMNodePrefix :: (MonadIO m, DOMNodeK o) => o -> m T.Text+getDOMNodePrefix obj = liftIO $ getObjectPropertyString obj "prefix"++setDOMNodePrefix :: (MonadIO m, DOMNodeK o) => o -> T.Text -> m ()+setDOMNodePrefix obj val = liftIO $ setObjectPropertyString obj "prefix" val++constructDOMNodePrefix :: T.Text -> IO ([Char], GValue)+constructDOMNodePrefix val = constructObjectPropertyString "prefix" val++data DOMNodePrefixPropertyInfo+instance AttrInfo DOMNodePrefixPropertyInfo where+ type AttrAllowedOps DOMNodePrefixPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMNodePrefixPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMNodePrefixPropertyInfo = DOMNodeK+ type AttrGetType DOMNodePrefixPropertyInfo = T.Text+ type AttrLabel DOMNodePrefixPropertyInfo = "DOMNode::prefix"+ attrGet _ = getDOMNodePrefix+ attrSet _ = setDOMNodePrefix+ attrConstruct _ = constructDOMNodePrefix++-- VVV Prop "previous-sibling"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMNodePreviousSibling :: (MonadIO m, DOMNodeK o) => o -> m DOMNode+getDOMNodePreviousSibling obj = liftIO $ getObjectPropertyObject obj "previous-sibling" DOMNode++data DOMNodePreviousSiblingPropertyInfo+instance AttrInfo DOMNodePreviousSiblingPropertyInfo where+ type AttrAllowedOps DOMNodePreviousSiblingPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodePreviousSiblingPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodePreviousSiblingPropertyInfo = DOMNodeK+ type AttrGetType DOMNodePreviousSiblingPropertyInfo = DOMNode+ type AttrLabel DOMNodePreviousSiblingPropertyInfo = "DOMNode::previous-sibling"+ attrGet _ = getDOMNodePreviousSibling+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "text-content"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMNodeTextContent :: (MonadIO m, DOMNodeK o) => o -> m T.Text+getDOMNodeTextContent obj = liftIO $ getObjectPropertyString obj "text-content"++setDOMNodeTextContent :: (MonadIO m, DOMNodeK o) => o -> T.Text -> m ()+setDOMNodeTextContent obj val = liftIO $ setObjectPropertyString obj "text-content" val++constructDOMNodeTextContent :: T.Text -> IO ([Char], GValue)+constructDOMNodeTextContent val = constructObjectPropertyString "text-content" val++data DOMNodeTextContentPropertyInfo+instance AttrInfo DOMNodeTextContentPropertyInfo where+ type AttrAllowedOps DOMNodeTextContentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMNodeTextContentPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMNodeTextContentPropertyInfo = DOMNodeK+ type AttrGetType DOMNodeTextContentPropertyInfo = T.Text+ type AttrLabel DOMNodeTextContentPropertyInfo = "DOMNode::text-content"+ attrGet _ = getDOMNodeTextContent+ attrSet _ = setDOMNodeTextContent+ attrConstruct _ = constructDOMNodeTextContent++type instance AttributeList DOMNode = '[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo)]++type instance AttributeList DOMNodeFilter = '[ '("core-object", DOMObjectCoreObjectPropertyInfo)]++-- VVV Prop "expand-entity-references"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMNodeIteratorExpandEntityReferences :: (MonadIO m, DOMNodeIteratorK o) => o -> m Bool+getDOMNodeIteratorExpandEntityReferences obj = liftIO $ getObjectPropertyBool obj "expand-entity-references"++data DOMNodeIteratorExpandEntityReferencesPropertyInfo+instance AttrInfo DOMNodeIteratorExpandEntityReferencesPropertyInfo where+ type AttrAllowedOps DOMNodeIteratorExpandEntityReferencesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeIteratorExpandEntityReferencesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeIteratorExpandEntityReferencesPropertyInfo = DOMNodeIteratorK+ type AttrGetType DOMNodeIteratorExpandEntityReferencesPropertyInfo = Bool+ type AttrLabel DOMNodeIteratorExpandEntityReferencesPropertyInfo = "DOMNodeIterator::expand-entity-references"+ attrGet _ = getDOMNodeIteratorExpandEntityReferences+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "filter"+ -- Type: TInterface "WebKit" "DOMNodeFilter"+ -- Flags: [PropertyReadable]++getDOMNodeIteratorFilter :: (MonadIO m, DOMNodeIteratorK o) => o -> m DOMNodeFilter+getDOMNodeIteratorFilter obj = liftIO $ getObjectPropertyObject obj "filter" DOMNodeFilter++data DOMNodeIteratorFilterPropertyInfo+instance AttrInfo DOMNodeIteratorFilterPropertyInfo where+ type AttrAllowedOps DOMNodeIteratorFilterPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeIteratorFilterPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeIteratorFilterPropertyInfo = DOMNodeIteratorK+ type AttrGetType DOMNodeIteratorFilterPropertyInfo = DOMNodeFilter+ type AttrLabel DOMNodeIteratorFilterPropertyInfo = "DOMNodeIterator::filter"+ attrGet _ = getDOMNodeIteratorFilter+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "pointer-before-reference-node"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMNodeIteratorPointerBeforeReferenceNode :: (MonadIO m, DOMNodeIteratorK o) => o -> m Bool+getDOMNodeIteratorPointerBeforeReferenceNode obj = liftIO $ getObjectPropertyBool obj "pointer-before-reference-node"++data DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo+instance AttrInfo DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo where+ type AttrAllowedOps DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo = DOMNodeIteratorK+ type AttrGetType DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo = Bool+ type AttrLabel DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo = "DOMNodeIterator::pointer-before-reference-node"+ attrGet _ = getDOMNodeIteratorPointerBeforeReferenceNode+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "reference-node"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMNodeIteratorReferenceNode :: (MonadIO m, DOMNodeIteratorK o) => o -> m DOMNode+getDOMNodeIteratorReferenceNode obj = liftIO $ getObjectPropertyObject obj "reference-node" DOMNode++data DOMNodeIteratorReferenceNodePropertyInfo+instance AttrInfo DOMNodeIteratorReferenceNodePropertyInfo where+ type AttrAllowedOps DOMNodeIteratorReferenceNodePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeIteratorReferenceNodePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeIteratorReferenceNodePropertyInfo = DOMNodeIteratorK+ type AttrGetType DOMNodeIteratorReferenceNodePropertyInfo = DOMNode+ type AttrLabel DOMNodeIteratorReferenceNodePropertyInfo = "DOMNodeIterator::reference-node"+ attrGet _ = getDOMNodeIteratorReferenceNode+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "root"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMNodeIteratorRoot :: (MonadIO m, DOMNodeIteratorK o) => o -> m DOMNode+getDOMNodeIteratorRoot obj = liftIO $ getObjectPropertyObject obj "root" DOMNode++data DOMNodeIteratorRootPropertyInfo+instance AttrInfo DOMNodeIteratorRootPropertyInfo where+ type AttrAllowedOps DOMNodeIteratorRootPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeIteratorRootPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeIteratorRootPropertyInfo = DOMNodeIteratorK+ type AttrGetType DOMNodeIteratorRootPropertyInfo = DOMNode+ type AttrLabel DOMNodeIteratorRootPropertyInfo = "DOMNodeIterator::root"+ attrGet _ = getDOMNodeIteratorRoot+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "what-to-show"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMNodeIteratorWhatToShow :: (MonadIO m, DOMNodeIteratorK o) => o -> m Word64+getDOMNodeIteratorWhatToShow obj = liftIO $ getObjectPropertyUInt64 obj "what-to-show"++data DOMNodeIteratorWhatToShowPropertyInfo+instance AttrInfo DOMNodeIteratorWhatToShowPropertyInfo where+ type AttrAllowedOps DOMNodeIteratorWhatToShowPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeIteratorWhatToShowPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeIteratorWhatToShowPropertyInfo = DOMNodeIteratorK+ type AttrGetType DOMNodeIteratorWhatToShowPropertyInfo = Word64+ type AttrLabel DOMNodeIteratorWhatToShowPropertyInfo = "DOMNodeIterator::what-to-show"+ attrGet _ = getDOMNodeIteratorWhatToShow+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMNodeIterator = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("expand-entity-references", DOMNodeIteratorExpandEntityReferencesPropertyInfo), '("filter", DOMNodeIteratorFilterPropertyInfo), '("pointer-before-reference-node", DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo), '("reference-node", DOMNodeIteratorReferenceNodePropertyInfo), '("root", DOMNodeIteratorRootPropertyInfo), '("what-to-show", DOMNodeIteratorWhatToShowPropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMNodeListLength :: (MonadIO m, DOMNodeListK o) => o -> m Word64+getDOMNodeListLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMNodeListLengthPropertyInfo+instance AttrInfo DOMNodeListLengthPropertyInfo where+ type AttrAllowedOps DOMNodeListLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMNodeListLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMNodeListLengthPropertyInfo = DOMNodeListK+ type AttrGetType DOMNodeListLengthPropertyInfo = Word64+ type AttrLabel DOMNodeListLengthPropertyInfo = "DOMNodeList::length"+ attrGet _ = getDOMNodeListLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMNodeList = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMNodeListLengthPropertyInfo)]++-- VVV Prop "core-object"+ -- Type: TBasicType TVoid+ -- Flags: [PropertyWritable,PropertyConstructOnly]++constructDOMObjectCoreObject :: (Ptr ()) -> IO ([Char], GValue)+constructDOMObjectCoreObject val = constructObjectPropertyPtr "core-object" val++data DOMObjectCoreObjectPropertyInfo+instance AttrInfo DOMObjectCoreObjectPropertyInfo where+ type AttrAllowedOps DOMObjectCoreObjectPropertyInfo = '[ 'AttrConstruct]+ type AttrSetTypeConstraint DOMObjectCoreObjectPropertyInfo = (~) (Ptr ())+ type AttrBaseTypeConstraint DOMObjectCoreObjectPropertyInfo = DOMObjectK+ type AttrGetType DOMObjectCoreObjectPropertyInfo = ()+ type AttrLabel DOMObjectCoreObjectPropertyInfo = "DOMObject::core-object"+ attrGet _ = undefined+ attrSet _ = undefined+ attrConstruct _ = constructDOMObjectCoreObject++type instance AttributeList DOMObject = '[ '("core-object", DOMObjectCoreObjectPropertyInfo)]++-- VVV Prop "navigation"+ -- Type: TInterface "WebKit" "DOMPerformanceNavigation"+ -- Flags: [PropertyReadable]++getDOMPerformanceNavigation :: (MonadIO m, DOMPerformanceK o) => o -> m DOMPerformanceNavigation+getDOMPerformanceNavigation obj = liftIO $ getObjectPropertyObject obj "navigation" DOMPerformanceNavigation++data DOMPerformanceNavigationPropertyInfo+instance AttrInfo DOMPerformanceNavigationPropertyInfo where+ type AttrAllowedOps DOMPerformanceNavigationPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceNavigationPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceNavigationPropertyInfo = DOMPerformanceK+ type AttrGetType DOMPerformanceNavigationPropertyInfo = DOMPerformanceNavigation+ type AttrLabel DOMPerformanceNavigationPropertyInfo = "DOMPerformance::navigation"+ attrGet _ = getDOMPerformanceNavigation+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "timing"+ -- Type: TInterface "WebKit" "DOMPerformanceTiming"+ -- Flags: [PropertyReadable]++getDOMPerformanceTiming :: (MonadIO m, DOMPerformanceK o) => o -> m DOMPerformanceTiming+getDOMPerformanceTiming obj = liftIO $ getObjectPropertyObject obj "timing" DOMPerformanceTiming++data DOMPerformanceTimingPropertyInfo+instance AttrInfo DOMPerformanceTimingPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingPropertyInfo = DOMPerformanceK+ type AttrGetType DOMPerformanceTimingPropertyInfo = DOMPerformanceTiming+ type AttrLabel DOMPerformanceTimingPropertyInfo = "DOMPerformance::timing"+ attrGet _ = getDOMPerformanceTiming+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMPerformance = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("navigation", DOMPerformanceNavigationPropertyInfo), '("timing", DOMPerformanceTimingPropertyInfo)]++-- VVV Prop "duration"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getDOMPerformanceEntryDuration :: (MonadIO m, DOMPerformanceEntryK o) => o -> m Double+getDOMPerformanceEntryDuration obj = liftIO $ getObjectPropertyDouble obj "duration"++data DOMPerformanceEntryDurationPropertyInfo+instance AttrInfo DOMPerformanceEntryDurationPropertyInfo where+ type AttrAllowedOps DOMPerformanceEntryDurationPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceEntryDurationPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceEntryDurationPropertyInfo = DOMPerformanceEntryK+ type AttrGetType DOMPerformanceEntryDurationPropertyInfo = Double+ type AttrLabel DOMPerformanceEntryDurationPropertyInfo = "DOMPerformanceEntry::duration"+ attrGet _ = getDOMPerformanceEntryDuration+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "entry-type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMPerformanceEntryEntryType :: (MonadIO m, DOMPerformanceEntryK o) => o -> m T.Text+getDOMPerformanceEntryEntryType obj = liftIO $ getObjectPropertyString obj "entry-type"++data DOMPerformanceEntryEntryTypePropertyInfo+instance AttrInfo DOMPerformanceEntryEntryTypePropertyInfo where+ type AttrAllowedOps DOMPerformanceEntryEntryTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceEntryEntryTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceEntryEntryTypePropertyInfo = DOMPerformanceEntryK+ type AttrGetType DOMPerformanceEntryEntryTypePropertyInfo = T.Text+ type AttrLabel DOMPerformanceEntryEntryTypePropertyInfo = "DOMPerformanceEntry::entry-type"+ attrGet _ = getDOMPerformanceEntryEntryType+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMPerformanceEntryName :: (MonadIO m, DOMPerformanceEntryK o) => o -> m T.Text+getDOMPerformanceEntryName obj = liftIO $ getObjectPropertyString obj "name"++data DOMPerformanceEntryNamePropertyInfo+instance AttrInfo DOMPerformanceEntryNamePropertyInfo where+ type AttrAllowedOps DOMPerformanceEntryNamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceEntryNamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceEntryNamePropertyInfo = DOMPerformanceEntryK+ type AttrGetType DOMPerformanceEntryNamePropertyInfo = T.Text+ type AttrLabel DOMPerformanceEntryNamePropertyInfo = "DOMPerformanceEntry::name"+ attrGet _ = getDOMPerformanceEntryName+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "start-time"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getDOMPerformanceEntryStartTime :: (MonadIO m, DOMPerformanceEntryK o) => o -> m Double+getDOMPerformanceEntryStartTime obj = liftIO $ getObjectPropertyDouble obj "start-time"++data DOMPerformanceEntryStartTimePropertyInfo+instance AttrInfo DOMPerformanceEntryStartTimePropertyInfo where+ type AttrAllowedOps DOMPerformanceEntryStartTimePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceEntryStartTimePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceEntryStartTimePropertyInfo = DOMPerformanceEntryK+ type AttrGetType DOMPerformanceEntryStartTimePropertyInfo = Double+ type AttrLabel DOMPerformanceEntryStartTimePropertyInfo = "DOMPerformanceEntry::start-time"+ attrGet _ = getDOMPerformanceEntryStartTime+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMPerformanceEntry = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("duration", DOMPerformanceEntryDurationPropertyInfo), '("entry-type", DOMPerformanceEntryEntryTypePropertyInfo), '("name", DOMPerformanceEntryNamePropertyInfo), '("start-time", DOMPerformanceEntryStartTimePropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceEntryListLength :: (MonadIO m, DOMPerformanceEntryListK o) => o -> m Word64+getDOMPerformanceEntryListLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMPerformanceEntryListLengthPropertyInfo+instance AttrInfo DOMPerformanceEntryListLengthPropertyInfo where+ type AttrAllowedOps DOMPerformanceEntryListLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceEntryListLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceEntryListLengthPropertyInfo = DOMPerformanceEntryListK+ type AttrGetType DOMPerformanceEntryListLengthPropertyInfo = Word64+ type AttrLabel DOMPerformanceEntryListLengthPropertyInfo = "DOMPerformanceEntryList::length"+ attrGet _ = getDOMPerformanceEntryListLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMPerformanceEntryList = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMPerformanceEntryListLengthPropertyInfo)]++-- VVV Prop "redirect-count"+ -- Type: TBasicType TUInt32+ -- Flags: [PropertyReadable]++getDOMPerformanceNavigationRedirectCount :: (MonadIO m, DOMPerformanceNavigationK o) => o -> m Word32+getDOMPerformanceNavigationRedirectCount obj = liftIO $ getObjectPropertyCUInt obj "redirect-count"++data DOMPerformanceNavigationRedirectCountPropertyInfo+instance AttrInfo DOMPerformanceNavigationRedirectCountPropertyInfo where+ type AttrAllowedOps DOMPerformanceNavigationRedirectCountPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceNavigationRedirectCountPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceNavigationRedirectCountPropertyInfo = DOMPerformanceNavigationK+ type AttrGetType DOMPerformanceNavigationRedirectCountPropertyInfo = Word32+ type AttrLabel DOMPerformanceNavigationRedirectCountPropertyInfo = "DOMPerformanceNavigation::redirect-count"+ attrGet _ = getDOMPerformanceNavigationRedirectCount+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "type"+ -- Type: TBasicType TUInt32+ -- Flags: [PropertyReadable]++getDOMPerformanceNavigationType :: (MonadIO m, DOMPerformanceNavigationK o) => o -> m Word32+getDOMPerformanceNavigationType obj = liftIO $ getObjectPropertyCUInt obj "type"++data DOMPerformanceNavigationTypePropertyInfo+instance AttrInfo DOMPerformanceNavigationTypePropertyInfo where+ type AttrAllowedOps DOMPerformanceNavigationTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceNavigationTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceNavigationTypePropertyInfo = DOMPerformanceNavigationK+ type AttrGetType DOMPerformanceNavigationTypePropertyInfo = Word32+ type AttrLabel DOMPerformanceNavigationTypePropertyInfo = "DOMPerformanceNavigation::type"+ attrGet _ = getDOMPerformanceNavigationType+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMPerformanceNavigation = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("redirect-count", DOMPerformanceNavigationRedirectCountPropertyInfo), '("type", DOMPerformanceNavigationTypePropertyInfo)]++-- VVV Prop "connect-end"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingConnectEnd :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingConnectEnd obj = liftIO $ getObjectPropertyUInt64 obj "connect-end"++data DOMPerformanceTimingConnectEndPropertyInfo+instance AttrInfo DOMPerformanceTimingConnectEndPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingConnectEndPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingConnectEndPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingConnectEndPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingConnectEndPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingConnectEndPropertyInfo = "DOMPerformanceTiming::connect-end"+ attrGet _ = getDOMPerformanceTimingConnectEnd+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "connect-start"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingConnectStart :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingConnectStart obj = liftIO $ getObjectPropertyUInt64 obj "connect-start"++data DOMPerformanceTimingConnectStartPropertyInfo+instance AttrInfo DOMPerformanceTimingConnectStartPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingConnectStartPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingConnectStartPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingConnectStartPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingConnectStartPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingConnectStartPropertyInfo = "DOMPerformanceTiming::connect-start"+ attrGet _ = getDOMPerformanceTimingConnectStart+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "dom-complete"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingDomComplete :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingDomComplete obj = liftIO $ getObjectPropertyUInt64 obj "dom-complete"++data DOMPerformanceTimingDomCompletePropertyInfo+instance AttrInfo DOMPerformanceTimingDomCompletePropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingDomCompletePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingDomCompletePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingDomCompletePropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingDomCompletePropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingDomCompletePropertyInfo = "DOMPerformanceTiming::dom-complete"+ attrGet _ = getDOMPerformanceTimingDomComplete+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "dom-content-loaded-event-end"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingDomContentLoadedEventEnd :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingDomContentLoadedEventEnd obj = liftIO $ getObjectPropertyUInt64 obj "dom-content-loaded-event-end"++data DOMPerformanceTimingDomContentLoadedEventEndPropertyInfo+instance AttrInfo DOMPerformanceTimingDomContentLoadedEventEndPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingDomContentLoadedEventEndPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingDomContentLoadedEventEndPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingDomContentLoadedEventEndPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingDomContentLoadedEventEndPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingDomContentLoadedEventEndPropertyInfo = "DOMPerformanceTiming::dom-content-loaded-event-end"+ attrGet _ = getDOMPerformanceTimingDomContentLoadedEventEnd+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "dom-content-loaded-event-start"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingDomContentLoadedEventStart :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingDomContentLoadedEventStart obj = liftIO $ getObjectPropertyUInt64 obj "dom-content-loaded-event-start"++data DOMPerformanceTimingDomContentLoadedEventStartPropertyInfo+instance AttrInfo DOMPerformanceTimingDomContentLoadedEventStartPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingDomContentLoadedEventStartPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingDomContentLoadedEventStartPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingDomContentLoadedEventStartPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingDomContentLoadedEventStartPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingDomContentLoadedEventStartPropertyInfo = "DOMPerformanceTiming::dom-content-loaded-event-start"+ attrGet _ = getDOMPerformanceTimingDomContentLoadedEventStart+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "dom-interactive"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingDomInteractive :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingDomInteractive obj = liftIO $ getObjectPropertyUInt64 obj "dom-interactive"++data DOMPerformanceTimingDomInteractivePropertyInfo+instance AttrInfo DOMPerformanceTimingDomInteractivePropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingDomInteractivePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingDomInteractivePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingDomInteractivePropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingDomInteractivePropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingDomInteractivePropertyInfo = "DOMPerformanceTiming::dom-interactive"+ attrGet _ = getDOMPerformanceTimingDomInteractive+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "dom-loading"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingDomLoading :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingDomLoading obj = liftIO $ getObjectPropertyUInt64 obj "dom-loading"++data DOMPerformanceTimingDomLoadingPropertyInfo+instance AttrInfo DOMPerformanceTimingDomLoadingPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingDomLoadingPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingDomLoadingPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingDomLoadingPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingDomLoadingPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingDomLoadingPropertyInfo = "DOMPerformanceTiming::dom-loading"+ attrGet _ = getDOMPerformanceTimingDomLoading+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "domain-lookup-end"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingDomainLookupEnd :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingDomainLookupEnd obj = liftIO $ getObjectPropertyUInt64 obj "domain-lookup-end"++data DOMPerformanceTimingDomainLookupEndPropertyInfo+instance AttrInfo DOMPerformanceTimingDomainLookupEndPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingDomainLookupEndPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingDomainLookupEndPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingDomainLookupEndPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingDomainLookupEndPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingDomainLookupEndPropertyInfo = "DOMPerformanceTiming::domain-lookup-end"+ attrGet _ = getDOMPerformanceTimingDomainLookupEnd+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "domain-lookup-start"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingDomainLookupStart :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingDomainLookupStart obj = liftIO $ getObjectPropertyUInt64 obj "domain-lookup-start"++data DOMPerformanceTimingDomainLookupStartPropertyInfo+instance AttrInfo DOMPerformanceTimingDomainLookupStartPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingDomainLookupStartPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingDomainLookupStartPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingDomainLookupStartPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingDomainLookupStartPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingDomainLookupStartPropertyInfo = "DOMPerformanceTiming::domain-lookup-start"+ attrGet _ = getDOMPerformanceTimingDomainLookupStart+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "fetch-start"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingFetchStart :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingFetchStart obj = liftIO $ getObjectPropertyUInt64 obj "fetch-start"++data DOMPerformanceTimingFetchStartPropertyInfo+instance AttrInfo DOMPerformanceTimingFetchStartPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingFetchStartPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingFetchStartPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingFetchStartPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingFetchStartPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingFetchStartPropertyInfo = "DOMPerformanceTiming::fetch-start"+ attrGet _ = getDOMPerformanceTimingFetchStart+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "load-event-end"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingLoadEventEnd :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingLoadEventEnd obj = liftIO $ getObjectPropertyUInt64 obj "load-event-end"++data DOMPerformanceTimingLoadEventEndPropertyInfo+instance AttrInfo DOMPerformanceTimingLoadEventEndPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingLoadEventEndPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingLoadEventEndPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingLoadEventEndPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingLoadEventEndPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingLoadEventEndPropertyInfo = "DOMPerformanceTiming::load-event-end"+ attrGet _ = getDOMPerformanceTimingLoadEventEnd+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "load-event-start"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingLoadEventStart :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingLoadEventStart obj = liftIO $ getObjectPropertyUInt64 obj "load-event-start"++data DOMPerformanceTimingLoadEventStartPropertyInfo+instance AttrInfo DOMPerformanceTimingLoadEventStartPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingLoadEventStartPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingLoadEventStartPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingLoadEventStartPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingLoadEventStartPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingLoadEventStartPropertyInfo = "DOMPerformanceTiming::load-event-start"+ attrGet _ = getDOMPerformanceTimingLoadEventStart+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "navigation-start"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingNavigationStart :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingNavigationStart obj = liftIO $ getObjectPropertyUInt64 obj "navigation-start"++data DOMPerformanceTimingNavigationStartPropertyInfo+instance AttrInfo DOMPerformanceTimingNavigationStartPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingNavigationStartPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingNavigationStartPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingNavigationStartPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingNavigationStartPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingNavigationStartPropertyInfo = "DOMPerformanceTiming::navigation-start"+ attrGet _ = getDOMPerformanceTimingNavigationStart+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "redirect-end"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingRedirectEnd :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingRedirectEnd obj = liftIO $ getObjectPropertyUInt64 obj "redirect-end"++data DOMPerformanceTimingRedirectEndPropertyInfo+instance AttrInfo DOMPerformanceTimingRedirectEndPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingRedirectEndPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingRedirectEndPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingRedirectEndPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingRedirectEndPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingRedirectEndPropertyInfo = "DOMPerformanceTiming::redirect-end"+ attrGet _ = getDOMPerformanceTimingRedirectEnd+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "redirect-start"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingRedirectStart :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingRedirectStart obj = liftIO $ getObjectPropertyUInt64 obj "redirect-start"++data DOMPerformanceTimingRedirectStartPropertyInfo+instance AttrInfo DOMPerformanceTimingRedirectStartPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingRedirectStartPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingRedirectStartPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingRedirectStartPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingRedirectStartPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingRedirectStartPropertyInfo = "DOMPerformanceTiming::redirect-start"+ attrGet _ = getDOMPerformanceTimingRedirectStart+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "request-start"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingRequestStart :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingRequestStart obj = liftIO $ getObjectPropertyUInt64 obj "request-start"++data DOMPerformanceTimingRequestStartPropertyInfo+instance AttrInfo DOMPerformanceTimingRequestStartPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingRequestStartPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingRequestStartPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingRequestStartPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingRequestStartPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingRequestStartPropertyInfo = "DOMPerformanceTiming::request-start"+ attrGet _ = getDOMPerformanceTimingRequestStart+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "response-end"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingResponseEnd :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingResponseEnd obj = liftIO $ getObjectPropertyUInt64 obj "response-end"++data DOMPerformanceTimingResponseEndPropertyInfo+instance AttrInfo DOMPerformanceTimingResponseEndPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingResponseEndPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingResponseEndPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingResponseEndPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingResponseEndPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingResponseEndPropertyInfo = "DOMPerformanceTiming::response-end"+ attrGet _ = getDOMPerformanceTimingResponseEnd+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "response-start"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingResponseStart :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingResponseStart obj = liftIO $ getObjectPropertyUInt64 obj "response-start"++data DOMPerformanceTimingResponseStartPropertyInfo+instance AttrInfo DOMPerformanceTimingResponseStartPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingResponseStartPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingResponseStartPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingResponseStartPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingResponseStartPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingResponseStartPropertyInfo = "DOMPerformanceTiming::response-start"+ attrGet _ = getDOMPerformanceTimingResponseStart+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "secure-connection-start"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingSecureConnectionStart :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingSecureConnectionStart obj = liftIO $ getObjectPropertyUInt64 obj "secure-connection-start"++data DOMPerformanceTimingSecureConnectionStartPropertyInfo+instance AttrInfo DOMPerformanceTimingSecureConnectionStartPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingSecureConnectionStartPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingSecureConnectionStartPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingSecureConnectionStartPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingSecureConnectionStartPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingSecureConnectionStartPropertyInfo = "DOMPerformanceTiming::secure-connection-start"+ attrGet _ = getDOMPerformanceTimingSecureConnectionStart+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "unload-event-end"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingUnloadEventEnd :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingUnloadEventEnd obj = liftIO $ getObjectPropertyUInt64 obj "unload-event-end"++data DOMPerformanceTimingUnloadEventEndPropertyInfo+instance AttrInfo DOMPerformanceTimingUnloadEventEndPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingUnloadEventEndPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingUnloadEventEndPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingUnloadEventEndPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingUnloadEventEndPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingUnloadEventEndPropertyInfo = "DOMPerformanceTiming::unload-event-end"+ attrGet _ = getDOMPerformanceTimingUnloadEventEnd+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "unload-event-start"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPerformanceTimingUnloadEventStart :: (MonadIO m, DOMPerformanceTimingK o) => o -> m Word64+getDOMPerformanceTimingUnloadEventStart obj = liftIO $ getObjectPropertyUInt64 obj "unload-event-start"++data DOMPerformanceTimingUnloadEventStartPropertyInfo+instance AttrInfo DOMPerformanceTimingUnloadEventStartPropertyInfo where+ type AttrAllowedOps DOMPerformanceTimingUnloadEventStartPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPerformanceTimingUnloadEventStartPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPerformanceTimingUnloadEventStartPropertyInfo = DOMPerformanceTimingK+ type AttrGetType DOMPerformanceTimingUnloadEventStartPropertyInfo = Word64+ type AttrLabel DOMPerformanceTimingUnloadEventStartPropertyInfo = "DOMPerformanceTiming::unload-event-start"+ attrGet _ = getDOMPerformanceTimingUnloadEventStart+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMPerformanceTiming = '[ '("connect-end", DOMPerformanceTimingConnectEndPropertyInfo), '("connect-start", DOMPerformanceTimingConnectStartPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dom-complete", DOMPerformanceTimingDomCompletePropertyInfo), '("dom-content-loaded-event-end", DOMPerformanceTimingDomContentLoadedEventEndPropertyInfo), '("dom-content-loaded-event-start", DOMPerformanceTimingDomContentLoadedEventStartPropertyInfo), '("dom-interactive", DOMPerformanceTimingDomInteractivePropertyInfo), '("dom-loading", DOMPerformanceTimingDomLoadingPropertyInfo), '("domain-lookup-end", DOMPerformanceTimingDomainLookupEndPropertyInfo), '("domain-lookup-start", DOMPerformanceTimingDomainLookupStartPropertyInfo), '("fetch-start", DOMPerformanceTimingFetchStartPropertyInfo), '("load-event-end", DOMPerformanceTimingLoadEventEndPropertyInfo), '("load-event-start", DOMPerformanceTimingLoadEventStartPropertyInfo), '("navigation-start", DOMPerformanceTimingNavigationStartPropertyInfo), '("redirect-end", DOMPerformanceTimingRedirectEndPropertyInfo), '("redirect-start", DOMPerformanceTimingRedirectStartPropertyInfo), '("request-start", DOMPerformanceTimingRequestStartPropertyInfo), '("response-end", DOMPerformanceTimingResponseEndPropertyInfo), '("response-start", DOMPerformanceTimingResponseStartPropertyInfo), '("secure-connection-start", DOMPerformanceTimingSecureConnectionStartPropertyInfo), '("unload-event-end", DOMPerformanceTimingUnloadEventEndPropertyInfo), '("unload-event-start", DOMPerformanceTimingUnloadEventStartPropertyInfo)]++-- VVV Prop "sheet"+ -- Type: TInterface "WebKit" "DOMStyleSheet"+ -- Flags: [PropertyReadable]++getDOMProcessingInstructionSheet :: (MonadIO m, DOMProcessingInstructionK o) => o -> m DOMStyleSheet+getDOMProcessingInstructionSheet obj = liftIO $ getObjectPropertyObject obj "sheet" DOMStyleSheet++data DOMProcessingInstructionSheetPropertyInfo+instance AttrInfo DOMProcessingInstructionSheetPropertyInfo where+ type AttrAllowedOps DOMProcessingInstructionSheetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMProcessingInstructionSheetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMProcessingInstructionSheetPropertyInfo = DOMProcessingInstructionK+ type AttrGetType DOMProcessingInstructionSheetPropertyInfo = DOMStyleSheet+ type AttrLabel DOMProcessingInstructionSheetPropertyInfo = "DOMProcessingInstruction::sheet"+ attrGet _ = getDOMProcessingInstructionSheet+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "target"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMProcessingInstructionTarget :: (MonadIO m, DOMProcessingInstructionK o) => o -> m T.Text+getDOMProcessingInstructionTarget obj = liftIO $ getObjectPropertyString obj "target"++data DOMProcessingInstructionTargetPropertyInfo+instance AttrInfo DOMProcessingInstructionTargetPropertyInfo where+ type AttrAllowedOps DOMProcessingInstructionTargetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMProcessingInstructionTargetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMProcessingInstructionTargetPropertyInfo = DOMProcessingInstructionK+ type AttrGetType DOMProcessingInstructionTargetPropertyInfo = T.Text+ type AttrLabel DOMProcessingInstructionTargetPropertyInfo = "DOMProcessingInstruction::target"+ attrGet _ = getDOMProcessingInstructionTarget+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMProcessingInstruction = '[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("data", DOMCharacterDataDataPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("length", DOMCharacterDataLengthPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("sheet", DOMProcessingInstructionSheetPropertyInfo), '("target", DOMProcessingInstructionTargetPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMPropertyNodeListLength :: (MonadIO m, DOMPropertyNodeListK o) => o -> m Word64+getDOMPropertyNodeListLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMPropertyNodeListLengthPropertyInfo+instance AttrInfo DOMPropertyNodeListLengthPropertyInfo where+ type AttrAllowedOps DOMPropertyNodeListLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMPropertyNodeListLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMPropertyNodeListLengthPropertyInfo = DOMPropertyNodeListK+ type AttrGetType DOMPropertyNodeListLengthPropertyInfo = Word64+ type AttrLabel DOMPropertyNodeListLengthPropertyInfo = "DOMPropertyNodeList::length"+ attrGet _ = getDOMPropertyNodeListLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMPropertyNodeList = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMPropertyNodeListLengthPropertyInfo)]++-- VVV Prop "collapsed"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMRangeCollapsed :: (MonadIO m, DOMRangeK o) => o -> m Bool+getDOMRangeCollapsed obj = liftIO $ getObjectPropertyBool obj "collapsed"++data DOMRangeCollapsedPropertyInfo+instance AttrInfo DOMRangeCollapsedPropertyInfo where+ type AttrAllowedOps DOMRangeCollapsedPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMRangeCollapsedPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMRangeCollapsedPropertyInfo = DOMRangeK+ type AttrGetType DOMRangeCollapsedPropertyInfo = Bool+ type AttrLabel DOMRangeCollapsedPropertyInfo = "DOMRange::collapsed"+ attrGet _ = getDOMRangeCollapsed+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "common-ancestor-container"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMRangeCommonAncestorContainer :: (MonadIO m, DOMRangeK o) => o -> m DOMNode+getDOMRangeCommonAncestorContainer obj = liftIO $ getObjectPropertyObject obj "common-ancestor-container" DOMNode++data DOMRangeCommonAncestorContainerPropertyInfo+instance AttrInfo DOMRangeCommonAncestorContainerPropertyInfo where+ type AttrAllowedOps DOMRangeCommonAncestorContainerPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMRangeCommonAncestorContainerPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMRangeCommonAncestorContainerPropertyInfo = DOMRangeK+ type AttrGetType DOMRangeCommonAncestorContainerPropertyInfo = DOMNode+ type AttrLabel DOMRangeCommonAncestorContainerPropertyInfo = "DOMRange::common-ancestor-container"+ attrGet _ = getDOMRangeCommonAncestorContainer+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "end-container"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMRangeEndContainer :: (MonadIO m, DOMRangeK o) => o -> m DOMNode+getDOMRangeEndContainer obj = liftIO $ getObjectPropertyObject obj "end-container" DOMNode++data DOMRangeEndContainerPropertyInfo+instance AttrInfo DOMRangeEndContainerPropertyInfo where+ type AttrAllowedOps DOMRangeEndContainerPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMRangeEndContainerPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMRangeEndContainerPropertyInfo = DOMRangeK+ type AttrGetType DOMRangeEndContainerPropertyInfo = DOMNode+ type AttrLabel DOMRangeEndContainerPropertyInfo = "DOMRange::end-container"+ attrGet _ = getDOMRangeEndContainer+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "end-offset"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMRangeEndOffset :: (MonadIO m, DOMRangeK o) => o -> m Int64+getDOMRangeEndOffset obj = liftIO $ getObjectPropertyInt64 obj "end-offset"++data DOMRangeEndOffsetPropertyInfo+instance AttrInfo DOMRangeEndOffsetPropertyInfo where+ type AttrAllowedOps DOMRangeEndOffsetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMRangeEndOffsetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMRangeEndOffsetPropertyInfo = DOMRangeK+ type AttrGetType DOMRangeEndOffsetPropertyInfo = Int64+ type AttrLabel DOMRangeEndOffsetPropertyInfo = "DOMRange::end-offset"+ attrGet _ = getDOMRangeEndOffset+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "start-container"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMRangeStartContainer :: (MonadIO m, DOMRangeK o) => o -> m DOMNode+getDOMRangeStartContainer obj = liftIO $ getObjectPropertyObject obj "start-container" DOMNode++data DOMRangeStartContainerPropertyInfo+instance AttrInfo DOMRangeStartContainerPropertyInfo where+ type AttrAllowedOps DOMRangeStartContainerPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMRangeStartContainerPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMRangeStartContainerPropertyInfo = DOMRangeK+ type AttrGetType DOMRangeStartContainerPropertyInfo = DOMNode+ type AttrLabel DOMRangeStartContainerPropertyInfo = "DOMRange::start-container"+ attrGet _ = getDOMRangeStartContainer+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "start-offset"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMRangeStartOffset :: (MonadIO m, DOMRangeK o) => o -> m Int64+getDOMRangeStartOffset obj = liftIO $ getObjectPropertyInt64 obj "start-offset"++data DOMRangeStartOffsetPropertyInfo+instance AttrInfo DOMRangeStartOffsetPropertyInfo where+ type AttrAllowedOps DOMRangeStartOffsetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMRangeStartOffsetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMRangeStartOffsetPropertyInfo = DOMRangeK+ type AttrGetType DOMRangeStartOffsetPropertyInfo = Int64+ type AttrLabel DOMRangeStartOffsetPropertyInfo = "DOMRange::start-offset"+ attrGet _ = getDOMRangeStartOffset+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "text"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMRangeText :: (MonadIO m, DOMRangeK o) => o -> m T.Text+getDOMRangeText obj = liftIO $ getObjectPropertyString obj "text"++data DOMRangeTextPropertyInfo+instance AttrInfo DOMRangeTextPropertyInfo where+ type AttrAllowedOps DOMRangeTextPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMRangeTextPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMRangeTextPropertyInfo = DOMRangeK+ type AttrGetType DOMRangeTextPropertyInfo = T.Text+ type AttrLabel DOMRangeTextPropertyInfo = "DOMRange::text"+ attrGet _ = getDOMRangeText+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMRange = '[ '("collapsed", DOMRangeCollapsedPropertyInfo), '("common-ancestor-container", DOMRangeCommonAncestorContainerPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("end-container", DOMRangeEndContainerPropertyInfo), '("end-offset", DOMRangeEndOffsetPropertyInfo), '("start-container", DOMRangeStartContainerPropertyInfo), '("start-offset", DOMRangeStartOffsetPropertyInfo), '("text", DOMRangeTextPropertyInfo)]++-- VVV Prop "avail-height"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMScreenAvailHeight :: (MonadIO m, DOMScreenK o) => o -> m Word64+getDOMScreenAvailHeight obj = liftIO $ getObjectPropertyUInt64 obj "avail-height"++data DOMScreenAvailHeightPropertyInfo+instance AttrInfo DOMScreenAvailHeightPropertyInfo where+ type AttrAllowedOps DOMScreenAvailHeightPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMScreenAvailHeightPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMScreenAvailHeightPropertyInfo = DOMScreenK+ type AttrGetType DOMScreenAvailHeightPropertyInfo = Word64+ type AttrLabel DOMScreenAvailHeightPropertyInfo = "DOMScreen::avail-height"+ attrGet _ = getDOMScreenAvailHeight+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "avail-left"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMScreenAvailLeft :: (MonadIO m, DOMScreenK o) => o -> m Int64+getDOMScreenAvailLeft obj = liftIO $ getObjectPropertyInt64 obj "avail-left"++data DOMScreenAvailLeftPropertyInfo+instance AttrInfo DOMScreenAvailLeftPropertyInfo where+ type AttrAllowedOps DOMScreenAvailLeftPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMScreenAvailLeftPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMScreenAvailLeftPropertyInfo = DOMScreenK+ type AttrGetType DOMScreenAvailLeftPropertyInfo = Int64+ type AttrLabel DOMScreenAvailLeftPropertyInfo = "DOMScreen::avail-left"+ attrGet _ = getDOMScreenAvailLeft+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "avail-top"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMScreenAvailTop :: (MonadIO m, DOMScreenK o) => o -> m Int64+getDOMScreenAvailTop obj = liftIO $ getObjectPropertyInt64 obj "avail-top"++data DOMScreenAvailTopPropertyInfo+instance AttrInfo DOMScreenAvailTopPropertyInfo where+ type AttrAllowedOps DOMScreenAvailTopPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMScreenAvailTopPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMScreenAvailTopPropertyInfo = DOMScreenK+ type AttrGetType DOMScreenAvailTopPropertyInfo = Int64+ type AttrLabel DOMScreenAvailTopPropertyInfo = "DOMScreen::avail-top"+ attrGet _ = getDOMScreenAvailTop+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "avail-width"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMScreenAvailWidth :: (MonadIO m, DOMScreenK o) => o -> m Word64+getDOMScreenAvailWidth obj = liftIO $ getObjectPropertyUInt64 obj "avail-width"++data DOMScreenAvailWidthPropertyInfo+instance AttrInfo DOMScreenAvailWidthPropertyInfo where+ type AttrAllowedOps DOMScreenAvailWidthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMScreenAvailWidthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMScreenAvailWidthPropertyInfo = DOMScreenK+ type AttrGetType DOMScreenAvailWidthPropertyInfo = Word64+ type AttrLabel DOMScreenAvailWidthPropertyInfo = "DOMScreen::avail-width"+ attrGet _ = getDOMScreenAvailWidth+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "color-depth"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMScreenColorDepth :: (MonadIO m, DOMScreenK o) => o -> m Word64+getDOMScreenColorDepth obj = liftIO $ getObjectPropertyUInt64 obj "color-depth"++data DOMScreenColorDepthPropertyInfo+instance AttrInfo DOMScreenColorDepthPropertyInfo where+ type AttrAllowedOps DOMScreenColorDepthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMScreenColorDepthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMScreenColorDepthPropertyInfo = DOMScreenK+ type AttrGetType DOMScreenColorDepthPropertyInfo = Word64+ type AttrLabel DOMScreenColorDepthPropertyInfo = "DOMScreen::color-depth"+ attrGet _ = getDOMScreenColorDepth+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "height"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMScreenHeight :: (MonadIO m, DOMScreenK o) => o -> m Word64+getDOMScreenHeight obj = liftIO $ getObjectPropertyUInt64 obj "height"++data DOMScreenHeightPropertyInfo+instance AttrInfo DOMScreenHeightPropertyInfo where+ type AttrAllowedOps DOMScreenHeightPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMScreenHeightPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMScreenHeightPropertyInfo = DOMScreenK+ type AttrGetType DOMScreenHeightPropertyInfo = Word64+ type AttrLabel DOMScreenHeightPropertyInfo = "DOMScreen::height"+ attrGet _ = getDOMScreenHeight+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "pixel-depth"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMScreenPixelDepth :: (MonadIO m, DOMScreenK o) => o -> m Word64+getDOMScreenPixelDepth obj = liftIO $ getObjectPropertyUInt64 obj "pixel-depth"++data DOMScreenPixelDepthPropertyInfo+instance AttrInfo DOMScreenPixelDepthPropertyInfo where+ type AttrAllowedOps DOMScreenPixelDepthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMScreenPixelDepthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMScreenPixelDepthPropertyInfo = DOMScreenK+ type AttrGetType DOMScreenPixelDepthPropertyInfo = Word64+ type AttrLabel DOMScreenPixelDepthPropertyInfo = "DOMScreen::pixel-depth"+ attrGet _ = getDOMScreenPixelDepth+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "width"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMScreenWidth :: (MonadIO m, DOMScreenK o) => o -> m Word64+getDOMScreenWidth obj = liftIO $ getObjectPropertyUInt64 obj "width"++data DOMScreenWidthPropertyInfo+instance AttrInfo DOMScreenWidthPropertyInfo where+ type AttrAllowedOps DOMScreenWidthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMScreenWidthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMScreenWidthPropertyInfo = DOMScreenK+ type AttrGetType DOMScreenWidthPropertyInfo = Word64+ type AttrLabel DOMScreenWidthPropertyInfo = "DOMScreen::width"+ attrGet _ = getDOMScreenWidth+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMScreen = '[ '("avail-height", DOMScreenAvailHeightPropertyInfo), '("avail-left", DOMScreenAvailLeftPropertyInfo), '("avail-top", DOMScreenAvailTopPropertyInfo), '("avail-width", DOMScreenAvailWidthPropertyInfo), '("color-depth", DOMScreenColorDepthPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("height", DOMScreenHeightPropertyInfo), '("pixel-depth", DOMScreenPixelDepthPropertyInfo), '("width", DOMScreenWidthPropertyInfo)]++-- VVV Prop "active-element"+ -- Type: TInterface "WebKit" "DOMElement"+ -- Flags: [PropertyReadable]++getDOMShadowRootActiveElement :: (MonadIO m, DOMShadowRootK o) => o -> m DOMElement+getDOMShadowRootActiveElement obj = liftIO $ getObjectPropertyObject obj "active-element" DOMElement++data DOMShadowRootActiveElementPropertyInfo+instance AttrInfo DOMShadowRootActiveElementPropertyInfo where+ type AttrAllowedOps DOMShadowRootActiveElementPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMShadowRootActiveElementPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMShadowRootActiveElementPropertyInfo = DOMShadowRootK+ type AttrGetType DOMShadowRootActiveElementPropertyInfo = DOMElement+ type AttrLabel DOMShadowRootActiveElementPropertyInfo = "DOMShadowRoot::active-element"+ attrGet _ = getDOMShadowRootActiveElement+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "apply-author-styles"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMShadowRootApplyAuthorStyles :: (MonadIO m, DOMShadowRootK o) => o -> m Bool+getDOMShadowRootApplyAuthorStyles obj = liftIO $ getObjectPropertyBool obj "apply-author-styles"++setDOMShadowRootApplyAuthorStyles :: (MonadIO m, DOMShadowRootK o) => o -> Bool -> m ()+setDOMShadowRootApplyAuthorStyles obj val = liftIO $ setObjectPropertyBool obj "apply-author-styles" val++constructDOMShadowRootApplyAuthorStyles :: Bool -> IO ([Char], GValue)+constructDOMShadowRootApplyAuthorStyles val = constructObjectPropertyBool "apply-author-styles" val++data DOMShadowRootApplyAuthorStylesPropertyInfo+instance AttrInfo DOMShadowRootApplyAuthorStylesPropertyInfo where+ type AttrAllowedOps DOMShadowRootApplyAuthorStylesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMShadowRootApplyAuthorStylesPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMShadowRootApplyAuthorStylesPropertyInfo = DOMShadowRootK+ type AttrGetType DOMShadowRootApplyAuthorStylesPropertyInfo = Bool+ type AttrLabel DOMShadowRootApplyAuthorStylesPropertyInfo = "DOMShadowRoot::apply-author-styles"+ attrGet _ = getDOMShadowRootApplyAuthorStyles+ attrSet _ = setDOMShadowRootApplyAuthorStyles+ attrConstruct _ = constructDOMShadowRootApplyAuthorStyles++-- VVV Prop "inner-html"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMShadowRootInnerHtml :: (MonadIO m, DOMShadowRootK o) => o -> m T.Text+getDOMShadowRootInnerHtml obj = liftIO $ getObjectPropertyString obj "inner-html"++setDOMShadowRootInnerHtml :: (MonadIO m, DOMShadowRootK o) => o -> T.Text -> m ()+setDOMShadowRootInnerHtml obj val = liftIO $ setObjectPropertyString obj "inner-html" val++constructDOMShadowRootInnerHtml :: T.Text -> IO ([Char], GValue)+constructDOMShadowRootInnerHtml val = constructObjectPropertyString "inner-html" val++data DOMShadowRootInnerHtmlPropertyInfo+instance AttrInfo DOMShadowRootInnerHtmlPropertyInfo where+ type AttrAllowedOps DOMShadowRootInnerHtmlPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMShadowRootInnerHtmlPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMShadowRootInnerHtmlPropertyInfo = DOMShadowRootK+ type AttrGetType DOMShadowRootInnerHtmlPropertyInfo = T.Text+ type AttrLabel DOMShadowRootInnerHtmlPropertyInfo = "DOMShadowRoot::inner-html"+ attrGet _ = getDOMShadowRootInnerHtml+ attrSet _ = setDOMShadowRootInnerHtml+ attrConstruct _ = constructDOMShadowRootInnerHtml++-- VVV Prop "reset-style-inheritance"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMShadowRootResetStyleInheritance :: (MonadIO m, DOMShadowRootK o) => o -> m Bool+getDOMShadowRootResetStyleInheritance obj = liftIO $ getObjectPropertyBool obj "reset-style-inheritance"++setDOMShadowRootResetStyleInheritance :: (MonadIO m, DOMShadowRootK o) => o -> Bool -> m ()+setDOMShadowRootResetStyleInheritance obj val = liftIO $ setObjectPropertyBool obj "reset-style-inheritance" val++constructDOMShadowRootResetStyleInheritance :: Bool -> IO ([Char], GValue)+constructDOMShadowRootResetStyleInheritance val = constructObjectPropertyBool "reset-style-inheritance" val++data DOMShadowRootResetStyleInheritancePropertyInfo+instance AttrInfo DOMShadowRootResetStyleInheritancePropertyInfo where+ type AttrAllowedOps DOMShadowRootResetStyleInheritancePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMShadowRootResetStyleInheritancePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMShadowRootResetStyleInheritancePropertyInfo = DOMShadowRootK+ type AttrGetType DOMShadowRootResetStyleInheritancePropertyInfo = Bool+ type AttrLabel DOMShadowRootResetStyleInheritancePropertyInfo = "DOMShadowRoot::reset-style-inheritance"+ attrGet _ = getDOMShadowRootResetStyleInheritance+ attrSet _ = setDOMShadowRootResetStyleInheritance+ attrConstruct _ = constructDOMShadowRootResetStyleInheritance++type instance AttributeList DOMShadowRoot = '[ '("active-element", DOMShadowRootActiveElementPropertyInfo), '("apply-author-styles", DOMShadowRootApplyAuthorStylesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("inner-html", DOMShadowRootInnerHtmlPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("reset-style-inheritance", DOMShadowRootResetStyleInheritancePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMStorageLength :: (MonadIO m, DOMStorageK o) => o -> m Word64+getDOMStorageLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMStorageLengthPropertyInfo+instance AttrInfo DOMStorageLengthPropertyInfo where+ type AttrAllowedOps DOMStorageLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMStorageLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMStorageLengthPropertyInfo = DOMStorageK+ type AttrGetType DOMStorageLengthPropertyInfo = Word64+ type AttrLabel DOMStorageLengthPropertyInfo = "DOMStorage::length"+ attrGet _ = getDOMStorageLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMStorage = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMStorageLengthPropertyInfo)]++type instance AttributeList DOMStorageInfo = '[ '("core-object", DOMObjectCoreObjectPropertyInfo)]++type instance AttributeList DOMStorageQuota = '[ '("core-object", DOMObjectCoreObjectPropertyInfo)]++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMStyleMediaType :: (MonadIO m, DOMStyleMediaK o) => o -> m T.Text+getDOMStyleMediaType obj = liftIO $ getObjectPropertyString obj "type"++data DOMStyleMediaTypePropertyInfo+instance AttrInfo DOMStyleMediaTypePropertyInfo where+ type AttrAllowedOps DOMStyleMediaTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMStyleMediaTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMStyleMediaTypePropertyInfo = DOMStyleMediaK+ type AttrGetType DOMStyleMediaTypePropertyInfo = T.Text+ type AttrLabel DOMStyleMediaTypePropertyInfo = "DOMStyleMedia::type"+ attrGet _ = getDOMStyleMediaType+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMStyleMedia = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("type", DOMStyleMediaTypePropertyInfo)]++-- VVV Prop "disabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMStyleSheetDisabled :: (MonadIO m, DOMStyleSheetK o) => o -> m Bool+getDOMStyleSheetDisabled obj = liftIO $ getObjectPropertyBool obj "disabled"++setDOMStyleSheetDisabled :: (MonadIO m, DOMStyleSheetK o) => o -> Bool -> m ()+setDOMStyleSheetDisabled obj val = liftIO $ setObjectPropertyBool obj "disabled" val++constructDOMStyleSheetDisabled :: Bool -> IO ([Char], GValue)+constructDOMStyleSheetDisabled val = constructObjectPropertyBool "disabled" val++data DOMStyleSheetDisabledPropertyInfo+instance AttrInfo DOMStyleSheetDisabledPropertyInfo where+ type AttrAllowedOps DOMStyleSheetDisabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMStyleSheetDisabledPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMStyleSheetDisabledPropertyInfo = DOMStyleSheetK+ type AttrGetType DOMStyleSheetDisabledPropertyInfo = Bool+ type AttrLabel DOMStyleSheetDisabledPropertyInfo = "DOMStyleSheet::disabled"+ attrGet _ = getDOMStyleSheetDisabled+ attrSet _ = setDOMStyleSheetDisabled+ attrConstruct _ = constructDOMStyleSheetDisabled++-- VVV Prop "href"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMStyleSheetHref :: (MonadIO m, DOMStyleSheetK o) => o -> m T.Text+getDOMStyleSheetHref obj = liftIO $ getObjectPropertyString obj "href"++data DOMStyleSheetHrefPropertyInfo+instance AttrInfo DOMStyleSheetHrefPropertyInfo where+ type AttrAllowedOps DOMStyleSheetHrefPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMStyleSheetHrefPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMStyleSheetHrefPropertyInfo = DOMStyleSheetK+ type AttrGetType DOMStyleSheetHrefPropertyInfo = T.Text+ type AttrLabel DOMStyleSheetHrefPropertyInfo = "DOMStyleSheet::href"+ attrGet _ = getDOMStyleSheetHref+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "media"+ -- Type: TInterface "WebKit" "DOMMediaList"+ -- Flags: [PropertyReadable]++getDOMStyleSheetMedia :: (MonadIO m, DOMStyleSheetK o) => o -> m DOMMediaList+getDOMStyleSheetMedia obj = liftIO $ getObjectPropertyObject obj "media" DOMMediaList++data DOMStyleSheetMediaPropertyInfo+instance AttrInfo DOMStyleSheetMediaPropertyInfo where+ type AttrAllowedOps DOMStyleSheetMediaPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMStyleSheetMediaPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMStyleSheetMediaPropertyInfo = DOMStyleSheetK+ type AttrGetType DOMStyleSheetMediaPropertyInfo = DOMMediaList+ type AttrLabel DOMStyleSheetMediaPropertyInfo = "DOMStyleSheet::media"+ attrGet _ = getDOMStyleSheetMedia+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "owner-node"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMStyleSheetOwnerNode :: (MonadIO m, DOMStyleSheetK o) => o -> m DOMNode+getDOMStyleSheetOwnerNode obj = liftIO $ getObjectPropertyObject obj "owner-node" DOMNode++data DOMStyleSheetOwnerNodePropertyInfo+instance AttrInfo DOMStyleSheetOwnerNodePropertyInfo where+ type AttrAllowedOps DOMStyleSheetOwnerNodePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMStyleSheetOwnerNodePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMStyleSheetOwnerNodePropertyInfo = DOMStyleSheetK+ type AttrGetType DOMStyleSheetOwnerNodePropertyInfo = DOMNode+ type AttrLabel DOMStyleSheetOwnerNodePropertyInfo = "DOMStyleSheet::owner-node"+ attrGet _ = getDOMStyleSheetOwnerNode+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "parent-style-sheet"+ -- Type: TInterface "WebKit" "DOMStyleSheet"+ -- Flags: [PropertyReadable]++getDOMStyleSheetParentStyleSheet :: (MonadIO m, DOMStyleSheetK o) => o -> m DOMStyleSheet+getDOMStyleSheetParentStyleSheet obj = liftIO $ getObjectPropertyObject obj "parent-style-sheet" DOMStyleSheet++data DOMStyleSheetParentStyleSheetPropertyInfo+instance AttrInfo DOMStyleSheetParentStyleSheetPropertyInfo where+ type AttrAllowedOps DOMStyleSheetParentStyleSheetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMStyleSheetParentStyleSheetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMStyleSheetParentStyleSheetPropertyInfo = DOMStyleSheetK+ type AttrGetType DOMStyleSheetParentStyleSheetPropertyInfo = DOMStyleSheet+ type AttrLabel DOMStyleSheetParentStyleSheetPropertyInfo = "DOMStyleSheet::parent-style-sheet"+ attrGet _ = getDOMStyleSheetParentStyleSheet+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "title"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMStyleSheetTitle :: (MonadIO m, DOMStyleSheetK o) => o -> m T.Text+getDOMStyleSheetTitle obj = liftIO $ getObjectPropertyString obj "title"++data DOMStyleSheetTitlePropertyInfo+instance AttrInfo DOMStyleSheetTitlePropertyInfo where+ type AttrAllowedOps DOMStyleSheetTitlePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMStyleSheetTitlePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMStyleSheetTitlePropertyInfo = DOMStyleSheetK+ type AttrGetType DOMStyleSheetTitlePropertyInfo = T.Text+ type AttrLabel DOMStyleSheetTitlePropertyInfo = "DOMStyleSheet::title"+ attrGet _ = getDOMStyleSheetTitle+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMStyleSheetType :: (MonadIO m, DOMStyleSheetK o) => o -> m T.Text+getDOMStyleSheetType obj = liftIO $ getObjectPropertyString obj "type"++data DOMStyleSheetTypePropertyInfo+instance AttrInfo DOMStyleSheetTypePropertyInfo where+ type AttrAllowedOps DOMStyleSheetTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMStyleSheetTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMStyleSheetTypePropertyInfo = DOMStyleSheetK+ type AttrGetType DOMStyleSheetTypePropertyInfo = T.Text+ type AttrLabel DOMStyleSheetTypePropertyInfo = "DOMStyleSheet::type"+ attrGet _ = getDOMStyleSheetType+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMStyleSheet = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("disabled", DOMStyleSheetDisabledPropertyInfo), '("href", DOMStyleSheetHrefPropertyInfo), '("media", DOMStyleSheetMediaPropertyInfo), '("owner-node", DOMStyleSheetOwnerNodePropertyInfo), '("parent-style-sheet", DOMStyleSheetParentStyleSheetPropertyInfo), '("title", DOMStyleSheetTitlePropertyInfo), '("type", DOMStyleSheetTypePropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMStyleSheetListLength :: (MonadIO m, DOMStyleSheetListK o) => o -> m Word64+getDOMStyleSheetListLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMStyleSheetListLengthPropertyInfo+instance AttrInfo DOMStyleSheetListLengthPropertyInfo where+ type AttrAllowedOps DOMStyleSheetListLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMStyleSheetListLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMStyleSheetListLengthPropertyInfo = DOMStyleSheetListK+ type AttrGetType DOMStyleSheetListLengthPropertyInfo = Word64+ type AttrLabel DOMStyleSheetListLengthPropertyInfo = "DOMStyleSheetList::length"+ attrGet _ = getDOMStyleSheetListLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMStyleSheetList = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMStyleSheetListLengthPropertyInfo)]++-- VVV Prop "whole-text"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMTextWholeText :: (MonadIO m, DOMTextK o) => o -> m T.Text+getDOMTextWholeText obj = liftIO $ getObjectPropertyString obj "whole-text"++data DOMTextWholeTextPropertyInfo+instance AttrInfo DOMTextWholeTextPropertyInfo where+ type AttrAllowedOps DOMTextWholeTextPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTextWholeTextPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTextWholeTextPropertyInfo = DOMTextK+ type AttrGetType DOMTextWholeTextPropertyInfo = T.Text+ type AttrLabel DOMTextWholeTextPropertyInfo = "DOMText::whole-text"+ attrGet _ = getDOMTextWholeText+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMText = '[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("data", DOMCharacterDataDataPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("length", DOMCharacterDataLengthPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("whole-text", DOMTextWholeTextPropertyInfo)]++-- VVV Prop "active-cues"+ -- Type: TInterface "WebKit" "DOMTextTrackCueList"+ -- Flags: [PropertyReadable]++getDOMTextTrackActiveCues :: (MonadIO m, DOMTextTrackK o) => o -> m DOMTextTrackCueList+getDOMTextTrackActiveCues obj = liftIO $ getObjectPropertyObject obj "active-cues" DOMTextTrackCueList++data DOMTextTrackActiveCuesPropertyInfo+instance AttrInfo DOMTextTrackActiveCuesPropertyInfo where+ type AttrAllowedOps DOMTextTrackActiveCuesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackActiveCuesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTextTrackActiveCuesPropertyInfo = DOMTextTrackK+ type AttrGetType DOMTextTrackActiveCuesPropertyInfo = DOMTextTrackCueList+ type AttrLabel DOMTextTrackActiveCuesPropertyInfo = "DOMTextTrack::active-cues"+ attrGet _ = getDOMTextTrackActiveCues+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "cues"+ -- Type: TInterface "WebKit" "DOMTextTrackCueList"+ -- Flags: [PropertyReadable]++getDOMTextTrackCues :: (MonadIO m, DOMTextTrackK o) => o -> m DOMTextTrackCueList+getDOMTextTrackCues obj = liftIO $ getObjectPropertyObject obj "cues" DOMTextTrackCueList++data DOMTextTrackCuesPropertyInfo+instance AttrInfo DOMTextTrackCuesPropertyInfo where+ type AttrAllowedOps DOMTextTrackCuesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackCuesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTextTrackCuesPropertyInfo = DOMTextTrackK+ type AttrGetType DOMTextTrackCuesPropertyInfo = DOMTextTrackCueList+ type AttrLabel DOMTextTrackCuesPropertyInfo = "DOMTextTrack::cues"+ attrGet _ = getDOMTextTrackCues+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "id"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMTextTrackId :: (MonadIO m, DOMTextTrackK o) => o -> m T.Text+getDOMTextTrackId obj = liftIO $ getObjectPropertyString obj "id"++data DOMTextTrackIdPropertyInfo+instance AttrInfo DOMTextTrackIdPropertyInfo where+ type AttrAllowedOps DOMTextTrackIdPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackIdPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTextTrackIdPropertyInfo = DOMTextTrackK+ type AttrGetType DOMTextTrackIdPropertyInfo = T.Text+ type AttrLabel DOMTextTrackIdPropertyInfo = "DOMTextTrack::id"+ attrGet _ = getDOMTextTrackId+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "kind"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMTextTrackKind :: (MonadIO m, DOMTextTrackK o) => o -> m T.Text+getDOMTextTrackKind obj = liftIO $ getObjectPropertyString obj "kind"++data DOMTextTrackKindPropertyInfo+instance AttrInfo DOMTextTrackKindPropertyInfo where+ type AttrAllowedOps DOMTextTrackKindPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackKindPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTextTrackKindPropertyInfo = DOMTextTrackK+ type AttrGetType DOMTextTrackKindPropertyInfo = T.Text+ type AttrLabel DOMTextTrackKindPropertyInfo = "DOMTextTrack::kind"+ attrGet _ = getDOMTextTrackKind+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "label"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMTextTrackLabel :: (MonadIO m, DOMTextTrackK o) => o -> m T.Text+getDOMTextTrackLabel obj = liftIO $ getObjectPropertyString obj "label"++data DOMTextTrackLabelPropertyInfo+instance AttrInfo DOMTextTrackLabelPropertyInfo where+ type AttrAllowedOps DOMTextTrackLabelPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackLabelPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTextTrackLabelPropertyInfo = DOMTextTrackK+ type AttrGetType DOMTextTrackLabelPropertyInfo = T.Text+ type AttrLabel DOMTextTrackLabelPropertyInfo = "DOMTextTrack::label"+ attrGet _ = getDOMTextTrackLabel+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "language"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMTextTrackLanguage :: (MonadIO m, DOMTextTrackK o) => o -> m T.Text+getDOMTextTrackLanguage obj = liftIO $ getObjectPropertyString obj "language"++data DOMTextTrackLanguagePropertyInfo+instance AttrInfo DOMTextTrackLanguagePropertyInfo where+ type AttrAllowedOps DOMTextTrackLanguagePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackLanguagePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTextTrackLanguagePropertyInfo = DOMTextTrackK+ type AttrGetType DOMTextTrackLanguagePropertyInfo = T.Text+ type AttrLabel DOMTextTrackLanguagePropertyInfo = "DOMTextTrack::language"+ attrGet _ = getDOMTextTrackLanguage+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "mode"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMTextTrackMode :: (MonadIO m, DOMTextTrackK o) => o -> m T.Text+getDOMTextTrackMode obj = liftIO $ getObjectPropertyString obj "mode"++setDOMTextTrackMode :: (MonadIO m, DOMTextTrackK o) => o -> T.Text -> m ()+setDOMTextTrackMode obj val = liftIO $ setObjectPropertyString obj "mode" val++constructDOMTextTrackMode :: T.Text -> IO ([Char], GValue)+constructDOMTextTrackMode val = constructObjectPropertyString "mode" val++data DOMTextTrackModePropertyInfo+instance AttrInfo DOMTextTrackModePropertyInfo where+ type AttrAllowedOps DOMTextTrackModePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackModePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMTextTrackModePropertyInfo = DOMTextTrackK+ type AttrGetType DOMTextTrackModePropertyInfo = T.Text+ type AttrLabel DOMTextTrackModePropertyInfo = "DOMTextTrack::mode"+ attrGet _ = getDOMTextTrackMode+ attrSet _ = setDOMTextTrackMode+ attrConstruct _ = constructDOMTextTrackMode++type instance AttributeList DOMTextTrack = '[ '("active-cues", DOMTextTrackActiveCuesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("cues", DOMTextTrackCuesPropertyInfo), '("id", DOMTextTrackIdPropertyInfo), '("kind", DOMTextTrackKindPropertyInfo), '("label", DOMTextTrackLabelPropertyInfo), '("language", DOMTextTrackLanguagePropertyInfo), '("mode", DOMTextTrackModePropertyInfo)]++-- VVV Prop "align"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMTextTrackCueAlign :: (MonadIO m, DOMTextTrackCueK o) => o -> m T.Text+getDOMTextTrackCueAlign obj = liftIO $ getObjectPropertyString obj "align"++setDOMTextTrackCueAlign :: (MonadIO m, DOMTextTrackCueK o) => o -> T.Text -> m ()+setDOMTextTrackCueAlign obj val = liftIO $ setObjectPropertyString obj "align" val++constructDOMTextTrackCueAlign :: T.Text -> IO ([Char], GValue)+constructDOMTextTrackCueAlign val = constructObjectPropertyString "align" val++data DOMTextTrackCueAlignPropertyInfo+instance AttrInfo DOMTextTrackCueAlignPropertyInfo where+ type AttrAllowedOps DOMTextTrackCueAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackCueAlignPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMTextTrackCueAlignPropertyInfo = DOMTextTrackCueK+ type AttrGetType DOMTextTrackCueAlignPropertyInfo = T.Text+ type AttrLabel DOMTextTrackCueAlignPropertyInfo = "DOMTextTrackCue::align"+ attrGet _ = getDOMTextTrackCueAlign+ attrSet _ = setDOMTextTrackCueAlign+ attrConstruct _ = constructDOMTextTrackCueAlign++-- VVV Prop "end-time"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMTextTrackCueEndTime :: (MonadIO m, DOMTextTrackCueK o) => o -> m Double+getDOMTextTrackCueEndTime obj = liftIO $ getObjectPropertyDouble obj "end-time"++setDOMTextTrackCueEndTime :: (MonadIO m, DOMTextTrackCueK o) => o -> Double -> m ()+setDOMTextTrackCueEndTime obj val = liftIO $ setObjectPropertyDouble obj "end-time" val++constructDOMTextTrackCueEndTime :: Double -> IO ([Char], GValue)+constructDOMTextTrackCueEndTime val = constructObjectPropertyDouble "end-time" val++data DOMTextTrackCueEndTimePropertyInfo+instance AttrInfo DOMTextTrackCueEndTimePropertyInfo where+ type AttrAllowedOps DOMTextTrackCueEndTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackCueEndTimePropertyInfo = (~) Double+ type AttrBaseTypeConstraint DOMTextTrackCueEndTimePropertyInfo = DOMTextTrackCueK+ type AttrGetType DOMTextTrackCueEndTimePropertyInfo = Double+ type AttrLabel DOMTextTrackCueEndTimePropertyInfo = "DOMTextTrackCue::end-time"+ attrGet _ = getDOMTextTrackCueEndTime+ attrSet _ = setDOMTextTrackCueEndTime+ attrConstruct _ = constructDOMTextTrackCueEndTime++-- VVV Prop "id"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMTextTrackCueId :: (MonadIO m, DOMTextTrackCueK o) => o -> m T.Text+getDOMTextTrackCueId obj = liftIO $ getObjectPropertyString obj "id"++setDOMTextTrackCueId :: (MonadIO m, DOMTextTrackCueK o) => o -> T.Text -> m ()+setDOMTextTrackCueId obj val = liftIO $ setObjectPropertyString obj "id" val++constructDOMTextTrackCueId :: T.Text -> IO ([Char], GValue)+constructDOMTextTrackCueId val = constructObjectPropertyString "id" val++data DOMTextTrackCueIdPropertyInfo+instance AttrInfo DOMTextTrackCueIdPropertyInfo where+ type AttrAllowedOps DOMTextTrackCueIdPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackCueIdPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMTextTrackCueIdPropertyInfo = DOMTextTrackCueK+ type AttrGetType DOMTextTrackCueIdPropertyInfo = T.Text+ type AttrLabel DOMTextTrackCueIdPropertyInfo = "DOMTextTrackCue::id"+ attrGet _ = getDOMTextTrackCueId+ attrSet _ = setDOMTextTrackCueId+ attrConstruct _ = constructDOMTextTrackCueId++-- VVV Prop "line"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMTextTrackCueLine :: (MonadIO m, DOMTextTrackCueK o) => o -> m Int64+getDOMTextTrackCueLine obj = liftIO $ getObjectPropertyInt64 obj "line"++setDOMTextTrackCueLine :: (MonadIO m, DOMTextTrackCueK o) => o -> Int64 -> m ()+setDOMTextTrackCueLine obj val = liftIO $ setObjectPropertyInt64 obj "line" val++constructDOMTextTrackCueLine :: Int64 -> IO ([Char], GValue)+constructDOMTextTrackCueLine val = constructObjectPropertyInt64 "line" val++data DOMTextTrackCueLinePropertyInfo+instance AttrInfo DOMTextTrackCueLinePropertyInfo where+ type AttrAllowedOps DOMTextTrackCueLinePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackCueLinePropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMTextTrackCueLinePropertyInfo = DOMTextTrackCueK+ type AttrGetType DOMTextTrackCueLinePropertyInfo = Int64+ type AttrLabel DOMTextTrackCueLinePropertyInfo = "DOMTextTrackCue::line"+ attrGet _ = getDOMTextTrackCueLine+ attrSet _ = setDOMTextTrackCueLine+ attrConstruct _ = constructDOMTextTrackCueLine++-- VVV Prop "pause-on-exit"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMTextTrackCuePauseOnExit :: (MonadIO m, DOMTextTrackCueK o) => o -> m Bool+getDOMTextTrackCuePauseOnExit obj = liftIO $ getObjectPropertyBool obj "pause-on-exit"++setDOMTextTrackCuePauseOnExit :: (MonadIO m, DOMTextTrackCueK o) => o -> Bool -> m ()+setDOMTextTrackCuePauseOnExit obj val = liftIO $ setObjectPropertyBool obj "pause-on-exit" val++constructDOMTextTrackCuePauseOnExit :: Bool -> IO ([Char], GValue)+constructDOMTextTrackCuePauseOnExit val = constructObjectPropertyBool "pause-on-exit" val++data DOMTextTrackCuePauseOnExitPropertyInfo+instance AttrInfo DOMTextTrackCuePauseOnExitPropertyInfo where+ type AttrAllowedOps DOMTextTrackCuePauseOnExitPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackCuePauseOnExitPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMTextTrackCuePauseOnExitPropertyInfo = DOMTextTrackCueK+ type AttrGetType DOMTextTrackCuePauseOnExitPropertyInfo = Bool+ type AttrLabel DOMTextTrackCuePauseOnExitPropertyInfo = "DOMTextTrackCue::pause-on-exit"+ attrGet _ = getDOMTextTrackCuePauseOnExit+ attrSet _ = setDOMTextTrackCuePauseOnExit+ attrConstruct _ = constructDOMTextTrackCuePauseOnExit++-- VVV Prop "position"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMTextTrackCuePosition :: (MonadIO m, DOMTextTrackCueK o) => o -> m Int64+getDOMTextTrackCuePosition obj = liftIO $ getObjectPropertyInt64 obj "position"++setDOMTextTrackCuePosition :: (MonadIO m, DOMTextTrackCueK o) => o -> Int64 -> m ()+setDOMTextTrackCuePosition obj val = liftIO $ setObjectPropertyInt64 obj "position" val++constructDOMTextTrackCuePosition :: Int64 -> IO ([Char], GValue)+constructDOMTextTrackCuePosition val = constructObjectPropertyInt64 "position" val++data DOMTextTrackCuePositionPropertyInfo+instance AttrInfo DOMTextTrackCuePositionPropertyInfo where+ type AttrAllowedOps DOMTextTrackCuePositionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackCuePositionPropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMTextTrackCuePositionPropertyInfo = DOMTextTrackCueK+ type AttrGetType DOMTextTrackCuePositionPropertyInfo = Int64+ type AttrLabel DOMTextTrackCuePositionPropertyInfo = "DOMTextTrackCue::position"+ attrGet _ = getDOMTextTrackCuePosition+ attrSet _ = setDOMTextTrackCuePosition+ attrConstruct _ = constructDOMTextTrackCuePosition++-- VVV Prop "size"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMTextTrackCueSize :: (MonadIO m, DOMTextTrackCueK o) => o -> m Int64+getDOMTextTrackCueSize obj = liftIO $ getObjectPropertyInt64 obj "size"++setDOMTextTrackCueSize :: (MonadIO m, DOMTextTrackCueK o) => o -> Int64 -> m ()+setDOMTextTrackCueSize obj val = liftIO $ setObjectPropertyInt64 obj "size" val++constructDOMTextTrackCueSize :: Int64 -> IO ([Char], GValue)+constructDOMTextTrackCueSize val = constructObjectPropertyInt64 "size" val++data DOMTextTrackCueSizePropertyInfo+instance AttrInfo DOMTextTrackCueSizePropertyInfo where+ type AttrAllowedOps DOMTextTrackCueSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackCueSizePropertyInfo = (~) Int64+ type AttrBaseTypeConstraint DOMTextTrackCueSizePropertyInfo = DOMTextTrackCueK+ type AttrGetType DOMTextTrackCueSizePropertyInfo = Int64+ type AttrLabel DOMTextTrackCueSizePropertyInfo = "DOMTextTrackCue::size"+ attrGet _ = getDOMTextTrackCueSize+ attrSet _ = setDOMTextTrackCueSize+ attrConstruct _ = constructDOMTextTrackCueSize++-- VVV Prop "snap-to-lines"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMTextTrackCueSnapToLines :: (MonadIO m, DOMTextTrackCueK o) => o -> m Bool+getDOMTextTrackCueSnapToLines obj = liftIO $ getObjectPropertyBool obj "snap-to-lines"++setDOMTextTrackCueSnapToLines :: (MonadIO m, DOMTextTrackCueK o) => o -> Bool -> m ()+setDOMTextTrackCueSnapToLines obj val = liftIO $ setObjectPropertyBool obj "snap-to-lines" val++constructDOMTextTrackCueSnapToLines :: Bool -> IO ([Char], GValue)+constructDOMTextTrackCueSnapToLines val = constructObjectPropertyBool "snap-to-lines" val++data DOMTextTrackCueSnapToLinesPropertyInfo+instance AttrInfo DOMTextTrackCueSnapToLinesPropertyInfo where+ type AttrAllowedOps DOMTextTrackCueSnapToLinesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackCueSnapToLinesPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMTextTrackCueSnapToLinesPropertyInfo = DOMTextTrackCueK+ type AttrGetType DOMTextTrackCueSnapToLinesPropertyInfo = Bool+ type AttrLabel DOMTextTrackCueSnapToLinesPropertyInfo = "DOMTextTrackCue::snap-to-lines"+ attrGet _ = getDOMTextTrackCueSnapToLines+ attrSet _ = setDOMTextTrackCueSnapToLines+ attrConstruct _ = constructDOMTextTrackCueSnapToLines++-- VVV Prop "start-time"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMTextTrackCueStartTime :: (MonadIO m, DOMTextTrackCueK o) => o -> m Double+getDOMTextTrackCueStartTime obj = liftIO $ getObjectPropertyDouble obj "start-time"++setDOMTextTrackCueStartTime :: (MonadIO m, DOMTextTrackCueK o) => o -> Double -> m ()+setDOMTextTrackCueStartTime obj val = liftIO $ setObjectPropertyDouble obj "start-time" val++constructDOMTextTrackCueStartTime :: Double -> IO ([Char], GValue)+constructDOMTextTrackCueStartTime val = constructObjectPropertyDouble "start-time" val++data DOMTextTrackCueStartTimePropertyInfo+instance AttrInfo DOMTextTrackCueStartTimePropertyInfo where+ type AttrAllowedOps DOMTextTrackCueStartTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackCueStartTimePropertyInfo = (~) Double+ type AttrBaseTypeConstraint DOMTextTrackCueStartTimePropertyInfo = DOMTextTrackCueK+ type AttrGetType DOMTextTrackCueStartTimePropertyInfo = Double+ type AttrLabel DOMTextTrackCueStartTimePropertyInfo = "DOMTextTrackCue::start-time"+ attrGet _ = getDOMTextTrackCueStartTime+ attrSet _ = setDOMTextTrackCueStartTime+ attrConstruct _ = constructDOMTextTrackCueStartTime++-- VVV Prop "text"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMTextTrackCueText :: (MonadIO m, DOMTextTrackCueK o) => o -> m T.Text+getDOMTextTrackCueText obj = liftIO $ getObjectPropertyString obj "text"++setDOMTextTrackCueText :: (MonadIO m, DOMTextTrackCueK o) => o -> T.Text -> m ()+setDOMTextTrackCueText obj val = liftIO $ setObjectPropertyString obj "text" val++constructDOMTextTrackCueText :: T.Text -> IO ([Char], GValue)+constructDOMTextTrackCueText val = constructObjectPropertyString "text" val++data DOMTextTrackCueTextPropertyInfo+instance AttrInfo DOMTextTrackCueTextPropertyInfo where+ type AttrAllowedOps DOMTextTrackCueTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackCueTextPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMTextTrackCueTextPropertyInfo = DOMTextTrackCueK+ type AttrGetType DOMTextTrackCueTextPropertyInfo = T.Text+ type AttrLabel DOMTextTrackCueTextPropertyInfo = "DOMTextTrackCue::text"+ attrGet _ = getDOMTextTrackCueText+ attrSet _ = setDOMTextTrackCueText+ attrConstruct _ = constructDOMTextTrackCueText++-- VVV Prop "track"+ -- Type: TInterface "WebKit" "DOMTextTrack"+ -- Flags: [PropertyReadable]++getDOMTextTrackCueTrack :: (MonadIO m, DOMTextTrackCueK o) => o -> m DOMTextTrack+getDOMTextTrackCueTrack obj = liftIO $ getObjectPropertyObject obj "track" DOMTextTrack++data DOMTextTrackCueTrackPropertyInfo+instance AttrInfo DOMTextTrackCueTrackPropertyInfo where+ type AttrAllowedOps DOMTextTrackCueTrackPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackCueTrackPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTextTrackCueTrackPropertyInfo = DOMTextTrackCueK+ type AttrGetType DOMTextTrackCueTrackPropertyInfo = DOMTextTrack+ type AttrLabel DOMTextTrackCueTrackPropertyInfo = "DOMTextTrackCue::track"+ attrGet _ = getDOMTextTrackCueTrack+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "vertical"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMTextTrackCueVertical :: (MonadIO m, DOMTextTrackCueK o) => o -> m T.Text+getDOMTextTrackCueVertical obj = liftIO $ getObjectPropertyString obj "vertical"++setDOMTextTrackCueVertical :: (MonadIO m, DOMTextTrackCueK o) => o -> T.Text -> m ()+setDOMTextTrackCueVertical obj val = liftIO $ setObjectPropertyString obj "vertical" val++constructDOMTextTrackCueVertical :: T.Text -> IO ([Char], GValue)+constructDOMTextTrackCueVertical val = constructObjectPropertyString "vertical" val++data DOMTextTrackCueVerticalPropertyInfo+instance AttrInfo DOMTextTrackCueVerticalPropertyInfo where+ type AttrAllowedOps DOMTextTrackCueVerticalPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackCueVerticalPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DOMTextTrackCueVerticalPropertyInfo = DOMTextTrackCueK+ type AttrGetType DOMTextTrackCueVerticalPropertyInfo = T.Text+ type AttrLabel DOMTextTrackCueVerticalPropertyInfo = "DOMTextTrackCue::vertical"+ attrGet _ = getDOMTextTrackCueVertical+ attrSet _ = setDOMTextTrackCueVertical+ attrConstruct _ = constructDOMTextTrackCueVertical++type instance AttributeList DOMTextTrackCue = '[ '("align", DOMTextTrackCueAlignPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("end-time", DOMTextTrackCueEndTimePropertyInfo), '("id", DOMTextTrackCueIdPropertyInfo), '("line", DOMTextTrackCueLinePropertyInfo), '("pause-on-exit", DOMTextTrackCuePauseOnExitPropertyInfo), '("position", DOMTextTrackCuePositionPropertyInfo), '("size", DOMTextTrackCueSizePropertyInfo), '("snap-to-lines", DOMTextTrackCueSnapToLinesPropertyInfo), '("start-time", DOMTextTrackCueStartTimePropertyInfo), '("text", DOMTextTrackCueTextPropertyInfo), '("track", DOMTextTrackCueTrackPropertyInfo), '("vertical", DOMTextTrackCueVerticalPropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMTextTrackCueListLength :: (MonadIO m, DOMTextTrackCueListK o) => o -> m Word64+getDOMTextTrackCueListLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMTextTrackCueListLengthPropertyInfo+instance AttrInfo DOMTextTrackCueListLengthPropertyInfo where+ type AttrAllowedOps DOMTextTrackCueListLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackCueListLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTextTrackCueListLengthPropertyInfo = DOMTextTrackCueListK+ type AttrGetType DOMTextTrackCueListLengthPropertyInfo = Word64+ type AttrLabel DOMTextTrackCueListLengthPropertyInfo = "DOMTextTrackCueList::length"+ attrGet _ = getDOMTextTrackCueListLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMTextTrackCueList = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMTextTrackCueListLengthPropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMTextTrackListLength :: (MonadIO m, DOMTextTrackListK o) => o -> m Word64+getDOMTextTrackListLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMTextTrackListLengthPropertyInfo+instance AttrInfo DOMTextTrackListLengthPropertyInfo where+ type AttrAllowedOps DOMTextTrackListLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTextTrackListLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTextTrackListLengthPropertyInfo = DOMTextTrackListK+ type AttrGetType DOMTextTrackListLengthPropertyInfo = Word64+ type AttrLabel DOMTextTrackListLengthPropertyInfo = "DOMTextTrackList::length"+ attrGet _ = getDOMTextTrackListLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMTextTrackList = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMTextTrackListLengthPropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMTimeRangesLength :: (MonadIO m, DOMTimeRangesK o) => o -> m Word64+getDOMTimeRangesLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMTimeRangesLengthPropertyInfo+instance AttrInfo DOMTimeRangesLengthPropertyInfo where+ type AttrAllowedOps DOMTimeRangesLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTimeRangesLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTimeRangesLengthPropertyInfo = DOMTimeRangesK+ type AttrGetType DOMTimeRangesLengthPropertyInfo = Word64+ type AttrLabel DOMTimeRangesLengthPropertyInfo = "DOMTimeRanges::length"+ attrGet _ = getDOMTimeRangesLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMTimeRanges = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMTimeRangesLengthPropertyInfo)]++-- VVV Prop "client-x"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMTouchClientX :: (MonadIO m, DOMTouchK o) => o -> m Int64+getDOMTouchClientX obj = liftIO $ getObjectPropertyInt64 obj "client-x"++data DOMTouchClientXPropertyInfo+instance AttrInfo DOMTouchClientXPropertyInfo where+ type AttrAllowedOps DOMTouchClientXPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTouchClientXPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTouchClientXPropertyInfo = DOMTouchK+ type AttrGetType DOMTouchClientXPropertyInfo = Int64+ type AttrLabel DOMTouchClientXPropertyInfo = "DOMTouch::client-x"+ attrGet _ = getDOMTouchClientX+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "client-y"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMTouchClientY :: (MonadIO m, DOMTouchK o) => o -> m Int64+getDOMTouchClientY obj = liftIO $ getObjectPropertyInt64 obj "client-y"++data DOMTouchClientYPropertyInfo+instance AttrInfo DOMTouchClientYPropertyInfo where+ type AttrAllowedOps DOMTouchClientYPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTouchClientYPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTouchClientYPropertyInfo = DOMTouchK+ type AttrGetType DOMTouchClientYPropertyInfo = Int64+ type AttrLabel DOMTouchClientYPropertyInfo = "DOMTouch::client-y"+ attrGet _ = getDOMTouchClientY+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "identifier"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMTouchIdentifier :: (MonadIO m, DOMTouchK o) => o -> m Word64+getDOMTouchIdentifier obj = liftIO $ getObjectPropertyUInt64 obj "identifier"++data DOMTouchIdentifierPropertyInfo+instance AttrInfo DOMTouchIdentifierPropertyInfo where+ type AttrAllowedOps DOMTouchIdentifierPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTouchIdentifierPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTouchIdentifierPropertyInfo = DOMTouchK+ type AttrGetType DOMTouchIdentifierPropertyInfo = Word64+ type AttrLabel DOMTouchIdentifierPropertyInfo = "DOMTouch::identifier"+ attrGet _ = getDOMTouchIdentifier+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "page-x"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMTouchPageX :: (MonadIO m, DOMTouchK o) => o -> m Int64+getDOMTouchPageX obj = liftIO $ getObjectPropertyInt64 obj "page-x"++data DOMTouchPageXPropertyInfo+instance AttrInfo DOMTouchPageXPropertyInfo where+ type AttrAllowedOps DOMTouchPageXPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTouchPageXPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTouchPageXPropertyInfo = DOMTouchK+ type AttrGetType DOMTouchPageXPropertyInfo = Int64+ type AttrLabel DOMTouchPageXPropertyInfo = "DOMTouch::page-x"+ attrGet _ = getDOMTouchPageX+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "page-y"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMTouchPageY :: (MonadIO m, DOMTouchK o) => o -> m Int64+getDOMTouchPageY obj = liftIO $ getObjectPropertyInt64 obj "page-y"++data DOMTouchPageYPropertyInfo+instance AttrInfo DOMTouchPageYPropertyInfo where+ type AttrAllowedOps DOMTouchPageYPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTouchPageYPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTouchPageYPropertyInfo = DOMTouchK+ type AttrGetType DOMTouchPageYPropertyInfo = Int64+ type AttrLabel DOMTouchPageYPropertyInfo = "DOMTouch::page-y"+ attrGet _ = getDOMTouchPageY+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "screen-x"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMTouchScreenX :: (MonadIO m, DOMTouchK o) => o -> m Int64+getDOMTouchScreenX obj = liftIO $ getObjectPropertyInt64 obj "screen-x"++data DOMTouchScreenXPropertyInfo+instance AttrInfo DOMTouchScreenXPropertyInfo where+ type AttrAllowedOps DOMTouchScreenXPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTouchScreenXPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTouchScreenXPropertyInfo = DOMTouchK+ type AttrGetType DOMTouchScreenXPropertyInfo = Int64+ type AttrLabel DOMTouchScreenXPropertyInfo = "DOMTouch::screen-x"+ attrGet _ = getDOMTouchScreenX+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "screen-y"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMTouchScreenY :: (MonadIO m, DOMTouchK o) => o -> m Int64+getDOMTouchScreenY obj = liftIO $ getObjectPropertyInt64 obj "screen-y"++data DOMTouchScreenYPropertyInfo+instance AttrInfo DOMTouchScreenYPropertyInfo where+ type AttrAllowedOps DOMTouchScreenYPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTouchScreenYPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTouchScreenYPropertyInfo = DOMTouchK+ type AttrGetType DOMTouchScreenYPropertyInfo = Int64+ type AttrLabel DOMTouchScreenYPropertyInfo = "DOMTouch::screen-y"+ attrGet _ = getDOMTouchScreenY+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "target"+ -- Type: TInterface "WebKit" "DOMEventTarget"+ -- Flags: [PropertyReadable]++getDOMTouchTarget :: (MonadIO m, DOMTouchK o) => o -> m DOMEventTarget+getDOMTouchTarget obj = liftIO $ getObjectPropertyObject obj "target" DOMEventTarget++data DOMTouchTargetPropertyInfo+instance AttrInfo DOMTouchTargetPropertyInfo where+ type AttrAllowedOps DOMTouchTargetPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTouchTargetPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTouchTargetPropertyInfo = DOMTouchK+ type AttrGetType DOMTouchTargetPropertyInfo = DOMEventTarget+ type AttrLabel DOMTouchTargetPropertyInfo = "DOMTouch::target"+ attrGet _ = getDOMTouchTarget+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-force"+ -- Type: TBasicType TFloat+ -- Flags: [PropertyReadable]++getDOMTouchWebkitForce :: (MonadIO m, DOMTouchK o) => o -> m Float+getDOMTouchWebkitForce obj = liftIO $ getObjectPropertyFloat obj "webkit-force"++data DOMTouchWebkitForcePropertyInfo+instance AttrInfo DOMTouchWebkitForcePropertyInfo where+ type AttrAllowedOps DOMTouchWebkitForcePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTouchWebkitForcePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTouchWebkitForcePropertyInfo = DOMTouchK+ type AttrGetType DOMTouchWebkitForcePropertyInfo = Float+ type AttrLabel DOMTouchWebkitForcePropertyInfo = "DOMTouch::webkit-force"+ attrGet _ = getDOMTouchWebkitForce+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-radius-x"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMTouchWebkitRadiusX :: (MonadIO m, DOMTouchK o) => o -> m Int64+getDOMTouchWebkitRadiusX obj = liftIO $ getObjectPropertyInt64 obj "webkit-radius-x"++data DOMTouchWebkitRadiusXPropertyInfo+instance AttrInfo DOMTouchWebkitRadiusXPropertyInfo where+ type AttrAllowedOps DOMTouchWebkitRadiusXPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTouchWebkitRadiusXPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTouchWebkitRadiusXPropertyInfo = DOMTouchK+ type AttrGetType DOMTouchWebkitRadiusXPropertyInfo = Int64+ type AttrLabel DOMTouchWebkitRadiusXPropertyInfo = "DOMTouch::webkit-radius-x"+ attrGet _ = getDOMTouchWebkitRadiusX+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-radius-y"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMTouchWebkitRadiusY :: (MonadIO m, DOMTouchK o) => o -> m Int64+getDOMTouchWebkitRadiusY obj = liftIO $ getObjectPropertyInt64 obj "webkit-radius-y"++data DOMTouchWebkitRadiusYPropertyInfo+instance AttrInfo DOMTouchWebkitRadiusYPropertyInfo where+ type AttrAllowedOps DOMTouchWebkitRadiusYPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTouchWebkitRadiusYPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTouchWebkitRadiusYPropertyInfo = DOMTouchK+ type AttrGetType DOMTouchWebkitRadiusYPropertyInfo = Int64+ type AttrLabel DOMTouchWebkitRadiusYPropertyInfo = "DOMTouch::webkit-radius-y"+ attrGet _ = getDOMTouchWebkitRadiusY+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-rotation-angle"+ -- Type: TBasicType TFloat+ -- Flags: [PropertyReadable]++getDOMTouchWebkitRotationAngle :: (MonadIO m, DOMTouchK o) => o -> m Float+getDOMTouchWebkitRotationAngle obj = liftIO $ getObjectPropertyFloat obj "webkit-rotation-angle"++data DOMTouchWebkitRotationAnglePropertyInfo+instance AttrInfo DOMTouchWebkitRotationAnglePropertyInfo where+ type AttrAllowedOps DOMTouchWebkitRotationAnglePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTouchWebkitRotationAnglePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTouchWebkitRotationAnglePropertyInfo = DOMTouchK+ type AttrGetType DOMTouchWebkitRotationAnglePropertyInfo = Float+ type AttrLabel DOMTouchWebkitRotationAnglePropertyInfo = "DOMTouch::webkit-rotation-angle"+ attrGet _ = getDOMTouchWebkitRotationAngle+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMTouch = '[ '("client-x", DOMTouchClientXPropertyInfo), '("client-y", DOMTouchClientYPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("identifier", DOMTouchIdentifierPropertyInfo), '("page-x", DOMTouchPageXPropertyInfo), '("page-y", DOMTouchPageYPropertyInfo), '("screen-x", DOMTouchScreenXPropertyInfo), '("screen-y", DOMTouchScreenYPropertyInfo), '("target", DOMTouchTargetPropertyInfo), '("webkit-force", DOMTouchWebkitForcePropertyInfo), '("webkit-radius-x", DOMTouchWebkitRadiusXPropertyInfo), '("webkit-radius-y", DOMTouchWebkitRadiusYPropertyInfo), '("webkit-rotation-angle", DOMTouchWebkitRotationAnglePropertyInfo)]++type instance AttributeList DOMTrackEvent = '[ '("bubbles", DOMEventBubblesPropertyInfo), '("cancel-bubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-target", DOMEventCurrentTargetPropertyInfo), '("default-prevented", DOMEventDefaultPreventedPropertyInfo), '("event-phase", DOMEventEventPhasePropertyInfo), '("return-value", DOMEventReturnValuePropertyInfo), '("src-element", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("time-stamp", DOMEventTimeStampPropertyInfo), '("type", DOMEventTypePropertyInfo)]++-- VVV Prop "current-node"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMTreeWalkerCurrentNode :: (MonadIO m, DOMTreeWalkerK o) => o -> m DOMNode+getDOMTreeWalkerCurrentNode obj = liftIO $ getObjectPropertyObject obj "current-node" DOMNode++data DOMTreeWalkerCurrentNodePropertyInfo+instance AttrInfo DOMTreeWalkerCurrentNodePropertyInfo where+ type AttrAllowedOps DOMTreeWalkerCurrentNodePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTreeWalkerCurrentNodePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTreeWalkerCurrentNodePropertyInfo = DOMTreeWalkerK+ type AttrGetType DOMTreeWalkerCurrentNodePropertyInfo = DOMNode+ type AttrLabel DOMTreeWalkerCurrentNodePropertyInfo = "DOMTreeWalker::current-node"+ attrGet _ = getDOMTreeWalkerCurrentNode+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "expand-entity-references"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMTreeWalkerExpandEntityReferences :: (MonadIO m, DOMTreeWalkerK o) => o -> m Bool+getDOMTreeWalkerExpandEntityReferences obj = liftIO $ getObjectPropertyBool obj "expand-entity-references"++data DOMTreeWalkerExpandEntityReferencesPropertyInfo+instance AttrInfo DOMTreeWalkerExpandEntityReferencesPropertyInfo where+ type AttrAllowedOps DOMTreeWalkerExpandEntityReferencesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTreeWalkerExpandEntityReferencesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTreeWalkerExpandEntityReferencesPropertyInfo = DOMTreeWalkerK+ type AttrGetType DOMTreeWalkerExpandEntityReferencesPropertyInfo = Bool+ type AttrLabel DOMTreeWalkerExpandEntityReferencesPropertyInfo = "DOMTreeWalker::expand-entity-references"+ attrGet _ = getDOMTreeWalkerExpandEntityReferences+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "filter"+ -- Type: TInterface "WebKit" "DOMNodeFilter"+ -- Flags: [PropertyReadable]++getDOMTreeWalkerFilter :: (MonadIO m, DOMTreeWalkerK o) => o -> m DOMNodeFilter+getDOMTreeWalkerFilter obj = liftIO $ getObjectPropertyObject obj "filter" DOMNodeFilter++data DOMTreeWalkerFilterPropertyInfo+instance AttrInfo DOMTreeWalkerFilterPropertyInfo where+ type AttrAllowedOps DOMTreeWalkerFilterPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTreeWalkerFilterPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTreeWalkerFilterPropertyInfo = DOMTreeWalkerK+ type AttrGetType DOMTreeWalkerFilterPropertyInfo = DOMNodeFilter+ type AttrLabel DOMTreeWalkerFilterPropertyInfo = "DOMTreeWalker::filter"+ attrGet _ = getDOMTreeWalkerFilter+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "root"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMTreeWalkerRoot :: (MonadIO m, DOMTreeWalkerK o) => o -> m DOMNode+getDOMTreeWalkerRoot obj = liftIO $ getObjectPropertyObject obj "root" DOMNode++data DOMTreeWalkerRootPropertyInfo+instance AttrInfo DOMTreeWalkerRootPropertyInfo where+ type AttrAllowedOps DOMTreeWalkerRootPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTreeWalkerRootPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTreeWalkerRootPropertyInfo = DOMTreeWalkerK+ type AttrGetType DOMTreeWalkerRootPropertyInfo = DOMNode+ type AttrLabel DOMTreeWalkerRootPropertyInfo = "DOMTreeWalker::root"+ attrGet _ = getDOMTreeWalkerRoot+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "what-to-show"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMTreeWalkerWhatToShow :: (MonadIO m, DOMTreeWalkerK o) => o -> m Word64+getDOMTreeWalkerWhatToShow obj = liftIO $ getObjectPropertyUInt64 obj "what-to-show"++data DOMTreeWalkerWhatToShowPropertyInfo+instance AttrInfo DOMTreeWalkerWhatToShowPropertyInfo where+ type AttrAllowedOps DOMTreeWalkerWhatToShowPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMTreeWalkerWhatToShowPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMTreeWalkerWhatToShowPropertyInfo = DOMTreeWalkerK+ type AttrGetType DOMTreeWalkerWhatToShowPropertyInfo = Word64+ type AttrLabel DOMTreeWalkerWhatToShowPropertyInfo = "DOMTreeWalker::what-to-show"+ attrGet _ = getDOMTreeWalkerWhatToShow+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMTreeWalker = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-node", DOMTreeWalkerCurrentNodePropertyInfo), '("expand-entity-references", DOMTreeWalkerExpandEntityReferencesPropertyInfo), '("filter", DOMTreeWalkerFilterPropertyInfo), '("root", DOMTreeWalkerRootPropertyInfo), '("what-to-show", DOMTreeWalkerWhatToShowPropertyInfo)]++-- VVV Prop "char-code"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMUIEventCharCode :: (MonadIO m, DOMUIEventK o) => o -> m Int64+getDOMUIEventCharCode obj = liftIO $ getObjectPropertyInt64 obj "char-code"++data DOMUIEventCharCodePropertyInfo+instance AttrInfo DOMUIEventCharCodePropertyInfo where+ type AttrAllowedOps DOMUIEventCharCodePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMUIEventCharCodePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMUIEventCharCodePropertyInfo = DOMUIEventK+ type AttrGetType DOMUIEventCharCodePropertyInfo = Int64+ type AttrLabel DOMUIEventCharCodePropertyInfo = "DOMUIEvent::char-code"+ attrGet _ = getDOMUIEventCharCode+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "detail"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMUIEventDetail :: (MonadIO m, DOMUIEventK o) => o -> m Int64+getDOMUIEventDetail obj = liftIO $ getObjectPropertyInt64 obj "detail"++data DOMUIEventDetailPropertyInfo+instance AttrInfo DOMUIEventDetailPropertyInfo where+ type AttrAllowedOps DOMUIEventDetailPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMUIEventDetailPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMUIEventDetailPropertyInfo = DOMUIEventK+ type AttrGetType DOMUIEventDetailPropertyInfo = Int64+ type AttrLabel DOMUIEventDetailPropertyInfo = "DOMUIEvent::detail"+ attrGet _ = getDOMUIEventDetail+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "key-code"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMUIEventKeyCode :: (MonadIO m, DOMUIEventK o) => o -> m Int64+getDOMUIEventKeyCode obj = liftIO $ getObjectPropertyInt64 obj "key-code"++data DOMUIEventKeyCodePropertyInfo+instance AttrInfo DOMUIEventKeyCodePropertyInfo where+ type AttrAllowedOps DOMUIEventKeyCodePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMUIEventKeyCodePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMUIEventKeyCodePropertyInfo = DOMUIEventK+ type AttrGetType DOMUIEventKeyCodePropertyInfo = Int64+ type AttrLabel DOMUIEventKeyCodePropertyInfo = "DOMUIEvent::key-code"+ attrGet _ = getDOMUIEventKeyCode+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "layer-x"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMUIEventLayerX :: (MonadIO m, DOMUIEventK o) => o -> m Int64+getDOMUIEventLayerX obj = liftIO $ getObjectPropertyInt64 obj "layer-x"++data DOMUIEventLayerXPropertyInfo+instance AttrInfo DOMUIEventLayerXPropertyInfo where+ type AttrAllowedOps DOMUIEventLayerXPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMUIEventLayerXPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMUIEventLayerXPropertyInfo = DOMUIEventK+ type AttrGetType DOMUIEventLayerXPropertyInfo = Int64+ type AttrLabel DOMUIEventLayerXPropertyInfo = "DOMUIEvent::layer-x"+ attrGet _ = getDOMUIEventLayerX+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "layer-y"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMUIEventLayerY :: (MonadIO m, DOMUIEventK o) => o -> m Int64+getDOMUIEventLayerY obj = liftIO $ getObjectPropertyInt64 obj "layer-y"++data DOMUIEventLayerYPropertyInfo+instance AttrInfo DOMUIEventLayerYPropertyInfo where+ type AttrAllowedOps DOMUIEventLayerYPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMUIEventLayerYPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMUIEventLayerYPropertyInfo = DOMUIEventK+ type AttrGetType DOMUIEventLayerYPropertyInfo = Int64+ type AttrLabel DOMUIEventLayerYPropertyInfo = "DOMUIEvent::layer-y"+ attrGet _ = getDOMUIEventLayerY+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "page-x"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMUIEventPageX :: (MonadIO m, DOMUIEventK o) => o -> m Int64+getDOMUIEventPageX obj = liftIO $ getObjectPropertyInt64 obj "page-x"++data DOMUIEventPageXPropertyInfo+instance AttrInfo DOMUIEventPageXPropertyInfo where+ type AttrAllowedOps DOMUIEventPageXPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMUIEventPageXPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMUIEventPageXPropertyInfo = DOMUIEventK+ type AttrGetType DOMUIEventPageXPropertyInfo = Int64+ type AttrLabel DOMUIEventPageXPropertyInfo = "DOMUIEvent::page-x"+ attrGet _ = getDOMUIEventPageX+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "page-y"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMUIEventPageY :: (MonadIO m, DOMUIEventK o) => o -> m Int64+getDOMUIEventPageY obj = liftIO $ getObjectPropertyInt64 obj "page-y"++data DOMUIEventPageYPropertyInfo+instance AttrInfo DOMUIEventPageYPropertyInfo where+ type AttrAllowedOps DOMUIEventPageYPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMUIEventPageYPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMUIEventPageYPropertyInfo = DOMUIEventK+ type AttrGetType DOMUIEventPageYPropertyInfo = Int64+ type AttrLabel DOMUIEventPageYPropertyInfo = "DOMUIEvent::page-y"+ attrGet _ = getDOMUIEventPageY+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "view"+ -- Type: TInterface "WebKit" "DOMDOMWindow"+ -- Flags: [PropertyReadable]++getDOMUIEventView :: (MonadIO m, DOMUIEventK o) => o -> m DOMDOMWindow+getDOMUIEventView obj = liftIO $ getObjectPropertyObject obj "view" DOMDOMWindow++data DOMUIEventViewPropertyInfo+instance AttrInfo DOMUIEventViewPropertyInfo where+ type AttrAllowedOps DOMUIEventViewPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMUIEventViewPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMUIEventViewPropertyInfo = DOMUIEventK+ type AttrGetType DOMUIEventViewPropertyInfo = DOMDOMWindow+ type AttrLabel DOMUIEventViewPropertyInfo = "DOMUIEvent::view"+ attrGet _ = getDOMUIEventView+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "which"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMUIEventWhich :: (MonadIO m, DOMUIEventK o) => o -> m Int64+getDOMUIEventWhich obj = liftIO $ getObjectPropertyInt64 obj "which"++data DOMUIEventWhichPropertyInfo+instance AttrInfo DOMUIEventWhichPropertyInfo where+ type AttrAllowedOps DOMUIEventWhichPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMUIEventWhichPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMUIEventWhichPropertyInfo = DOMUIEventK+ type AttrGetType DOMUIEventWhichPropertyInfo = Int64+ type AttrLabel DOMUIEventWhichPropertyInfo = "DOMUIEvent::which"+ attrGet _ = getDOMUIEventWhich+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMUIEvent = '[ '("bubbles", DOMEventBubblesPropertyInfo), '("cancel-bubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("char-code", DOMUIEventCharCodePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-target", DOMEventCurrentTargetPropertyInfo), '("default-prevented", DOMEventDefaultPreventedPropertyInfo), '("detail", DOMUIEventDetailPropertyInfo), '("event-phase", DOMEventEventPhasePropertyInfo), '("key-code", DOMUIEventKeyCodePropertyInfo), '("layer-x", DOMUIEventLayerXPropertyInfo), '("layer-y", DOMUIEventLayerYPropertyInfo), '("page-x", DOMUIEventPageXPropertyInfo), '("page-y", DOMUIEventPageYPropertyInfo), '("return-value", DOMEventReturnValuePropertyInfo), '("src-element", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("time-stamp", DOMEventTimeStampPropertyInfo), '("type", DOMEventTypePropertyInfo), '("view", DOMUIEventViewPropertyInfo), '("which", DOMUIEventWhichPropertyInfo)]++-- VVV Prop "bad-input"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMValidityStateBadInput :: (MonadIO m, DOMValidityStateK o) => o -> m Bool+getDOMValidityStateBadInput obj = liftIO $ getObjectPropertyBool obj "bad-input"++data DOMValidityStateBadInputPropertyInfo+instance AttrInfo DOMValidityStateBadInputPropertyInfo where+ type AttrAllowedOps DOMValidityStateBadInputPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMValidityStateBadInputPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMValidityStateBadInputPropertyInfo = DOMValidityStateK+ type AttrGetType DOMValidityStateBadInputPropertyInfo = Bool+ type AttrLabel DOMValidityStateBadInputPropertyInfo = "DOMValidityState::bad-input"+ attrGet _ = getDOMValidityStateBadInput+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "custom-error"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMValidityStateCustomError :: (MonadIO m, DOMValidityStateK o) => o -> m Bool+getDOMValidityStateCustomError obj = liftIO $ getObjectPropertyBool obj "custom-error"++data DOMValidityStateCustomErrorPropertyInfo+instance AttrInfo DOMValidityStateCustomErrorPropertyInfo where+ type AttrAllowedOps DOMValidityStateCustomErrorPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMValidityStateCustomErrorPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMValidityStateCustomErrorPropertyInfo = DOMValidityStateK+ type AttrGetType DOMValidityStateCustomErrorPropertyInfo = Bool+ type AttrLabel DOMValidityStateCustomErrorPropertyInfo = "DOMValidityState::custom-error"+ attrGet _ = getDOMValidityStateCustomError+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "pattern-mismatch"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMValidityStatePatternMismatch :: (MonadIO m, DOMValidityStateK o) => o -> m Bool+getDOMValidityStatePatternMismatch obj = liftIO $ getObjectPropertyBool obj "pattern-mismatch"++data DOMValidityStatePatternMismatchPropertyInfo+instance AttrInfo DOMValidityStatePatternMismatchPropertyInfo where+ type AttrAllowedOps DOMValidityStatePatternMismatchPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMValidityStatePatternMismatchPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMValidityStatePatternMismatchPropertyInfo = DOMValidityStateK+ type AttrGetType DOMValidityStatePatternMismatchPropertyInfo = Bool+ type AttrLabel DOMValidityStatePatternMismatchPropertyInfo = "DOMValidityState::pattern-mismatch"+ attrGet _ = getDOMValidityStatePatternMismatch+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "range-overflow"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMValidityStateRangeOverflow :: (MonadIO m, DOMValidityStateK o) => o -> m Bool+getDOMValidityStateRangeOverflow obj = liftIO $ getObjectPropertyBool obj "range-overflow"++data DOMValidityStateRangeOverflowPropertyInfo+instance AttrInfo DOMValidityStateRangeOverflowPropertyInfo where+ type AttrAllowedOps DOMValidityStateRangeOverflowPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMValidityStateRangeOverflowPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMValidityStateRangeOverflowPropertyInfo = DOMValidityStateK+ type AttrGetType DOMValidityStateRangeOverflowPropertyInfo = Bool+ type AttrLabel DOMValidityStateRangeOverflowPropertyInfo = "DOMValidityState::range-overflow"+ attrGet _ = getDOMValidityStateRangeOverflow+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "range-underflow"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMValidityStateRangeUnderflow :: (MonadIO m, DOMValidityStateK o) => o -> m Bool+getDOMValidityStateRangeUnderflow obj = liftIO $ getObjectPropertyBool obj "range-underflow"++data DOMValidityStateRangeUnderflowPropertyInfo+instance AttrInfo DOMValidityStateRangeUnderflowPropertyInfo where+ type AttrAllowedOps DOMValidityStateRangeUnderflowPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMValidityStateRangeUnderflowPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMValidityStateRangeUnderflowPropertyInfo = DOMValidityStateK+ type AttrGetType DOMValidityStateRangeUnderflowPropertyInfo = Bool+ type AttrLabel DOMValidityStateRangeUnderflowPropertyInfo = "DOMValidityState::range-underflow"+ attrGet _ = getDOMValidityStateRangeUnderflow+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "step-mismatch"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMValidityStateStepMismatch :: (MonadIO m, DOMValidityStateK o) => o -> m Bool+getDOMValidityStateStepMismatch obj = liftIO $ getObjectPropertyBool obj "step-mismatch"++data DOMValidityStateStepMismatchPropertyInfo+instance AttrInfo DOMValidityStateStepMismatchPropertyInfo where+ type AttrAllowedOps DOMValidityStateStepMismatchPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMValidityStateStepMismatchPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMValidityStateStepMismatchPropertyInfo = DOMValidityStateK+ type AttrGetType DOMValidityStateStepMismatchPropertyInfo = Bool+ type AttrLabel DOMValidityStateStepMismatchPropertyInfo = "DOMValidityState::step-mismatch"+ attrGet _ = getDOMValidityStateStepMismatch+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "too-long"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMValidityStateTooLong :: (MonadIO m, DOMValidityStateK o) => o -> m Bool+getDOMValidityStateTooLong obj = liftIO $ getObjectPropertyBool obj "too-long"++data DOMValidityStateTooLongPropertyInfo+instance AttrInfo DOMValidityStateTooLongPropertyInfo where+ type AttrAllowedOps DOMValidityStateTooLongPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMValidityStateTooLongPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMValidityStateTooLongPropertyInfo = DOMValidityStateK+ type AttrGetType DOMValidityStateTooLongPropertyInfo = Bool+ type AttrLabel DOMValidityStateTooLongPropertyInfo = "DOMValidityState::too-long"+ attrGet _ = getDOMValidityStateTooLong+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "type-mismatch"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMValidityStateTypeMismatch :: (MonadIO m, DOMValidityStateK o) => o -> m Bool+getDOMValidityStateTypeMismatch obj = liftIO $ getObjectPropertyBool obj "type-mismatch"++data DOMValidityStateTypeMismatchPropertyInfo+instance AttrInfo DOMValidityStateTypeMismatchPropertyInfo where+ type AttrAllowedOps DOMValidityStateTypeMismatchPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMValidityStateTypeMismatchPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMValidityStateTypeMismatchPropertyInfo = DOMValidityStateK+ type AttrGetType DOMValidityStateTypeMismatchPropertyInfo = Bool+ type AttrLabel DOMValidityStateTypeMismatchPropertyInfo = "DOMValidityState::type-mismatch"+ attrGet _ = getDOMValidityStateTypeMismatch+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "valid"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMValidityStateValid :: (MonadIO m, DOMValidityStateK o) => o -> m Bool+getDOMValidityStateValid obj = liftIO $ getObjectPropertyBool obj "valid"++data DOMValidityStateValidPropertyInfo+instance AttrInfo DOMValidityStateValidPropertyInfo where+ type AttrAllowedOps DOMValidityStateValidPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMValidityStateValidPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMValidityStateValidPropertyInfo = DOMValidityStateK+ type AttrGetType DOMValidityStateValidPropertyInfo = Bool+ type AttrLabel DOMValidityStateValidPropertyInfo = "DOMValidityState::valid"+ attrGet _ = getDOMValidityStateValid+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "value-missing"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMValidityStateValueMissing :: (MonadIO m, DOMValidityStateK o) => o -> m Bool+getDOMValidityStateValueMissing obj = liftIO $ getObjectPropertyBool obj "value-missing"++data DOMValidityStateValueMissingPropertyInfo+instance AttrInfo DOMValidityStateValueMissingPropertyInfo where+ type AttrAllowedOps DOMValidityStateValueMissingPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMValidityStateValueMissingPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMValidityStateValueMissingPropertyInfo = DOMValidityStateK+ type AttrGetType DOMValidityStateValueMissingPropertyInfo = Bool+ type AttrLabel DOMValidityStateValueMissingPropertyInfo = "DOMValidityState::value-missing"+ attrGet _ = getDOMValidityStateValueMissing+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMValidityState = '[ '("bad-input", DOMValidityStateBadInputPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("custom-error", DOMValidityStateCustomErrorPropertyInfo), '("pattern-mismatch", DOMValidityStatePatternMismatchPropertyInfo), '("range-overflow", DOMValidityStateRangeOverflowPropertyInfo), '("range-underflow", DOMValidityStateRangeUnderflowPropertyInfo), '("step-mismatch", DOMValidityStateStepMismatchPropertyInfo), '("too-long", DOMValidityStateTooLongPropertyInfo), '("type-mismatch", DOMValidityStateTypeMismatchPropertyInfo), '("valid", DOMValidityStateValidPropertyInfo), '("value-missing", DOMValidityStateValueMissingPropertyInfo)]++-- VVV Prop "corrupted-video-frames"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMVideoPlaybackQualityCorruptedVideoFrames :: (MonadIO m, DOMVideoPlaybackQualityK o) => o -> m Word64+getDOMVideoPlaybackQualityCorruptedVideoFrames obj = liftIO $ getObjectPropertyUInt64 obj "corrupted-video-frames"++data DOMVideoPlaybackQualityCorruptedVideoFramesPropertyInfo+instance AttrInfo DOMVideoPlaybackQualityCorruptedVideoFramesPropertyInfo where+ type AttrAllowedOps DOMVideoPlaybackQualityCorruptedVideoFramesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMVideoPlaybackQualityCorruptedVideoFramesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMVideoPlaybackQualityCorruptedVideoFramesPropertyInfo = DOMVideoPlaybackQualityK+ type AttrGetType DOMVideoPlaybackQualityCorruptedVideoFramesPropertyInfo = Word64+ type AttrLabel DOMVideoPlaybackQualityCorruptedVideoFramesPropertyInfo = "DOMVideoPlaybackQuality::corrupted-video-frames"+ attrGet _ = getDOMVideoPlaybackQualityCorruptedVideoFrames+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "creation-time"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getDOMVideoPlaybackQualityCreationTime :: (MonadIO m, DOMVideoPlaybackQualityK o) => o -> m Double+getDOMVideoPlaybackQualityCreationTime obj = liftIO $ getObjectPropertyDouble obj "creation-time"++data DOMVideoPlaybackQualityCreationTimePropertyInfo+instance AttrInfo DOMVideoPlaybackQualityCreationTimePropertyInfo where+ type AttrAllowedOps DOMVideoPlaybackQualityCreationTimePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMVideoPlaybackQualityCreationTimePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMVideoPlaybackQualityCreationTimePropertyInfo = DOMVideoPlaybackQualityK+ type AttrGetType DOMVideoPlaybackQualityCreationTimePropertyInfo = Double+ type AttrLabel DOMVideoPlaybackQualityCreationTimePropertyInfo = "DOMVideoPlaybackQuality::creation-time"+ attrGet _ = getDOMVideoPlaybackQualityCreationTime+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "dropped-video-frames"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMVideoPlaybackQualityDroppedVideoFrames :: (MonadIO m, DOMVideoPlaybackQualityK o) => o -> m Word64+getDOMVideoPlaybackQualityDroppedVideoFrames obj = liftIO $ getObjectPropertyUInt64 obj "dropped-video-frames"++data DOMVideoPlaybackQualityDroppedVideoFramesPropertyInfo+instance AttrInfo DOMVideoPlaybackQualityDroppedVideoFramesPropertyInfo where+ type AttrAllowedOps DOMVideoPlaybackQualityDroppedVideoFramesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMVideoPlaybackQualityDroppedVideoFramesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMVideoPlaybackQualityDroppedVideoFramesPropertyInfo = DOMVideoPlaybackQualityK+ type AttrGetType DOMVideoPlaybackQualityDroppedVideoFramesPropertyInfo = Word64+ type AttrLabel DOMVideoPlaybackQualityDroppedVideoFramesPropertyInfo = "DOMVideoPlaybackQuality::dropped-video-frames"+ attrGet _ = getDOMVideoPlaybackQualityDroppedVideoFrames+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "total-frame-delay"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getDOMVideoPlaybackQualityTotalFrameDelay :: (MonadIO m, DOMVideoPlaybackQualityK o) => o -> m Double+getDOMVideoPlaybackQualityTotalFrameDelay obj = liftIO $ getObjectPropertyDouble obj "total-frame-delay"++data DOMVideoPlaybackQualityTotalFrameDelayPropertyInfo+instance AttrInfo DOMVideoPlaybackQualityTotalFrameDelayPropertyInfo where+ type AttrAllowedOps DOMVideoPlaybackQualityTotalFrameDelayPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMVideoPlaybackQualityTotalFrameDelayPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMVideoPlaybackQualityTotalFrameDelayPropertyInfo = DOMVideoPlaybackQualityK+ type AttrGetType DOMVideoPlaybackQualityTotalFrameDelayPropertyInfo = Double+ type AttrLabel DOMVideoPlaybackQualityTotalFrameDelayPropertyInfo = "DOMVideoPlaybackQuality::total-frame-delay"+ attrGet _ = getDOMVideoPlaybackQualityTotalFrameDelay+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "total-video-frames"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMVideoPlaybackQualityTotalVideoFrames :: (MonadIO m, DOMVideoPlaybackQualityK o) => o -> m Word64+getDOMVideoPlaybackQualityTotalVideoFrames obj = liftIO $ getObjectPropertyUInt64 obj "total-video-frames"++data DOMVideoPlaybackQualityTotalVideoFramesPropertyInfo+instance AttrInfo DOMVideoPlaybackQualityTotalVideoFramesPropertyInfo where+ type AttrAllowedOps DOMVideoPlaybackQualityTotalVideoFramesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMVideoPlaybackQualityTotalVideoFramesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMVideoPlaybackQualityTotalVideoFramesPropertyInfo = DOMVideoPlaybackQualityK+ type AttrGetType DOMVideoPlaybackQualityTotalVideoFramesPropertyInfo = Word64+ type AttrLabel DOMVideoPlaybackQualityTotalVideoFramesPropertyInfo = "DOMVideoPlaybackQuality::total-video-frames"+ attrGet _ = getDOMVideoPlaybackQualityTotalVideoFrames+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMVideoPlaybackQuality = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("corrupted-video-frames", DOMVideoPlaybackQualityCorruptedVideoFramesPropertyInfo), '("creation-time", DOMVideoPlaybackQualityCreationTimePropertyInfo), '("dropped-video-frames", DOMVideoPlaybackQualityDroppedVideoFramesPropertyInfo), '("total-frame-delay", DOMVideoPlaybackQualityTotalFrameDelayPropertyInfo), '("total-video-frames", DOMVideoPlaybackQualityTotalVideoFramesPropertyInfo)]++-- VVV Prop "id"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMVideoTrackId :: (MonadIO m, DOMVideoTrackK o) => o -> m T.Text+getDOMVideoTrackId obj = liftIO $ getObjectPropertyString obj "id"++data DOMVideoTrackIdPropertyInfo+instance AttrInfo DOMVideoTrackIdPropertyInfo where+ type AttrAllowedOps DOMVideoTrackIdPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMVideoTrackIdPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMVideoTrackIdPropertyInfo = DOMVideoTrackK+ type AttrGetType DOMVideoTrackIdPropertyInfo = T.Text+ type AttrLabel DOMVideoTrackIdPropertyInfo = "DOMVideoTrack::id"+ attrGet _ = getDOMVideoTrackId+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "kind"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMVideoTrackKind :: (MonadIO m, DOMVideoTrackK o) => o -> m T.Text+getDOMVideoTrackKind obj = liftIO $ getObjectPropertyString obj "kind"++data DOMVideoTrackKindPropertyInfo+instance AttrInfo DOMVideoTrackKindPropertyInfo where+ type AttrAllowedOps DOMVideoTrackKindPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMVideoTrackKindPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMVideoTrackKindPropertyInfo = DOMVideoTrackK+ type AttrGetType DOMVideoTrackKindPropertyInfo = T.Text+ type AttrLabel DOMVideoTrackKindPropertyInfo = "DOMVideoTrack::kind"+ attrGet _ = getDOMVideoTrackKind+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "label"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMVideoTrackLabel :: (MonadIO m, DOMVideoTrackK o) => o -> m T.Text+getDOMVideoTrackLabel obj = liftIO $ getObjectPropertyString obj "label"++data DOMVideoTrackLabelPropertyInfo+instance AttrInfo DOMVideoTrackLabelPropertyInfo where+ type AttrAllowedOps DOMVideoTrackLabelPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMVideoTrackLabelPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMVideoTrackLabelPropertyInfo = DOMVideoTrackK+ type AttrGetType DOMVideoTrackLabelPropertyInfo = T.Text+ type AttrLabel DOMVideoTrackLabelPropertyInfo = "DOMVideoTrack::label"+ attrGet _ = getDOMVideoTrackLabel+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "language"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMVideoTrackLanguage :: (MonadIO m, DOMVideoTrackK o) => o -> m T.Text+getDOMVideoTrackLanguage obj = liftIO $ getObjectPropertyString obj "language"++data DOMVideoTrackLanguagePropertyInfo+instance AttrInfo DOMVideoTrackLanguagePropertyInfo where+ type AttrAllowedOps DOMVideoTrackLanguagePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMVideoTrackLanguagePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMVideoTrackLanguagePropertyInfo = DOMVideoTrackK+ type AttrGetType DOMVideoTrackLanguagePropertyInfo = T.Text+ type AttrLabel DOMVideoTrackLanguagePropertyInfo = "DOMVideoTrack::language"+ attrGet _ = getDOMVideoTrackLanguage+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "selected"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMVideoTrackSelected :: (MonadIO m, DOMVideoTrackK o) => o -> m Bool+getDOMVideoTrackSelected obj = liftIO $ getObjectPropertyBool obj "selected"++setDOMVideoTrackSelected :: (MonadIO m, DOMVideoTrackK o) => o -> Bool -> m ()+setDOMVideoTrackSelected obj val = liftIO $ setObjectPropertyBool obj "selected" val++constructDOMVideoTrackSelected :: Bool -> IO ([Char], GValue)+constructDOMVideoTrackSelected val = constructObjectPropertyBool "selected" val++data DOMVideoTrackSelectedPropertyInfo+instance AttrInfo DOMVideoTrackSelectedPropertyInfo where+ type AttrAllowedOps DOMVideoTrackSelectedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMVideoTrackSelectedPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint DOMVideoTrackSelectedPropertyInfo = DOMVideoTrackK+ type AttrGetType DOMVideoTrackSelectedPropertyInfo = Bool+ type AttrLabel DOMVideoTrackSelectedPropertyInfo = "DOMVideoTrack::selected"+ attrGet _ = getDOMVideoTrackSelected+ attrSet _ = setDOMVideoTrackSelected+ attrConstruct _ = constructDOMVideoTrackSelected++type instance AttributeList DOMVideoTrack = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("id", DOMVideoTrackIdPropertyInfo), '("kind", DOMVideoTrackKindPropertyInfo), '("label", DOMVideoTrackLabelPropertyInfo), '("language", DOMVideoTrackLanguagePropertyInfo), '("selected", DOMVideoTrackSelectedPropertyInfo)]++-- VVV Prop "length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMVideoTrackListLength :: (MonadIO m, DOMVideoTrackListK o) => o -> m Word64+getDOMVideoTrackListLength obj = liftIO $ getObjectPropertyUInt64 obj "length"++data DOMVideoTrackListLengthPropertyInfo+instance AttrInfo DOMVideoTrackListLengthPropertyInfo where+ type AttrAllowedOps DOMVideoTrackListLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMVideoTrackListLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMVideoTrackListLengthPropertyInfo = DOMVideoTrackListK+ type AttrGetType DOMVideoTrackListLengthPropertyInfo = Word64+ type AttrLabel DOMVideoTrackListLengthPropertyInfo = "DOMVideoTrackList::length"+ attrGet _ = getDOMVideoTrackListLength+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMVideoTrackList = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMVideoTrackListLengthPropertyInfo)]++-- VVV Prop "first-empty-region-index"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMWebKitNamedFlowFirstEmptyRegionIndex :: (MonadIO m, DOMWebKitNamedFlowK o) => o -> m Int64+getDOMWebKitNamedFlowFirstEmptyRegionIndex obj = liftIO $ getObjectPropertyInt64 obj "first-empty-region-index"++data DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo+instance AttrInfo DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo where+ type AttrAllowedOps DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo = DOMWebKitNamedFlowK+ type AttrGetType DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo = Int64+ type AttrLabel DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo = "DOMWebKitNamedFlow::first-empty-region-index"+ attrGet _ = getDOMWebKitNamedFlowFirstEmptyRegionIndex+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMWebKitNamedFlowName :: (MonadIO m, DOMWebKitNamedFlowK o) => o -> m T.Text+getDOMWebKitNamedFlowName obj = liftIO $ getObjectPropertyString obj "name"++data DOMWebKitNamedFlowNamePropertyInfo+instance AttrInfo DOMWebKitNamedFlowNamePropertyInfo where+ type AttrAllowedOps DOMWebKitNamedFlowNamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMWebKitNamedFlowNamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMWebKitNamedFlowNamePropertyInfo = DOMWebKitNamedFlowK+ type AttrGetType DOMWebKitNamedFlowNamePropertyInfo = T.Text+ type AttrLabel DOMWebKitNamedFlowNamePropertyInfo = "DOMWebKitNamedFlow::name"+ attrGet _ = getDOMWebKitNamedFlowName+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "overset"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMWebKitNamedFlowOverset :: (MonadIO m, DOMWebKitNamedFlowK 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 = DOMWebKitNamedFlowK+ type AttrGetType DOMWebKitNamedFlowOversetPropertyInfo = Bool+ type AttrLabel DOMWebKitNamedFlowOversetPropertyInfo = "DOMWebKitNamedFlow::overset"+ attrGet _ = getDOMWebKitNamedFlowOverset+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMWebKitNamedFlow = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("first-empty-region-index", DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo), '("name", DOMWebKitNamedFlowNamePropertyInfo), '("overset", DOMWebKitNamedFlowOversetPropertyInfo)]++-- VVV Prop "x"+ -- Type: TBasicType TFloat+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMWebKitPointX :: (MonadIO m, DOMWebKitPointK o) => o -> m Float+getDOMWebKitPointX obj = liftIO $ getObjectPropertyFloat obj "x"++setDOMWebKitPointX :: (MonadIO m, DOMWebKitPointK o) => o -> Float -> m ()+setDOMWebKitPointX obj val = liftIO $ setObjectPropertyFloat obj "x" val++constructDOMWebKitPointX :: Float -> IO ([Char], GValue)+constructDOMWebKitPointX val = constructObjectPropertyFloat "x" val++data DOMWebKitPointXPropertyInfo+instance AttrInfo DOMWebKitPointXPropertyInfo where+ type AttrAllowedOps DOMWebKitPointXPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMWebKitPointXPropertyInfo = (~) Float+ type AttrBaseTypeConstraint DOMWebKitPointXPropertyInfo = DOMWebKitPointK+ type AttrGetType DOMWebKitPointXPropertyInfo = Float+ type AttrLabel DOMWebKitPointXPropertyInfo = "DOMWebKitPoint::x"+ attrGet _ = getDOMWebKitPointX+ attrSet _ = setDOMWebKitPointX+ attrConstruct _ = constructDOMWebKitPointX++-- VVV Prop "y"+ -- Type: TBasicType TFloat+ -- Flags: [PropertyReadable,PropertyWritable]++getDOMWebKitPointY :: (MonadIO m, DOMWebKitPointK o) => o -> m Float+getDOMWebKitPointY obj = liftIO $ getObjectPropertyFloat obj "y"++setDOMWebKitPointY :: (MonadIO m, DOMWebKitPointK o) => o -> Float -> m ()+setDOMWebKitPointY obj val = liftIO $ setObjectPropertyFloat obj "y" val++constructDOMWebKitPointY :: Float -> IO ([Char], GValue)+constructDOMWebKitPointY val = constructObjectPropertyFloat "y" val++data DOMWebKitPointYPropertyInfo+instance AttrInfo DOMWebKitPointYPropertyInfo where+ type AttrAllowedOps DOMWebKitPointYPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DOMWebKitPointYPropertyInfo = (~) Float+ type AttrBaseTypeConstraint DOMWebKitPointYPropertyInfo = DOMWebKitPointK+ type AttrGetType DOMWebKitPointYPropertyInfo = Float+ type AttrLabel DOMWebKitPointYPropertyInfo = "DOMWebKitPoint::y"+ attrGet _ = getDOMWebKitPointY+ attrSet _ = setDOMWebKitPointY+ attrConstruct _ = constructDOMWebKitPointY++type instance AttributeList DOMWebKitPoint = '[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("x", DOMWebKitPointXPropertyInfo), '("y", DOMWebKitPointYPropertyInfo)]++-- VVV Prop "delta-mode"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMWheelEventDeltaMode :: (MonadIO m, DOMWheelEventK o) => o -> m Word64+getDOMWheelEventDeltaMode obj = liftIO $ getObjectPropertyUInt64 obj "delta-mode"++data DOMWheelEventDeltaModePropertyInfo+instance AttrInfo DOMWheelEventDeltaModePropertyInfo where+ type AttrAllowedOps DOMWheelEventDeltaModePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMWheelEventDeltaModePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMWheelEventDeltaModePropertyInfo = DOMWheelEventK+ type AttrGetType DOMWheelEventDeltaModePropertyInfo = Word64+ type AttrLabel DOMWheelEventDeltaModePropertyInfo = "DOMWheelEvent::delta-mode"+ attrGet _ = getDOMWheelEventDeltaMode+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "delta-x"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getDOMWheelEventDeltaX :: (MonadIO m, DOMWheelEventK o) => o -> m Double+getDOMWheelEventDeltaX obj = liftIO $ getObjectPropertyDouble obj "delta-x"++data DOMWheelEventDeltaXPropertyInfo+instance AttrInfo DOMWheelEventDeltaXPropertyInfo where+ type AttrAllowedOps DOMWheelEventDeltaXPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMWheelEventDeltaXPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMWheelEventDeltaXPropertyInfo = DOMWheelEventK+ type AttrGetType DOMWheelEventDeltaXPropertyInfo = Double+ type AttrLabel DOMWheelEventDeltaXPropertyInfo = "DOMWheelEvent::delta-x"+ attrGet _ = getDOMWheelEventDeltaX+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "delta-y"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getDOMWheelEventDeltaY :: (MonadIO m, DOMWheelEventK o) => o -> m Double+getDOMWheelEventDeltaY obj = liftIO $ getObjectPropertyDouble obj "delta-y"++data DOMWheelEventDeltaYPropertyInfo+instance AttrInfo DOMWheelEventDeltaYPropertyInfo where+ type AttrAllowedOps DOMWheelEventDeltaYPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMWheelEventDeltaYPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMWheelEventDeltaYPropertyInfo = DOMWheelEventK+ type AttrGetType DOMWheelEventDeltaYPropertyInfo = Double+ type AttrLabel DOMWheelEventDeltaYPropertyInfo = "DOMWheelEvent::delta-y"+ attrGet _ = getDOMWheelEventDeltaY+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "delta-z"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getDOMWheelEventDeltaZ :: (MonadIO m, DOMWheelEventK o) => o -> m Double+getDOMWheelEventDeltaZ obj = liftIO $ getObjectPropertyDouble obj "delta-z"++data DOMWheelEventDeltaZPropertyInfo+instance AttrInfo DOMWheelEventDeltaZPropertyInfo where+ type AttrAllowedOps DOMWheelEventDeltaZPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMWheelEventDeltaZPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMWheelEventDeltaZPropertyInfo = DOMWheelEventK+ type AttrGetType DOMWheelEventDeltaZPropertyInfo = Double+ type AttrLabel DOMWheelEventDeltaZPropertyInfo = "DOMWheelEvent::delta-z"+ attrGet _ = getDOMWheelEventDeltaZ+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "webkit-direction-inverted-from-device"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMWheelEventWebkitDirectionInvertedFromDevice :: (MonadIO m, DOMWheelEventK o) => o -> m Bool+getDOMWheelEventWebkitDirectionInvertedFromDevice obj = liftIO $ getObjectPropertyBool obj "webkit-direction-inverted-from-device"++data DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo+instance AttrInfo DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo where+ type AttrAllowedOps DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo = DOMWheelEventK+ type AttrGetType DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo = Bool+ type AttrLabel DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo = "DOMWheelEvent::webkit-direction-inverted-from-device"+ attrGet _ = getDOMWheelEventWebkitDirectionInvertedFromDevice+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "wheel-delta"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMWheelEventWheelDelta :: (MonadIO m, DOMWheelEventK o) => o -> m Int64+getDOMWheelEventWheelDelta obj = liftIO $ getObjectPropertyInt64 obj "wheel-delta"++data DOMWheelEventWheelDeltaPropertyInfo+instance AttrInfo DOMWheelEventWheelDeltaPropertyInfo where+ type AttrAllowedOps DOMWheelEventWheelDeltaPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMWheelEventWheelDeltaPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMWheelEventWheelDeltaPropertyInfo = DOMWheelEventK+ type AttrGetType DOMWheelEventWheelDeltaPropertyInfo = Int64+ type AttrLabel DOMWheelEventWheelDeltaPropertyInfo = "DOMWheelEvent::wheel-delta"+ attrGet _ = getDOMWheelEventWheelDelta+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "wheel-delta-x"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMWheelEventWheelDeltaX :: (MonadIO m, DOMWheelEventK o) => o -> m Int64+getDOMWheelEventWheelDeltaX obj = liftIO $ getObjectPropertyInt64 obj "wheel-delta-x"++data DOMWheelEventWheelDeltaXPropertyInfo+instance AttrInfo DOMWheelEventWheelDeltaXPropertyInfo where+ type AttrAllowedOps DOMWheelEventWheelDeltaXPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMWheelEventWheelDeltaXPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMWheelEventWheelDeltaXPropertyInfo = DOMWheelEventK+ type AttrGetType DOMWheelEventWheelDeltaXPropertyInfo = Int64+ type AttrLabel DOMWheelEventWheelDeltaXPropertyInfo = "DOMWheelEvent::wheel-delta-x"+ attrGet _ = getDOMWheelEventWheelDeltaX+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "wheel-delta-y"+ -- Type: TBasicType TInt64+ -- Flags: [PropertyReadable]++getDOMWheelEventWheelDeltaY :: (MonadIO m, DOMWheelEventK o) => o -> m Int64+getDOMWheelEventWheelDeltaY obj = liftIO $ getObjectPropertyInt64 obj "wheel-delta-y"++data DOMWheelEventWheelDeltaYPropertyInfo+instance AttrInfo DOMWheelEventWheelDeltaYPropertyInfo where+ type AttrAllowedOps DOMWheelEventWheelDeltaYPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMWheelEventWheelDeltaYPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMWheelEventWheelDeltaYPropertyInfo = DOMWheelEventK+ type AttrGetType DOMWheelEventWheelDeltaYPropertyInfo = Int64+ type AttrLabel DOMWheelEventWheelDeltaYPropertyInfo = "DOMWheelEvent::wheel-delta-y"+ attrGet _ = getDOMWheelEventWheelDeltaY+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMWheelEvent = '[ '("alt-key", DOMMouseEventAltKeyPropertyInfo), '("bubbles", DOMEventBubblesPropertyInfo), '("button", DOMMouseEventButtonPropertyInfo), '("cancel-bubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("char-code", DOMUIEventCharCodePropertyInfo), '("client-x", DOMMouseEventClientXPropertyInfo), '("client-y", DOMMouseEventClientYPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("ctrl-key", DOMMouseEventCtrlKeyPropertyInfo), '("current-target", DOMEventCurrentTargetPropertyInfo), '("default-prevented", DOMEventDefaultPreventedPropertyInfo), '("delta-mode", DOMWheelEventDeltaModePropertyInfo), '("delta-x", DOMWheelEventDeltaXPropertyInfo), '("delta-y", DOMWheelEventDeltaYPropertyInfo), '("delta-z", DOMWheelEventDeltaZPropertyInfo), '("detail", DOMUIEventDetailPropertyInfo), '("event-phase", DOMEventEventPhasePropertyInfo), '("from-element", DOMMouseEventFromElementPropertyInfo), '("key-code", DOMUIEventKeyCodePropertyInfo), '("layer-x", DOMUIEventLayerXPropertyInfo), '("layer-y", DOMUIEventLayerYPropertyInfo), '("meta-key", DOMMouseEventMetaKeyPropertyInfo), '("offset-x", DOMMouseEventOffsetXPropertyInfo), '("offset-y", DOMMouseEventOffsetYPropertyInfo), '("page-x", DOMUIEventPageXPropertyInfo), '("page-y", DOMUIEventPageYPropertyInfo), '("related-target", DOMMouseEventRelatedTargetPropertyInfo), '("return-value", DOMEventReturnValuePropertyInfo), '("screen-x", DOMMouseEventScreenXPropertyInfo), '("screen-y", DOMMouseEventScreenYPropertyInfo), '("shift-key", DOMMouseEventShiftKeyPropertyInfo), '("src-element", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("time-stamp", DOMEventTimeStampPropertyInfo), '("to-element", DOMMouseEventToElementPropertyInfo), '("type", DOMEventTypePropertyInfo), '("view", DOMUIEventViewPropertyInfo), '("webkit-direction-inverted-from-device", DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo), '("webkit-movement-x", DOMMouseEventWebkitMovementXPropertyInfo), '("webkit-movement-y", DOMMouseEventWebkitMovementYPropertyInfo), '("wheel-delta", DOMWheelEventWheelDeltaPropertyInfo), '("wheel-delta-x", DOMWheelEventWheelDeltaXPropertyInfo), '("wheel-delta-y", DOMWheelEventWheelDeltaYPropertyInfo), '("which", DOMUIEventWhichPropertyInfo), '("x", DOMMouseEventXPropertyInfo), '("y", DOMMouseEventYPropertyInfo)]++type instance AttributeList DOMXPathExpression = '[ '("core-object", DOMObjectCoreObjectPropertyInfo)]++type instance AttributeList DOMXPathNSResolver = '[ '("core-object", DOMObjectCoreObjectPropertyInfo)]++-- VVV Prop "boolean-value"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMXPathResultBooleanValue :: (MonadIO m, DOMXPathResultK o) => o -> m Bool+getDOMXPathResultBooleanValue obj = liftIO $ getObjectPropertyBool obj "boolean-value"++data DOMXPathResultBooleanValuePropertyInfo+instance AttrInfo DOMXPathResultBooleanValuePropertyInfo where+ type AttrAllowedOps DOMXPathResultBooleanValuePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMXPathResultBooleanValuePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMXPathResultBooleanValuePropertyInfo = DOMXPathResultK+ type AttrGetType DOMXPathResultBooleanValuePropertyInfo = Bool+ type AttrLabel DOMXPathResultBooleanValuePropertyInfo = "DOMXPathResult::boolean-value"+ attrGet _ = getDOMXPathResultBooleanValue+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "invalid-iterator-state"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getDOMXPathResultInvalidIteratorState :: (MonadIO m, DOMXPathResultK o) => o -> m Bool+getDOMXPathResultInvalidIteratorState obj = liftIO $ getObjectPropertyBool obj "invalid-iterator-state"++data DOMXPathResultInvalidIteratorStatePropertyInfo+instance AttrInfo DOMXPathResultInvalidIteratorStatePropertyInfo where+ type AttrAllowedOps DOMXPathResultInvalidIteratorStatePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMXPathResultInvalidIteratorStatePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMXPathResultInvalidIteratorStatePropertyInfo = DOMXPathResultK+ type AttrGetType DOMXPathResultInvalidIteratorStatePropertyInfo = Bool+ type AttrLabel DOMXPathResultInvalidIteratorStatePropertyInfo = "DOMXPathResult::invalid-iterator-state"+ attrGet _ = getDOMXPathResultInvalidIteratorState+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "number-value"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getDOMXPathResultNumberValue :: (MonadIO m, DOMXPathResultK o) => o -> m Double+getDOMXPathResultNumberValue obj = liftIO $ getObjectPropertyDouble obj "number-value"++data DOMXPathResultNumberValuePropertyInfo+instance AttrInfo DOMXPathResultNumberValuePropertyInfo where+ type AttrAllowedOps DOMXPathResultNumberValuePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMXPathResultNumberValuePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMXPathResultNumberValuePropertyInfo = DOMXPathResultK+ type AttrGetType DOMXPathResultNumberValuePropertyInfo = Double+ type AttrLabel DOMXPathResultNumberValuePropertyInfo = "DOMXPathResult::number-value"+ attrGet _ = getDOMXPathResultNumberValue+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "result-type"+ -- Type: TBasicType TUInt32+ -- Flags: [PropertyReadable]++getDOMXPathResultResultType :: (MonadIO m, DOMXPathResultK o) => o -> m Word32+getDOMXPathResultResultType obj = liftIO $ getObjectPropertyCUInt obj "result-type"++data DOMXPathResultResultTypePropertyInfo+instance AttrInfo DOMXPathResultResultTypePropertyInfo where+ type AttrAllowedOps DOMXPathResultResultTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMXPathResultResultTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMXPathResultResultTypePropertyInfo = DOMXPathResultK+ type AttrGetType DOMXPathResultResultTypePropertyInfo = Word32+ type AttrLabel DOMXPathResultResultTypePropertyInfo = "DOMXPathResult::result-type"+ attrGet _ = getDOMXPathResultResultType+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "single-node-value"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable]++getDOMXPathResultSingleNodeValue :: (MonadIO m, DOMXPathResultK o) => o -> m DOMNode+getDOMXPathResultSingleNodeValue obj = liftIO $ getObjectPropertyObject obj "single-node-value" DOMNode++data DOMXPathResultSingleNodeValuePropertyInfo+instance AttrInfo DOMXPathResultSingleNodeValuePropertyInfo where+ type AttrAllowedOps DOMXPathResultSingleNodeValuePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMXPathResultSingleNodeValuePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMXPathResultSingleNodeValuePropertyInfo = DOMXPathResultK+ type AttrGetType DOMXPathResultSingleNodeValuePropertyInfo = DOMNode+ type AttrLabel DOMXPathResultSingleNodeValuePropertyInfo = "DOMXPathResult::single-node-value"+ attrGet _ = getDOMXPathResultSingleNodeValue+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "snapshot-length"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDOMXPathResultSnapshotLength :: (MonadIO m, DOMXPathResultK o) => o -> m Word64+getDOMXPathResultSnapshotLength obj = liftIO $ getObjectPropertyUInt64 obj "snapshot-length"++data DOMXPathResultSnapshotLengthPropertyInfo+instance AttrInfo DOMXPathResultSnapshotLengthPropertyInfo where+ type AttrAllowedOps DOMXPathResultSnapshotLengthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMXPathResultSnapshotLengthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMXPathResultSnapshotLengthPropertyInfo = DOMXPathResultK+ type AttrGetType DOMXPathResultSnapshotLengthPropertyInfo = Word64+ type AttrLabel DOMXPathResultSnapshotLengthPropertyInfo = "DOMXPathResult::snapshot-length"+ attrGet _ = getDOMXPathResultSnapshotLength+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "string-value"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDOMXPathResultStringValue :: (MonadIO m, DOMXPathResultK o) => o -> m T.Text+getDOMXPathResultStringValue obj = liftIO $ getObjectPropertyString obj "string-value"++data DOMXPathResultStringValuePropertyInfo+instance AttrInfo DOMXPathResultStringValuePropertyInfo where+ type AttrAllowedOps DOMXPathResultStringValuePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DOMXPathResultStringValuePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DOMXPathResultStringValuePropertyInfo = DOMXPathResultK+ type AttrGetType DOMXPathResultStringValuePropertyInfo = T.Text+ type AttrLabel DOMXPathResultStringValuePropertyInfo = "DOMXPathResult::string-value"+ attrGet _ = getDOMXPathResultStringValue+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList DOMXPathResult = '[ '("boolean-value", DOMXPathResultBooleanValuePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("invalid-iterator-state", DOMXPathResultInvalidIteratorStatePropertyInfo), '("number-value", DOMXPathResultNumberValuePropertyInfo), '("result-type", DOMXPathResultResultTypePropertyInfo), '("single-node-value", DOMXPathResultSingleNodeValuePropertyInfo), '("snapshot-length", DOMXPathResultSnapshotLengthPropertyInfo), '("string-value", DOMXPathResultStringValuePropertyInfo)]++-- VVV Prop "current-size"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDownloadCurrentSize :: (MonadIO m, DownloadK o) => o -> m Word64+getDownloadCurrentSize obj = liftIO $ getObjectPropertyUInt64 obj "current-size"++data DownloadCurrentSizePropertyInfo+instance AttrInfo DownloadCurrentSizePropertyInfo where+ type AttrAllowedOps DownloadCurrentSizePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DownloadCurrentSizePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DownloadCurrentSizePropertyInfo = DownloadK+ type AttrGetType DownloadCurrentSizePropertyInfo = Word64+ type AttrLabel DownloadCurrentSizePropertyInfo = "Download::current-size"+ attrGet _ = getDownloadCurrentSize+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "destination-uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getDownloadDestinationUri :: (MonadIO m, DownloadK o) => o -> m T.Text+getDownloadDestinationUri obj = liftIO $ getObjectPropertyString obj "destination-uri"++setDownloadDestinationUri :: (MonadIO m, DownloadK o) => o -> T.Text -> m ()+setDownloadDestinationUri obj val = liftIO $ setObjectPropertyString obj "destination-uri" val++constructDownloadDestinationUri :: T.Text -> IO ([Char], GValue)+constructDownloadDestinationUri val = constructObjectPropertyString "destination-uri" val++data DownloadDestinationUriPropertyInfo+instance AttrInfo DownloadDestinationUriPropertyInfo where+ type AttrAllowedOps DownloadDestinationUriPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DownloadDestinationUriPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint DownloadDestinationUriPropertyInfo = DownloadK+ type AttrGetType DownloadDestinationUriPropertyInfo = T.Text+ type AttrLabel DownloadDestinationUriPropertyInfo = "Download::destination-uri"+ attrGet _ = getDownloadDestinationUri+ attrSet _ = setDownloadDestinationUri+ attrConstruct _ = constructDownloadDestinationUri++-- VVV Prop "network-request"+ -- Type: TInterface "WebKit" "NetworkRequest"+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getDownloadNetworkRequest :: (MonadIO m, DownloadK o) => o -> m NetworkRequest+getDownloadNetworkRequest obj = liftIO $ getObjectPropertyObject obj "network-request" NetworkRequest++constructDownloadNetworkRequest :: (NetworkRequestK a) => a -> IO ([Char], GValue)+constructDownloadNetworkRequest val = constructObjectPropertyObject "network-request" val++data DownloadNetworkRequestPropertyInfo+instance AttrInfo DownloadNetworkRequestPropertyInfo where+ type AttrAllowedOps DownloadNetworkRequestPropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DownloadNetworkRequestPropertyInfo = NetworkRequestK+ type AttrBaseTypeConstraint DownloadNetworkRequestPropertyInfo = DownloadK+ type AttrGetType DownloadNetworkRequestPropertyInfo = NetworkRequest+ type AttrLabel DownloadNetworkRequestPropertyInfo = "Download::network-request"+ attrGet _ = getDownloadNetworkRequest+ attrSet _ = undefined+ attrConstruct _ = constructDownloadNetworkRequest++-- VVV Prop "network-response"+ -- Type: TInterface "WebKit" "NetworkResponse"+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getDownloadNetworkResponse :: (MonadIO m, DownloadK o) => o -> m NetworkResponse+getDownloadNetworkResponse obj = liftIO $ getObjectPropertyObject obj "network-response" NetworkResponse++constructDownloadNetworkResponse :: (NetworkResponseK a) => a -> IO ([Char], GValue)+constructDownloadNetworkResponse val = constructObjectPropertyObject "network-response" val++data DownloadNetworkResponsePropertyInfo+instance AttrInfo DownloadNetworkResponsePropertyInfo where+ type AttrAllowedOps DownloadNetworkResponsePropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint DownloadNetworkResponsePropertyInfo = NetworkResponseK+ type AttrBaseTypeConstraint DownloadNetworkResponsePropertyInfo = DownloadK+ type AttrGetType DownloadNetworkResponsePropertyInfo = NetworkResponse+ type AttrLabel DownloadNetworkResponsePropertyInfo = "Download::network-response"+ attrGet _ = getDownloadNetworkResponse+ attrSet _ = undefined+ attrConstruct _ = constructDownloadNetworkResponse++-- VVV Prop "progress"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getDownloadProgress :: (MonadIO m, DownloadK o) => o -> m Double+getDownloadProgress obj = liftIO $ getObjectPropertyDouble obj "progress"++data DownloadProgressPropertyInfo+instance AttrInfo DownloadProgressPropertyInfo where+ type AttrAllowedOps DownloadProgressPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DownloadProgressPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DownloadProgressPropertyInfo = DownloadK+ type AttrGetType DownloadProgressPropertyInfo = Double+ type AttrLabel DownloadProgressPropertyInfo = "Download::progress"+ attrGet _ = getDownloadProgress+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "status"+ -- Type: TInterface "WebKit" "DownloadStatus"+ -- Flags: [PropertyReadable]++getDownloadStatus :: (MonadIO m, DownloadK o) => o -> m DownloadStatus+getDownloadStatus obj = liftIO $ getObjectPropertyEnum obj "status"++data DownloadStatusPropertyInfo+instance AttrInfo DownloadStatusPropertyInfo where+ type AttrAllowedOps DownloadStatusPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DownloadStatusPropertyInfo = (~) ()+ type AttrBaseTypeConstraint DownloadStatusPropertyInfo = DownloadK+ type AttrGetType DownloadStatusPropertyInfo = DownloadStatus+ type AttrLabel DownloadStatusPropertyInfo = "Download::status"+ attrGet _ = getDownloadStatus+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "suggested-filename"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getDownloadSuggestedFilename :: (MonadIO m, DownloadK o) => o -> m T.Text+getDownloadSuggestedFilename obj = liftIO $ getObjectPropertyString obj "suggested-filename"++data DownloadSuggestedFilenamePropertyInfo+instance AttrInfo DownloadSuggestedFilenamePropertyInfo where+ type AttrAllowedOps DownloadSuggestedFilenamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DownloadSuggestedFilenamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DownloadSuggestedFilenamePropertyInfo = DownloadK+ type AttrGetType DownloadSuggestedFilenamePropertyInfo = T.Text+ type AttrLabel DownloadSuggestedFilenamePropertyInfo = "Download::suggested-filename"+ attrGet _ = getDownloadSuggestedFilename+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "total-size"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getDownloadTotalSize :: (MonadIO m, DownloadK o) => o -> m Word64+getDownloadTotalSize obj = liftIO $ getObjectPropertyUInt64 obj "total-size"++data DownloadTotalSizePropertyInfo+instance AttrInfo DownloadTotalSizePropertyInfo where+ type AttrAllowedOps DownloadTotalSizePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint DownloadTotalSizePropertyInfo = (~) ()+ type AttrBaseTypeConstraint DownloadTotalSizePropertyInfo = DownloadK+ type AttrGetType DownloadTotalSizePropertyInfo = Word64+ type AttrLabel DownloadTotalSizePropertyInfo = "Download::total-size"+ attrGet _ = getDownloadTotalSize+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList Download = '[ '("current-size", DownloadCurrentSizePropertyInfo), '("destination-uri", DownloadDestinationUriPropertyInfo), '("network-request", DownloadNetworkRequestPropertyInfo), '("network-response", DownloadNetworkResponsePropertyInfo), '("progress", DownloadProgressPropertyInfo), '("status", DownloadStatusPropertyInfo), '("suggested-filename", DownloadSuggestedFilenamePropertyInfo), '("total-size", DownloadTotalSizePropertyInfo)]++-- VVV Prop "path"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getFaviconDatabasePath :: (MonadIO m, FaviconDatabaseK o) => o -> m T.Text+getFaviconDatabasePath obj = liftIO $ getObjectPropertyString obj "path"++setFaviconDatabasePath :: (MonadIO m, FaviconDatabaseK o) => o -> T.Text -> m ()+setFaviconDatabasePath obj val = liftIO $ setObjectPropertyString obj "path" val++constructFaviconDatabasePath :: T.Text -> IO ([Char], GValue)+constructFaviconDatabasePath val = constructObjectPropertyString "path" val++data FaviconDatabasePathPropertyInfo+instance AttrInfo FaviconDatabasePathPropertyInfo where+ type AttrAllowedOps FaviconDatabasePathPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint FaviconDatabasePathPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint FaviconDatabasePathPropertyInfo = FaviconDatabaseK+ type AttrGetType FaviconDatabasePathPropertyInfo = T.Text+ type AttrLabel FaviconDatabasePathPropertyInfo = "FaviconDatabase::path"+ attrGet _ = getFaviconDatabasePath+ attrSet _ = setFaviconDatabasePath+ attrConstruct _ = constructFaviconDatabasePath++type instance AttributeList FaviconDatabase = '[ '("path", FaviconDatabasePathPropertyInfo)]++-- VVV Prop "filter"+ -- Type: TInterface "Gtk" "FileFilter"+ -- Flags: [PropertyReadable]++getFileChooserRequestFilter :: (MonadIO m, FileChooserRequestK o) => o -> m Gtk.FileFilter+getFileChooserRequestFilter obj = liftIO $ getObjectPropertyObject obj "filter" Gtk.FileFilter++data FileChooserRequestFilterPropertyInfo+instance AttrInfo FileChooserRequestFilterPropertyInfo where+ type AttrAllowedOps FileChooserRequestFilterPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint FileChooserRequestFilterPropertyInfo = (~) ()+ type AttrBaseTypeConstraint FileChooserRequestFilterPropertyInfo = FileChooserRequestK+ type AttrGetType FileChooserRequestFilterPropertyInfo = Gtk.FileFilter+ type AttrLabel FileChooserRequestFilterPropertyInfo = "FileChooserRequest::filter"+ attrGet _ = getFileChooserRequestFilter+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "mime-types"+ -- Type: TCArray True (-1) (-1) (TBasicType TUTF8)+ -- Flags: [PropertyReadable]++getFileChooserRequestMimeTypes :: (MonadIO m, FileChooserRequestK o) => o -> m [T.Text]+getFileChooserRequestMimeTypes obj = liftIO $ getObjectPropertyStringArray obj "mime-types"++data FileChooserRequestMimeTypesPropertyInfo+instance AttrInfo FileChooserRequestMimeTypesPropertyInfo where+ type AttrAllowedOps FileChooserRequestMimeTypesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint FileChooserRequestMimeTypesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint FileChooserRequestMimeTypesPropertyInfo = FileChooserRequestK+ type AttrGetType FileChooserRequestMimeTypesPropertyInfo = [T.Text]+ type AttrLabel FileChooserRequestMimeTypesPropertyInfo = "FileChooserRequest::mime-types"+ attrGet _ = getFileChooserRequestMimeTypes+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "select-multiple"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getFileChooserRequestSelectMultiple :: (MonadIO m, FileChooserRequestK o) => o -> m Bool+getFileChooserRequestSelectMultiple obj = liftIO $ getObjectPropertyBool obj "select-multiple"++data FileChooserRequestSelectMultiplePropertyInfo+instance AttrInfo FileChooserRequestSelectMultiplePropertyInfo where+ type AttrAllowedOps FileChooserRequestSelectMultiplePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint FileChooserRequestSelectMultiplePropertyInfo = (~) ()+ type AttrBaseTypeConstraint FileChooserRequestSelectMultiplePropertyInfo = FileChooserRequestK+ type AttrGetType FileChooserRequestSelectMultiplePropertyInfo = Bool+ type AttrLabel FileChooserRequestSelectMultiplePropertyInfo = "FileChooserRequest::select-multiple"+ attrGet _ = getFileChooserRequestSelectMultiple+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "selected-files"+ -- Type: TCArray True (-1) (-1) (TBasicType TUTF8)+ -- Flags: [PropertyReadable]++getFileChooserRequestSelectedFiles :: (MonadIO m, FileChooserRequestK o) => o -> m [T.Text]+getFileChooserRequestSelectedFiles obj = liftIO $ getObjectPropertyStringArray obj "selected-files"++data FileChooserRequestSelectedFilesPropertyInfo+instance AttrInfo FileChooserRequestSelectedFilesPropertyInfo where+ type AttrAllowedOps FileChooserRequestSelectedFilesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint FileChooserRequestSelectedFilesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint FileChooserRequestSelectedFilesPropertyInfo = FileChooserRequestK+ type AttrGetType FileChooserRequestSelectedFilesPropertyInfo = [T.Text]+ type AttrLabel FileChooserRequestSelectedFilesPropertyInfo = "FileChooserRequest::selected-files"+ attrGet _ = getFileChooserRequestSelectedFiles+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList FileChooserRequest = '[ '("filter", FileChooserRequestFilterPropertyInfo), '("mime-types", FileChooserRequestMimeTypesPropertyInfo), '("select-multiple", FileChooserRequestSelectMultiplePropertyInfo), '("selected-files", FileChooserRequestSelectedFilesPropertyInfo)]++type instance AttributeList GeolocationPolicyDecision = '[ ]++-- VVV Prop "context"+ -- Type: TInterface "WebKit" "HitTestResultContext"+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getHitTestResultContext :: (MonadIO m, HitTestResultK o) => o -> m [HitTestResultContext]+getHitTestResultContext obj = liftIO $ getObjectPropertyFlags obj "context"++constructHitTestResultContext :: [HitTestResultContext] -> IO ([Char], GValue)+constructHitTestResultContext val = constructObjectPropertyFlags "context" val++data HitTestResultContextPropertyInfo+instance AttrInfo HitTestResultContextPropertyInfo where+ type AttrAllowedOps HitTestResultContextPropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint HitTestResultContextPropertyInfo = (~) [HitTestResultContext]+ type AttrBaseTypeConstraint HitTestResultContextPropertyInfo = HitTestResultK+ type AttrGetType HitTestResultContextPropertyInfo = [HitTestResultContext]+ type AttrLabel HitTestResultContextPropertyInfo = "HitTestResult::context"+ attrGet _ = getHitTestResultContext+ attrSet _ = undefined+ attrConstruct _ = constructHitTestResultContext++-- VVV Prop "image-uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getHitTestResultImageUri :: (MonadIO m, HitTestResultK o) => o -> m T.Text+getHitTestResultImageUri obj = liftIO $ getObjectPropertyString obj "image-uri"++constructHitTestResultImageUri :: T.Text -> IO ([Char], GValue)+constructHitTestResultImageUri val = constructObjectPropertyString "image-uri" val++data HitTestResultImageUriPropertyInfo+instance AttrInfo HitTestResultImageUriPropertyInfo where+ type AttrAllowedOps HitTestResultImageUriPropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint HitTestResultImageUriPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint HitTestResultImageUriPropertyInfo = HitTestResultK+ type AttrGetType HitTestResultImageUriPropertyInfo = T.Text+ type AttrLabel HitTestResultImageUriPropertyInfo = "HitTestResult::image-uri"+ attrGet _ = getHitTestResultImageUri+ attrSet _ = undefined+ attrConstruct _ = constructHitTestResultImageUri++-- VVV Prop "inner-node"+ -- Type: TInterface "WebKit" "DOMNode"+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getHitTestResultInnerNode :: (MonadIO m, HitTestResultK o) => o -> m DOMNode+getHitTestResultInnerNode obj = liftIO $ getObjectPropertyObject obj "inner-node" DOMNode++constructHitTestResultInnerNode :: (DOMNodeK a) => a -> IO ([Char], GValue)+constructHitTestResultInnerNode val = constructObjectPropertyObject "inner-node" val++data HitTestResultInnerNodePropertyInfo+instance AttrInfo HitTestResultInnerNodePropertyInfo where+ type AttrAllowedOps HitTestResultInnerNodePropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint HitTestResultInnerNodePropertyInfo = DOMNodeK+ type AttrBaseTypeConstraint HitTestResultInnerNodePropertyInfo = HitTestResultK+ type AttrGetType HitTestResultInnerNodePropertyInfo = DOMNode+ type AttrLabel HitTestResultInnerNodePropertyInfo = "HitTestResult::inner-node"+ attrGet _ = getHitTestResultInnerNode+ attrSet _ = undefined+ attrConstruct _ = constructHitTestResultInnerNode++-- VVV Prop "link-uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getHitTestResultLinkUri :: (MonadIO m, HitTestResultK o) => o -> m T.Text+getHitTestResultLinkUri obj = liftIO $ getObjectPropertyString obj "link-uri"++constructHitTestResultLinkUri :: T.Text -> IO ([Char], GValue)+constructHitTestResultLinkUri val = constructObjectPropertyString "link-uri" val++data HitTestResultLinkUriPropertyInfo+instance AttrInfo HitTestResultLinkUriPropertyInfo where+ type AttrAllowedOps HitTestResultLinkUriPropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint HitTestResultLinkUriPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint HitTestResultLinkUriPropertyInfo = HitTestResultK+ type AttrGetType HitTestResultLinkUriPropertyInfo = T.Text+ type AttrLabel HitTestResultLinkUriPropertyInfo = "HitTestResult::link-uri"+ attrGet _ = getHitTestResultLinkUri+ attrSet _ = undefined+ attrConstruct _ = constructHitTestResultLinkUri++-- VVV Prop "media-uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getHitTestResultMediaUri :: (MonadIO m, HitTestResultK o) => o -> m T.Text+getHitTestResultMediaUri obj = liftIO $ getObjectPropertyString obj "media-uri"++constructHitTestResultMediaUri :: T.Text -> IO ([Char], GValue)+constructHitTestResultMediaUri val = constructObjectPropertyString "media-uri" val++data HitTestResultMediaUriPropertyInfo+instance AttrInfo HitTestResultMediaUriPropertyInfo where+ type AttrAllowedOps HitTestResultMediaUriPropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint HitTestResultMediaUriPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint HitTestResultMediaUriPropertyInfo = HitTestResultK+ type AttrGetType HitTestResultMediaUriPropertyInfo = T.Text+ type AttrLabel HitTestResultMediaUriPropertyInfo = "HitTestResult::media-uri"+ attrGet _ = getHitTestResultMediaUri+ attrSet _ = undefined+ attrConstruct _ = constructHitTestResultMediaUri++-- VVV Prop "x"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getHitTestResultX :: (MonadIO m, HitTestResultK o) => o -> m Int32+getHitTestResultX obj = liftIO $ getObjectPropertyCInt obj "x"++constructHitTestResultX :: Int32 -> IO ([Char], GValue)+constructHitTestResultX val = constructObjectPropertyCInt "x" val++data HitTestResultXPropertyInfo+instance AttrInfo HitTestResultXPropertyInfo where+ type AttrAllowedOps HitTestResultXPropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint HitTestResultXPropertyInfo = (~) Int32+ type AttrBaseTypeConstraint HitTestResultXPropertyInfo = HitTestResultK+ type AttrGetType HitTestResultXPropertyInfo = Int32+ type AttrLabel HitTestResultXPropertyInfo = "HitTestResult::x"+ attrGet _ = getHitTestResultX+ attrSet _ = undefined+ attrConstruct _ = constructHitTestResultX++-- VVV Prop "y"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getHitTestResultY :: (MonadIO m, HitTestResultK o) => o -> m Int32+getHitTestResultY obj = liftIO $ getObjectPropertyCInt obj "y"++constructHitTestResultY :: Int32 -> IO ([Char], GValue)+constructHitTestResultY val = constructObjectPropertyCInt "y" val++data HitTestResultYPropertyInfo+instance AttrInfo HitTestResultYPropertyInfo where+ type AttrAllowedOps HitTestResultYPropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint HitTestResultYPropertyInfo = (~) Int32+ type AttrBaseTypeConstraint HitTestResultYPropertyInfo = HitTestResultK+ type AttrGetType HitTestResultYPropertyInfo = Int32+ type AttrLabel HitTestResultYPropertyInfo = "HitTestResult::y"+ attrGet _ = getHitTestResultY+ attrSet _ = undefined+ attrConstruct _ = constructHitTestResultY++type instance AttributeList HitTestResult = '[ '("context", HitTestResultContextPropertyInfo), '("image-uri", HitTestResultImageUriPropertyInfo), '("inner-node", HitTestResultInnerNodePropertyInfo), '("link-uri", HitTestResultLinkUriPropertyInfo), '("media-uri", HitTestResultMediaUriPropertyInfo), '("x", HitTestResultXPropertyInfo), '("y", HitTestResultYPropertyInfo)]++-- VVV Prop "path"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getIconDatabasePath :: (MonadIO m, IconDatabaseK o) => o -> m T.Text+getIconDatabasePath obj = liftIO $ getObjectPropertyString obj "path"++setIconDatabasePath :: (MonadIO m, IconDatabaseK o) => o -> T.Text -> m ()+setIconDatabasePath obj val = liftIO $ setObjectPropertyString obj "path" val++constructIconDatabasePath :: T.Text -> IO ([Char], GValue)+constructIconDatabasePath val = constructObjectPropertyString "path" val++data IconDatabasePathPropertyInfo+instance AttrInfo IconDatabasePathPropertyInfo where+ type AttrAllowedOps IconDatabasePathPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint IconDatabasePathPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint IconDatabasePathPropertyInfo = IconDatabaseK+ type AttrGetType IconDatabasePathPropertyInfo = T.Text+ type AttrLabel IconDatabasePathPropertyInfo = "IconDatabase::path"+ attrGet _ = getIconDatabasePath+ attrSet _ = setIconDatabasePath+ attrConstruct _ = constructIconDatabasePath++type instance AttributeList IconDatabase = '[ '("path", IconDatabasePathPropertyInfo)]++-- VVV Prop "message"+ -- Type: TInterface "Soup" "Message"+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getNetworkRequestMessage :: (MonadIO m, NetworkRequestK o) => o -> m Soup.Message+getNetworkRequestMessage obj = liftIO $ getObjectPropertyObject obj "message" Soup.Message++constructNetworkRequestMessage :: (Soup.MessageK a) => a -> IO ([Char], GValue)+constructNetworkRequestMessage val = constructObjectPropertyObject "message" val++data NetworkRequestMessagePropertyInfo+instance AttrInfo NetworkRequestMessagePropertyInfo where+ type AttrAllowedOps NetworkRequestMessagePropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint NetworkRequestMessagePropertyInfo = Soup.MessageK+ type AttrBaseTypeConstraint NetworkRequestMessagePropertyInfo = NetworkRequestK+ type AttrGetType NetworkRequestMessagePropertyInfo = Soup.Message+ type AttrLabel NetworkRequestMessagePropertyInfo = "NetworkRequest::message"+ attrGet _ = getNetworkRequestMessage+ attrSet _ = undefined+ attrConstruct _ = constructNetworkRequestMessage++-- VVV Prop "uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getNetworkRequestUri :: (MonadIO m, NetworkRequestK o) => o -> m T.Text+getNetworkRequestUri obj = liftIO $ getObjectPropertyString obj "uri"++setNetworkRequestUri :: (MonadIO m, NetworkRequestK o) => o -> T.Text -> m ()+setNetworkRequestUri obj val = liftIO $ setObjectPropertyString obj "uri" val++constructNetworkRequestUri :: T.Text -> IO ([Char], GValue)+constructNetworkRequestUri val = constructObjectPropertyString "uri" val++data NetworkRequestUriPropertyInfo+instance AttrInfo NetworkRequestUriPropertyInfo where+ type AttrAllowedOps NetworkRequestUriPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint NetworkRequestUriPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint NetworkRequestUriPropertyInfo = NetworkRequestK+ type AttrGetType NetworkRequestUriPropertyInfo = T.Text+ type AttrLabel NetworkRequestUriPropertyInfo = "NetworkRequest::uri"+ attrGet _ = getNetworkRequestUri+ attrSet _ = setNetworkRequestUri+ attrConstruct _ = constructNetworkRequestUri++type instance AttributeList NetworkRequest = '[ '("message", NetworkRequestMessagePropertyInfo), '("uri", NetworkRequestUriPropertyInfo)]++-- VVV Prop "message"+ -- Type: TInterface "Soup" "Message"+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getNetworkResponseMessage :: (MonadIO m, NetworkResponseK o) => o -> m Soup.Message+getNetworkResponseMessage obj = liftIO $ getObjectPropertyObject obj "message" Soup.Message++constructNetworkResponseMessage :: (Soup.MessageK a) => a -> IO ([Char], GValue)+constructNetworkResponseMessage val = constructObjectPropertyObject "message" val++data NetworkResponseMessagePropertyInfo+instance AttrInfo NetworkResponseMessagePropertyInfo where+ type AttrAllowedOps NetworkResponseMessagePropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint NetworkResponseMessagePropertyInfo = Soup.MessageK+ type AttrBaseTypeConstraint NetworkResponseMessagePropertyInfo = NetworkResponseK+ type AttrGetType NetworkResponseMessagePropertyInfo = Soup.Message+ type AttrLabel NetworkResponseMessagePropertyInfo = "NetworkResponse::message"+ attrGet _ = getNetworkResponseMessage+ attrSet _ = undefined+ attrConstruct _ = constructNetworkResponseMessage++-- VVV Prop "suggested-filename"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getNetworkResponseSuggestedFilename :: (MonadIO m, NetworkResponseK o) => o -> m T.Text+getNetworkResponseSuggestedFilename obj = liftIO $ getObjectPropertyString obj "suggested-filename"++data NetworkResponseSuggestedFilenamePropertyInfo+instance AttrInfo NetworkResponseSuggestedFilenamePropertyInfo where+ type AttrAllowedOps NetworkResponseSuggestedFilenamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint NetworkResponseSuggestedFilenamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint NetworkResponseSuggestedFilenamePropertyInfo = NetworkResponseK+ type AttrGetType NetworkResponseSuggestedFilenamePropertyInfo = T.Text+ type AttrLabel NetworkResponseSuggestedFilenamePropertyInfo = "NetworkResponse::suggested-filename"+ attrGet _ = getNetworkResponseSuggestedFilename+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getNetworkResponseUri :: (MonadIO m, NetworkResponseK o) => o -> m T.Text+getNetworkResponseUri obj = liftIO $ getObjectPropertyString obj "uri"++setNetworkResponseUri :: (MonadIO m, NetworkResponseK o) => o -> T.Text -> m ()+setNetworkResponseUri obj val = liftIO $ setObjectPropertyString obj "uri" val++constructNetworkResponseUri :: T.Text -> IO ([Char], GValue)+constructNetworkResponseUri val = constructObjectPropertyString "uri" val++data NetworkResponseUriPropertyInfo+instance AttrInfo NetworkResponseUriPropertyInfo where+ type AttrAllowedOps NetworkResponseUriPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint NetworkResponseUriPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint NetworkResponseUriPropertyInfo = NetworkResponseK+ type AttrGetType NetworkResponseUriPropertyInfo = T.Text+ type AttrLabel NetworkResponseUriPropertyInfo = "NetworkResponse::uri"+ attrGet _ = getNetworkResponseUri+ attrSet _ = setNetworkResponseUri+ attrConstruct _ = constructNetworkResponseUri++type instance AttributeList NetworkResponse = '[ '("message", NetworkResponseMessagePropertyInfo), '("suggested-filename", NetworkResponseSuggestedFilenamePropertyInfo), '("uri", NetworkResponseUriPropertyInfo)]++-- VVV Prop "host"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getSecurityOriginHost :: (MonadIO m, SecurityOriginK o) => o -> m T.Text+getSecurityOriginHost obj = liftIO $ getObjectPropertyString obj "host"++data SecurityOriginHostPropertyInfo+instance AttrInfo SecurityOriginHostPropertyInfo where+ type AttrAllowedOps SecurityOriginHostPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint SecurityOriginHostPropertyInfo = (~) ()+ type AttrBaseTypeConstraint SecurityOriginHostPropertyInfo = SecurityOriginK+ type AttrGetType SecurityOriginHostPropertyInfo = T.Text+ type AttrLabel SecurityOriginHostPropertyInfo = "SecurityOrigin::host"+ attrGet _ = getSecurityOriginHost+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "port"+ -- Type: TBasicType TUInt32+ -- Flags: [PropertyReadable]++getSecurityOriginPort :: (MonadIO m, SecurityOriginK o) => o -> m Word32+getSecurityOriginPort obj = liftIO $ getObjectPropertyCUInt obj "port"++data SecurityOriginPortPropertyInfo+instance AttrInfo SecurityOriginPortPropertyInfo where+ type AttrAllowedOps SecurityOriginPortPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint SecurityOriginPortPropertyInfo = (~) ()+ type AttrBaseTypeConstraint SecurityOriginPortPropertyInfo = SecurityOriginK+ type AttrGetType SecurityOriginPortPropertyInfo = Word32+ type AttrLabel SecurityOriginPortPropertyInfo = "SecurityOrigin::port"+ attrGet _ = getSecurityOriginPort+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "protocol"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getSecurityOriginProtocol :: (MonadIO m, SecurityOriginK o) => o -> m T.Text+getSecurityOriginProtocol obj = liftIO $ getObjectPropertyString obj "protocol"++data SecurityOriginProtocolPropertyInfo+instance AttrInfo SecurityOriginProtocolPropertyInfo where+ type AttrAllowedOps SecurityOriginProtocolPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint SecurityOriginProtocolPropertyInfo = (~) ()+ type AttrBaseTypeConstraint SecurityOriginProtocolPropertyInfo = SecurityOriginK+ type AttrGetType SecurityOriginProtocolPropertyInfo = T.Text+ type AttrLabel SecurityOriginProtocolPropertyInfo = "SecurityOrigin::protocol"+ attrGet _ = getSecurityOriginProtocol+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "web-database-quota"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable,PropertyWritable]++getSecurityOriginWebDatabaseQuota :: (MonadIO m, SecurityOriginK o) => o -> m Word64+getSecurityOriginWebDatabaseQuota obj = liftIO $ getObjectPropertyUInt64 obj "web-database-quota"++setSecurityOriginWebDatabaseQuota :: (MonadIO m, SecurityOriginK o) => o -> Word64 -> m ()+setSecurityOriginWebDatabaseQuota obj val = liftIO $ setObjectPropertyUInt64 obj "web-database-quota" val++constructSecurityOriginWebDatabaseQuota :: Word64 -> IO ([Char], GValue)+constructSecurityOriginWebDatabaseQuota val = constructObjectPropertyUInt64 "web-database-quota" val++data SecurityOriginWebDatabaseQuotaPropertyInfo+instance AttrInfo SecurityOriginWebDatabaseQuotaPropertyInfo where+ type AttrAllowedOps SecurityOriginWebDatabaseQuotaPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint SecurityOriginWebDatabaseQuotaPropertyInfo = (~) Word64+ type AttrBaseTypeConstraint SecurityOriginWebDatabaseQuotaPropertyInfo = SecurityOriginK+ type AttrGetType SecurityOriginWebDatabaseQuotaPropertyInfo = Word64+ type AttrLabel SecurityOriginWebDatabaseQuotaPropertyInfo = "SecurityOrigin::web-database-quota"+ attrGet _ = getSecurityOriginWebDatabaseQuota+ attrSet _ = setSecurityOriginWebDatabaseQuota+ attrConstruct _ = constructSecurityOriginWebDatabaseQuota++-- VVV Prop "web-database-usage"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getSecurityOriginWebDatabaseUsage :: (MonadIO m, SecurityOriginK o) => o -> m Word64+getSecurityOriginWebDatabaseUsage obj = liftIO $ getObjectPropertyUInt64 obj "web-database-usage"++data SecurityOriginWebDatabaseUsagePropertyInfo+instance AttrInfo SecurityOriginWebDatabaseUsagePropertyInfo where+ type AttrAllowedOps SecurityOriginWebDatabaseUsagePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint SecurityOriginWebDatabaseUsagePropertyInfo = (~) ()+ type AttrBaseTypeConstraint SecurityOriginWebDatabaseUsagePropertyInfo = SecurityOriginK+ type AttrGetType SecurityOriginWebDatabaseUsagePropertyInfo = Word64+ type AttrLabel SecurityOriginWebDatabaseUsagePropertyInfo = "SecurityOrigin::web-database-usage"+ attrGet _ = getSecurityOriginWebDatabaseUsage+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList SecurityOrigin = '[ '("host", SecurityOriginHostPropertyInfo), '("port", SecurityOriginPortPropertyInfo), '("protocol", SecurityOriginProtocolPropertyInfo), '("web-database-quota", SecurityOriginWebDatabaseQuotaPropertyInfo), '("web-database-usage", SecurityOriginWebDatabaseUsagePropertyInfo)]++type instance AttributeList SoupAuthDialog = '[ ]++type instance AttributeList SpellChecker = '[ ]++-- VVV Prop "available-height"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable]++getViewportAttributesAvailableHeight :: (MonadIO m, ViewportAttributesK o) => o -> m Int32+getViewportAttributesAvailableHeight obj = liftIO $ getObjectPropertyCInt obj "available-height"++setViewportAttributesAvailableHeight :: (MonadIO m, ViewportAttributesK o) => o -> Int32 -> m ()+setViewportAttributesAvailableHeight obj val = liftIO $ setObjectPropertyCInt obj "available-height" val++constructViewportAttributesAvailableHeight :: Int32 -> IO ([Char], GValue)+constructViewportAttributesAvailableHeight val = constructObjectPropertyCInt "available-height" val++data ViewportAttributesAvailableHeightPropertyInfo+instance AttrInfo ViewportAttributesAvailableHeightPropertyInfo where+ type AttrAllowedOps ViewportAttributesAvailableHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint ViewportAttributesAvailableHeightPropertyInfo = (~) Int32+ type AttrBaseTypeConstraint ViewportAttributesAvailableHeightPropertyInfo = ViewportAttributesK+ type AttrGetType ViewportAttributesAvailableHeightPropertyInfo = Int32+ type AttrLabel ViewportAttributesAvailableHeightPropertyInfo = "ViewportAttributes::available-height"+ attrGet _ = getViewportAttributesAvailableHeight+ attrSet _ = setViewportAttributesAvailableHeight+ attrConstruct _ = constructViewportAttributesAvailableHeight++-- VVV Prop "available-width"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable]++getViewportAttributesAvailableWidth :: (MonadIO m, ViewportAttributesK o) => o -> m Int32+getViewportAttributesAvailableWidth obj = liftIO $ getObjectPropertyCInt obj "available-width"++setViewportAttributesAvailableWidth :: (MonadIO m, ViewportAttributesK o) => o -> Int32 -> m ()+setViewportAttributesAvailableWidth obj val = liftIO $ setObjectPropertyCInt obj "available-width" val++constructViewportAttributesAvailableWidth :: Int32 -> IO ([Char], GValue)+constructViewportAttributesAvailableWidth val = constructObjectPropertyCInt "available-width" val++data ViewportAttributesAvailableWidthPropertyInfo+instance AttrInfo ViewportAttributesAvailableWidthPropertyInfo where+ type AttrAllowedOps ViewportAttributesAvailableWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint ViewportAttributesAvailableWidthPropertyInfo = (~) Int32+ type AttrBaseTypeConstraint ViewportAttributesAvailableWidthPropertyInfo = ViewportAttributesK+ type AttrGetType ViewportAttributesAvailableWidthPropertyInfo = Int32+ type AttrLabel ViewportAttributesAvailableWidthPropertyInfo = "ViewportAttributes::available-width"+ attrGet _ = getViewportAttributesAvailableWidth+ attrSet _ = setViewportAttributesAvailableWidth+ attrConstruct _ = constructViewportAttributesAvailableWidth++-- VVV Prop "desktop-width"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable]++getViewportAttributesDesktopWidth :: (MonadIO m, ViewportAttributesK o) => o -> m Int32+getViewportAttributesDesktopWidth obj = liftIO $ getObjectPropertyCInt obj "desktop-width"++setViewportAttributesDesktopWidth :: (MonadIO m, ViewportAttributesK o) => o -> Int32 -> m ()+setViewportAttributesDesktopWidth obj val = liftIO $ setObjectPropertyCInt obj "desktop-width" val++constructViewportAttributesDesktopWidth :: Int32 -> IO ([Char], GValue)+constructViewportAttributesDesktopWidth val = constructObjectPropertyCInt "desktop-width" val++data ViewportAttributesDesktopWidthPropertyInfo+instance AttrInfo ViewportAttributesDesktopWidthPropertyInfo where+ type AttrAllowedOps ViewportAttributesDesktopWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint ViewportAttributesDesktopWidthPropertyInfo = (~) Int32+ type AttrBaseTypeConstraint ViewportAttributesDesktopWidthPropertyInfo = ViewportAttributesK+ type AttrGetType ViewportAttributesDesktopWidthPropertyInfo = Int32+ type AttrLabel ViewportAttributesDesktopWidthPropertyInfo = "ViewportAttributes::desktop-width"+ attrGet _ = getViewportAttributesDesktopWidth+ attrSet _ = setViewportAttributesDesktopWidth+ attrConstruct _ = constructViewportAttributesDesktopWidth++-- VVV Prop "device-dpi"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable]++getViewportAttributesDeviceDpi :: (MonadIO m, ViewportAttributesK o) => o -> m Int32+getViewportAttributesDeviceDpi obj = liftIO $ getObjectPropertyCInt obj "device-dpi"++setViewportAttributesDeviceDpi :: (MonadIO m, ViewportAttributesK o) => o -> Int32 -> m ()+setViewportAttributesDeviceDpi obj val = liftIO $ setObjectPropertyCInt obj "device-dpi" val++constructViewportAttributesDeviceDpi :: Int32 -> IO ([Char], GValue)+constructViewportAttributesDeviceDpi val = constructObjectPropertyCInt "device-dpi" val++data ViewportAttributesDeviceDpiPropertyInfo+instance AttrInfo ViewportAttributesDeviceDpiPropertyInfo where+ type AttrAllowedOps ViewportAttributesDeviceDpiPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint ViewportAttributesDeviceDpiPropertyInfo = (~) Int32+ type AttrBaseTypeConstraint ViewportAttributesDeviceDpiPropertyInfo = ViewportAttributesK+ type AttrGetType ViewportAttributesDeviceDpiPropertyInfo = Int32+ type AttrLabel ViewportAttributesDeviceDpiPropertyInfo = "ViewportAttributes::device-dpi"+ attrGet _ = getViewportAttributesDeviceDpi+ attrSet _ = setViewportAttributesDeviceDpi+ attrConstruct _ = constructViewportAttributesDeviceDpi++-- VVV Prop "device-height"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable]++getViewportAttributesDeviceHeight :: (MonadIO m, ViewportAttributesK o) => o -> m Int32+getViewportAttributesDeviceHeight obj = liftIO $ getObjectPropertyCInt obj "device-height"++setViewportAttributesDeviceHeight :: (MonadIO m, ViewportAttributesK o) => o -> Int32 -> m ()+setViewportAttributesDeviceHeight obj val = liftIO $ setObjectPropertyCInt obj "device-height" val++constructViewportAttributesDeviceHeight :: Int32 -> IO ([Char], GValue)+constructViewportAttributesDeviceHeight val = constructObjectPropertyCInt "device-height" val++data ViewportAttributesDeviceHeightPropertyInfo+instance AttrInfo ViewportAttributesDeviceHeightPropertyInfo where+ type AttrAllowedOps ViewportAttributesDeviceHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint ViewportAttributesDeviceHeightPropertyInfo = (~) Int32+ type AttrBaseTypeConstraint ViewportAttributesDeviceHeightPropertyInfo = ViewportAttributesK+ type AttrGetType ViewportAttributesDeviceHeightPropertyInfo = Int32+ type AttrLabel ViewportAttributesDeviceHeightPropertyInfo = "ViewportAttributes::device-height"+ attrGet _ = getViewportAttributesDeviceHeight+ attrSet _ = setViewportAttributesDeviceHeight+ attrConstruct _ = constructViewportAttributesDeviceHeight++-- VVV Prop "device-pixel-ratio"+ -- Type: TBasicType TFloat+ -- Flags: [PropertyReadable]++getViewportAttributesDevicePixelRatio :: (MonadIO m, ViewportAttributesK o) => o -> m Float+getViewportAttributesDevicePixelRatio obj = liftIO $ getObjectPropertyFloat obj "device-pixel-ratio"++data ViewportAttributesDevicePixelRatioPropertyInfo+instance AttrInfo ViewportAttributesDevicePixelRatioPropertyInfo where+ type AttrAllowedOps ViewportAttributesDevicePixelRatioPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint ViewportAttributesDevicePixelRatioPropertyInfo = (~) ()+ type AttrBaseTypeConstraint ViewportAttributesDevicePixelRatioPropertyInfo = ViewportAttributesK+ type AttrGetType ViewportAttributesDevicePixelRatioPropertyInfo = Float+ type AttrLabel ViewportAttributesDevicePixelRatioPropertyInfo = "ViewportAttributes::device-pixel-ratio"+ attrGet _ = getViewportAttributesDevicePixelRatio+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "device-width"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable]++getViewportAttributesDeviceWidth :: (MonadIO m, ViewportAttributesK o) => o -> m Int32+getViewportAttributesDeviceWidth obj = liftIO $ getObjectPropertyCInt obj "device-width"++setViewportAttributesDeviceWidth :: (MonadIO m, ViewportAttributesK o) => o -> Int32 -> m ()+setViewportAttributesDeviceWidth obj val = liftIO $ setObjectPropertyCInt obj "device-width" val++constructViewportAttributesDeviceWidth :: Int32 -> IO ([Char], GValue)+constructViewportAttributesDeviceWidth val = constructObjectPropertyCInt "device-width" val++data ViewportAttributesDeviceWidthPropertyInfo+instance AttrInfo ViewportAttributesDeviceWidthPropertyInfo where+ type AttrAllowedOps ViewportAttributesDeviceWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint ViewportAttributesDeviceWidthPropertyInfo = (~) Int32+ type AttrBaseTypeConstraint ViewportAttributesDeviceWidthPropertyInfo = ViewportAttributesK+ type AttrGetType ViewportAttributesDeviceWidthPropertyInfo = Int32+ type AttrLabel ViewportAttributesDeviceWidthPropertyInfo = "ViewportAttributes::device-width"+ attrGet _ = getViewportAttributesDeviceWidth+ attrSet _ = setViewportAttributesDeviceWidth+ attrConstruct _ = constructViewportAttributesDeviceWidth++-- VVV Prop "height"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable]++getViewportAttributesHeight :: (MonadIO m, ViewportAttributesK o) => o -> m Int32+getViewportAttributesHeight obj = liftIO $ getObjectPropertyCInt obj "height"++data ViewportAttributesHeightPropertyInfo+instance AttrInfo ViewportAttributesHeightPropertyInfo where+ type AttrAllowedOps ViewportAttributesHeightPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint ViewportAttributesHeightPropertyInfo = (~) ()+ type AttrBaseTypeConstraint ViewportAttributesHeightPropertyInfo = ViewportAttributesK+ type AttrGetType ViewportAttributesHeightPropertyInfo = Int32+ type AttrLabel ViewportAttributesHeightPropertyInfo = "ViewportAttributes::height"+ attrGet _ = getViewportAttributesHeight+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "initial-scale-factor"+ -- Type: TBasicType TFloat+ -- Flags: [PropertyReadable]++getViewportAttributesInitialScaleFactor :: (MonadIO m, ViewportAttributesK o) => o -> m Float+getViewportAttributesInitialScaleFactor obj = liftIO $ getObjectPropertyFloat obj "initial-scale-factor"++data ViewportAttributesInitialScaleFactorPropertyInfo+instance AttrInfo ViewportAttributesInitialScaleFactorPropertyInfo where+ type AttrAllowedOps ViewportAttributesInitialScaleFactorPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint ViewportAttributesInitialScaleFactorPropertyInfo = (~) ()+ type AttrBaseTypeConstraint ViewportAttributesInitialScaleFactorPropertyInfo = ViewportAttributesK+ type AttrGetType ViewportAttributesInitialScaleFactorPropertyInfo = Float+ type AttrLabel ViewportAttributesInitialScaleFactorPropertyInfo = "ViewportAttributes::initial-scale-factor"+ attrGet _ = getViewportAttributesInitialScaleFactor+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "maximum-scale-factor"+ -- Type: TBasicType TFloat+ -- Flags: [PropertyReadable]++getViewportAttributesMaximumScaleFactor :: (MonadIO m, ViewportAttributesK o) => o -> m Float+getViewportAttributesMaximumScaleFactor obj = liftIO $ getObjectPropertyFloat obj "maximum-scale-factor"++data ViewportAttributesMaximumScaleFactorPropertyInfo+instance AttrInfo ViewportAttributesMaximumScaleFactorPropertyInfo where+ type AttrAllowedOps ViewportAttributesMaximumScaleFactorPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint ViewportAttributesMaximumScaleFactorPropertyInfo = (~) ()+ type AttrBaseTypeConstraint ViewportAttributesMaximumScaleFactorPropertyInfo = ViewportAttributesK+ type AttrGetType ViewportAttributesMaximumScaleFactorPropertyInfo = Float+ type AttrLabel ViewportAttributesMaximumScaleFactorPropertyInfo = "ViewportAttributes::maximum-scale-factor"+ attrGet _ = getViewportAttributesMaximumScaleFactor+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "minimum-scale-factor"+ -- Type: TBasicType TFloat+ -- Flags: [PropertyReadable]++getViewportAttributesMinimumScaleFactor :: (MonadIO m, ViewportAttributesK o) => o -> m Float+getViewportAttributesMinimumScaleFactor obj = liftIO $ getObjectPropertyFloat obj "minimum-scale-factor"++data ViewportAttributesMinimumScaleFactorPropertyInfo+instance AttrInfo ViewportAttributesMinimumScaleFactorPropertyInfo where+ type AttrAllowedOps ViewportAttributesMinimumScaleFactorPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint ViewportAttributesMinimumScaleFactorPropertyInfo = (~) ()+ type AttrBaseTypeConstraint ViewportAttributesMinimumScaleFactorPropertyInfo = ViewportAttributesK+ type AttrGetType ViewportAttributesMinimumScaleFactorPropertyInfo = Float+ type AttrLabel ViewportAttributesMinimumScaleFactorPropertyInfo = "ViewportAttributes::minimum-scale-factor"+ attrGet _ = getViewportAttributesMinimumScaleFactor+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "user-scalable"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getViewportAttributesUserScalable :: (MonadIO m, ViewportAttributesK o) => o -> m Bool+getViewportAttributesUserScalable obj = liftIO $ getObjectPropertyBool obj "user-scalable"++data ViewportAttributesUserScalablePropertyInfo+instance AttrInfo ViewportAttributesUserScalablePropertyInfo where+ type AttrAllowedOps ViewportAttributesUserScalablePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint ViewportAttributesUserScalablePropertyInfo = (~) ()+ type AttrBaseTypeConstraint ViewportAttributesUserScalablePropertyInfo = ViewportAttributesK+ type AttrGetType ViewportAttributesUserScalablePropertyInfo = Bool+ type AttrLabel ViewportAttributesUserScalablePropertyInfo = "ViewportAttributes::user-scalable"+ attrGet _ = getViewportAttributesUserScalable+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "valid"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable]++getViewportAttributesValid :: (MonadIO m, ViewportAttributesK o) => o -> m Bool+getViewportAttributesValid obj = liftIO $ getObjectPropertyBool obj "valid"++data ViewportAttributesValidPropertyInfo+instance AttrInfo ViewportAttributesValidPropertyInfo where+ type AttrAllowedOps ViewportAttributesValidPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint ViewportAttributesValidPropertyInfo = (~) ()+ type AttrBaseTypeConstraint ViewportAttributesValidPropertyInfo = ViewportAttributesK+ type AttrGetType ViewportAttributesValidPropertyInfo = Bool+ type AttrLabel ViewportAttributesValidPropertyInfo = "ViewportAttributes::valid"+ attrGet _ = getViewportAttributesValid+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "width"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable]++getViewportAttributesWidth :: (MonadIO m, ViewportAttributesK o) => o -> m Int32+getViewportAttributesWidth obj = liftIO $ getObjectPropertyCInt obj "width"++data ViewportAttributesWidthPropertyInfo+instance AttrInfo ViewportAttributesWidthPropertyInfo where+ type AttrAllowedOps ViewportAttributesWidthPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint ViewportAttributesWidthPropertyInfo = (~) ()+ type AttrBaseTypeConstraint ViewportAttributesWidthPropertyInfo = ViewportAttributesK+ type AttrGetType ViewportAttributesWidthPropertyInfo = Int32+ type AttrLabel ViewportAttributesWidthPropertyInfo = "ViewportAttributes::width"+ attrGet _ = getViewportAttributesWidth+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList ViewportAttributes = '[ '("available-height", ViewportAttributesAvailableHeightPropertyInfo), '("available-width", ViewportAttributesAvailableWidthPropertyInfo), '("desktop-width", ViewportAttributesDesktopWidthPropertyInfo), '("device-dpi", ViewportAttributesDeviceDpiPropertyInfo), '("device-height", ViewportAttributesDeviceHeightPropertyInfo), '("device-pixel-ratio", ViewportAttributesDevicePixelRatioPropertyInfo), '("device-width", ViewportAttributesDeviceWidthPropertyInfo), '("height", ViewportAttributesHeightPropertyInfo), '("initial-scale-factor", ViewportAttributesInitialScaleFactorPropertyInfo), '("maximum-scale-factor", ViewportAttributesMaximumScaleFactorPropertyInfo), '("minimum-scale-factor", ViewportAttributesMinimumScaleFactorPropertyInfo), '("user-scalable", ViewportAttributesUserScalablePropertyInfo), '("valid", ViewportAttributesValidPropertyInfo), '("width", ViewportAttributesWidthPropertyInfo)]++type instance AttributeList WebBackForwardList = '[ ]++type instance AttributeList WebDataSource = '[ ]++-- VVV Prop "display-name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getWebDatabaseDisplayName :: (MonadIO m, WebDatabaseK o) => o -> m T.Text+getWebDatabaseDisplayName obj = liftIO $ getObjectPropertyString obj "display-name"++data WebDatabaseDisplayNamePropertyInfo+instance AttrInfo WebDatabaseDisplayNamePropertyInfo where+ type AttrAllowedOps WebDatabaseDisplayNamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebDatabaseDisplayNamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebDatabaseDisplayNamePropertyInfo = WebDatabaseK+ type AttrGetType WebDatabaseDisplayNamePropertyInfo = T.Text+ type AttrLabel WebDatabaseDisplayNamePropertyInfo = "WebDatabase::display-name"+ attrGet _ = getWebDatabaseDisplayName+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "expected-size"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getWebDatabaseExpectedSize :: (MonadIO m, WebDatabaseK o) => o -> m Word64+getWebDatabaseExpectedSize obj = liftIO $ getObjectPropertyUInt64 obj "expected-size"++data WebDatabaseExpectedSizePropertyInfo+instance AttrInfo WebDatabaseExpectedSizePropertyInfo where+ type AttrAllowedOps WebDatabaseExpectedSizePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebDatabaseExpectedSizePropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebDatabaseExpectedSizePropertyInfo = WebDatabaseK+ type AttrGetType WebDatabaseExpectedSizePropertyInfo = Word64+ type AttrLabel WebDatabaseExpectedSizePropertyInfo = "WebDatabase::expected-size"+ attrGet _ = getWebDatabaseExpectedSize+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "filename"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getWebDatabaseFilename :: (MonadIO m, WebDatabaseK o) => o -> m T.Text+getWebDatabaseFilename obj = liftIO $ getObjectPropertyString obj "filename"++data WebDatabaseFilenamePropertyInfo+instance AttrInfo WebDatabaseFilenamePropertyInfo where+ type AttrAllowedOps WebDatabaseFilenamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebDatabaseFilenamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebDatabaseFilenamePropertyInfo = WebDatabaseK+ type AttrGetType WebDatabaseFilenamePropertyInfo = T.Text+ type AttrLabel WebDatabaseFilenamePropertyInfo = "WebDatabase::filename"+ attrGet _ = getWebDatabaseFilename+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getWebDatabaseName :: (MonadIO m, WebDatabaseK o) => o -> m T.Text+getWebDatabaseName obj = liftIO $ getObjectPropertyString obj "name"++constructWebDatabaseName :: T.Text -> IO ([Char], GValue)+constructWebDatabaseName val = constructObjectPropertyString "name" val++data WebDatabaseNamePropertyInfo+instance AttrInfo WebDatabaseNamePropertyInfo where+ type AttrAllowedOps WebDatabaseNamePropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebDatabaseNamePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebDatabaseNamePropertyInfo = WebDatabaseK+ type AttrGetType WebDatabaseNamePropertyInfo = T.Text+ type AttrLabel WebDatabaseNamePropertyInfo = "WebDatabase::name"+ attrGet _ = getWebDatabaseName+ attrSet _ = undefined+ attrConstruct _ = constructWebDatabaseName++-- VVV Prop "security-origin"+ -- Type: TInterface "WebKit" "SecurityOrigin"+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getWebDatabaseSecurityOrigin :: (MonadIO m, WebDatabaseK o) => o -> m SecurityOrigin+getWebDatabaseSecurityOrigin obj = liftIO $ getObjectPropertyObject obj "security-origin" SecurityOrigin++constructWebDatabaseSecurityOrigin :: (SecurityOriginK a) => a -> IO ([Char], GValue)+constructWebDatabaseSecurityOrigin val = constructObjectPropertyObject "security-origin" val++data WebDatabaseSecurityOriginPropertyInfo+instance AttrInfo WebDatabaseSecurityOriginPropertyInfo where+ type AttrAllowedOps WebDatabaseSecurityOriginPropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebDatabaseSecurityOriginPropertyInfo = SecurityOriginK+ type AttrBaseTypeConstraint WebDatabaseSecurityOriginPropertyInfo = WebDatabaseK+ type AttrGetType WebDatabaseSecurityOriginPropertyInfo = SecurityOrigin+ type AttrLabel WebDatabaseSecurityOriginPropertyInfo = "WebDatabase::security-origin"+ attrGet _ = getWebDatabaseSecurityOrigin+ attrSet _ = undefined+ attrConstruct _ = constructWebDatabaseSecurityOrigin++-- VVV Prop "size"+ -- Type: TBasicType TUInt64+ -- Flags: [PropertyReadable]++getWebDatabaseSize :: (MonadIO m, WebDatabaseK o) => o -> m Word64+getWebDatabaseSize obj = liftIO $ getObjectPropertyUInt64 obj "size"++data WebDatabaseSizePropertyInfo+instance AttrInfo WebDatabaseSizePropertyInfo where+ type AttrAllowedOps WebDatabaseSizePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebDatabaseSizePropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebDatabaseSizePropertyInfo = WebDatabaseK+ type AttrGetType WebDatabaseSizePropertyInfo = Word64+ type AttrLabel WebDatabaseSizePropertyInfo = "WebDatabase::size"+ attrGet _ = getWebDatabaseSize+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList WebDatabase = '[ '("display-name", WebDatabaseDisplayNamePropertyInfo), '("expected-size", WebDatabaseExpectedSizePropertyInfo), '("filename", WebDatabaseFilenamePropertyInfo), '("name", WebDatabaseNamePropertyInfo), '("security-origin", WebDatabaseSecurityOriginPropertyInfo), '("size", WebDatabaseSizePropertyInfo)]++-- VVV Prop "horizontal-scrollbar-policy"+ -- Type: TInterface "Gtk" "PolicyType"+ -- Flags: [PropertyReadable]++getWebFrameHorizontalScrollbarPolicy :: (MonadIO m, WebFrameK o) => o -> m Gtk.PolicyType+getWebFrameHorizontalScrollbarPolicy obj = liftIO $ getObjectPropertyEnum obj "horizontal-scrollbar-policy"++data WebFrameHorizontalScrollbarPolicyPropertyInfo+instance AttrInfo WebFrameHorizontalScrollbarPolicyPropertyInfo where+ type AttrAllowedOps WebFrameHorizontalScrollbarPolicyPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebFrameHorizontalScrollbarPolicyPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebFrameHorizontalScrollbarPolicyPropertyInfo = WebFrameK+ type AttrGetType WebFrameHorizontalScrollbarPolicyPropertyInfo = Gtk.PolicyType+ type AttrLabel WebFrameHorizontalScrollbarPolicyPropertyInfo = "WebFrame::horizontal-scrollbar-policy"+ attrGet _ = getWebFrameHorizontalScrollbarPolicy+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "load-status"+ -- Type: TInterface "WebKit" "LoadStatus"+ -- Flags: [PropertyReadable]++getWebFrameLoadStatus :: (MonadIO m, WebFrameK o) => o -> m LoadStatus+getWebFrameLoadStatus obj = liftIO $ getObjectPropertyEnum obj "load-status"++data WebFrameLoadStatusPropertyInfo+instance AttrInfo WebFrameLoadStatusPropertyInfo where+ type AttrAllowedOps WebFrameLoadStatusPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebFrameLoadStatusPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebFrameLoadStatusPropertyInfo = WebFrameK+ type AttrGetType WebFrameLoadStatusPropertyInfo = LoadStatus+ type AttrLabel WebFrameLoadStatusPropertyInfo = "WebFrame::load-status"+ attrGet _ = getWebFrameLoadStatus+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getWebFrameName :: (MonadIO m, WebFrameK o) => o -> m T.Text+getWebFrameName obj = liftIO $ getObjectPropertyString obj "name"++data WebFrameNamePropertyInfo+instance AttrInfo WebFrameNamePropertyInfo where+ type AttrAllowedOps WebFrameNamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebFrameNamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebFrameNamePropertyInfo = WebFrameK+ type AttrGetType WebFrameNamePropertyInfo = T.Text+ type AttrLabel WebFrameNamePropertyInfo = "WebFrame::name"+ attrGet _ = getWebFrameName+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "title"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getWebFrameTitle :: (MonadIO m, WebFrameK o) => o -> m T.Text+getWebFrameTitle obj = liftIO $ getObjectPropertyString obj "title"++data WebFrameTitlePropertyInfo+instance AttrInfo WebFrameTitlePropertyInfo where+ type AttrAllowedOps WebFrameTitlePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebFrameTitlePropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebFrameTitlePropertyInfo = WebFrameK+ type AttrGetType WebFrameTitlePropertyInfo = T.Text+ type AttrLabel WebFrameTitlePropertyInfo = "WebFrame::title"+ attrGet _ = getWebFrameTitle+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getWebFrameUri :: (MonadIO m, WebFrameK o) => o -> m T.Text+getWebFrameUri obj = liftIO $ getObjectPropertyString obj "uri"++data WebFrameUriPropertyInfo+instance AttrInfo WebFrameUriPropertyInfo where+ type AttrAllowedOps WebFrameUriPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebFrameUriPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebFrameUriPropertyInfo = WebFrameK+ type AttrGetType WebFrameUriPropertyInfo = T.Text+ type AttrLabel WebFrameUriPropertyInfo = "WebFrame::uri"+ attrGet _ = getWebFrameUri+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "vertical-scrollbar-policy"+ -- Type: TInterface "Gtk" "PolicyType"+ -- Flags: [PropertyReadable]++getWebFrameVerticalScrollbarPolicy :: (MonadIO m, WebFrameK o) => o -> m Gtk.PolicyType+getWebFrameVerticalScrollbarPolicy obj = liftIO $ getObjectPropertyEnum obj "vertical-scrollbar-policy"++data WebFrameVerticalScrollbarPolicyPropertyInfo+instance AttrInfo WebFrameVerticalScrollbarPolicyPropertyInfo where+ type AttrAllowedOps WebFrameVerticalScrollbarPolicyPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebFrameVerticalScrollbarPolicyPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebFrameVerticalScrollbarPolicyPropertyInfo = WebFrameK+ type AttrGetType WebFrameVerticalScrollbarPolicyPropertyInfo = Gtk.PolicyType+ type AttrLabel WebFrameVerticalScrollbarPolicyPropertyInfo = "WebFrame::vertical-scrollbar-policy"+ attrGet _ = getWebFrameVerticalScrollbarPolicy+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList WebFrame = '[ '("horizontal-scrollbar-policy", WebFrameHorizontalScrollbarPolicyPropertyInfo), '("load-status", WebFrameLoadStatusPropertyInfo), '("name", WebFrameNamePropertyInfo), '("title", WebFrameTitlePropertyInfo), '("uri", WebFrameUriPropertyInfo), '("vertical-scrollbar-policy", WebFrameVerticalScrollbarPolicyPropertyInfo)]++-- VVV Prop "alternate-title"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getWebHistoryItemAlternateTitle :: (MonadIO m, WebHistoryItemK o) => o -> m T.Text+getWebHistoryItemAlternateTitle obj = liftIO $ getObjectPropertyString obj "alternate-title"++setWebHistoryItemAlternateTitle :: (MonadIO m, WebHistoryItemK o) => o -> T.Text -> m ()+setWebHistoryItemAlternateTitle obj val = liftIO $ setObjectPropertyString obj "alternate-title" val++constructWebHistoryItemAlternateTitle :: T.Text -> IO ([Char], GValue)+constructWebHistoryItemAlternateTitle val = constructObjectPropertyString "alternate-title" val++data WebHistoryItemAlternateTitlePropertyInfo+instance AttrInfo WebHistoryItemAlternateTitlePropertyInfo where+ type AttrAllowedOps WebHistoryItemAlternateTitlePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebHistoryItemAlternateTitlePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebHistoryItemAlternateTitlePropertyInfo = WebHistoryItemK+ type AttrGetType WebHistoryItemAlternateTitlePropertyInfo = T.Text+ type AttrLabel WebHistoryItemAlternateTitlePropertyInfo = "WebHistoryItem::alternate-title"+ attrGet _ = getWebHistoryItemAlternateTitle+ attrSet _ = setWebHistoryItemAlternateTitle+ attrConstruct _ = constructWebHistoryItemAlternateTitle++-- VVV Prop "last-visited-time"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getWebHistoryItemLastVisitedTime :: (MonadIO m, WebHistoryItemK o) => o -> m Double+getWebHistoryItemLastVisitedTime obj = liftIO $ getObjectPropertyDouble obj "last-visited-time"++data WebHistoryItemLastVisitedTimePropertyInfo+instance AttrInfo WebHistoryItemLastVisitedTimePropertyInfo where+ type AttrAllowedOps WebHistoryItemLastVisitedTimePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebHistoryItemLastVisitedTimePropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebHistoryItemLastVisitedTimePropertyInfo = WebHistoryItemK+ type AttrGetType WebHistoryItemLastVisitedTimePropertyInfo = Double+ type AttrLabel WebHistoryItemLastVisitedTimePropertyInfo = "WebHistoryItem::last-visited-time"+ attrGet _ = getWebHistoryItemLastVisitedTime+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "original-uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getWebHistoryItemOriginalUri :: (MonadIO m, WebHistoryItemK o) => o -> m T.Text+getWebHistoryItemOriginalUri obj = liftIO $ getObjectPropertyString obj "original-uri"++data WebHistoryItemOriginalUriPropertyInfo+instance AttrInfo WebHistoryItemOriginalUriPropertyInfo where+ type AttrAllowedOps WebHistoryItemOriginalUriPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebHistoryItemOriginalUriPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebHistoryItemOriginalUriPropertyInfo = WebHistoryItemK+ type AttrGetType WebHistoryItemOriginalUriPropertyInfo = T.Text+ type AttrLabel WebHistoryItemOriginalUriPropertyInfo = "WebHistoryItem::original-uri"+ attrGet _ = getWebHistoryItemOriginalUri+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "title"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getWebHistoryItemTitle :: (MonadIO m, WebHistoryItemK o) => o -> m T.Text+getWebHistoryItemTitle obj = liftIO $ getObjectPropertyString obj "title"++data WebHistoryItemTitlePropertyInfo+instance AttrInfo WebHistoryItemTitlePropertyInfo where+ type AttrAllowedOps WebHistoryItemTitlePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebHistoryItemTitlePropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebHistoryItemTitlePropertyInfo = WebHistoryItemK+ type AttrGetType WebHistoryItemTitlePropertyInfo = T.Text+ type AttrLabel WebHistoryItemTitlePropertyInfo = "WebHistoryItem::title"+ attrGet _ = getWebHistoryItemTitle+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getWebHistoryItemUri :: (MonadIO m, WebHistoryItemK o) => o -> m T.Text+getWebHistoryItemUri obj = liftIO $ getObjectPropertyString obj "uri"++data WebHistoryItemUriPropertyInfo+instance AttrInfo WebHistoryItemUriPropertyInfo where+ type AttrAllowedOps WebHistoryItemUriPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebHistoryItemUriPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebHistoryItemUriPropertyInfo = WebHistoryItemK+ type AttrGetType WebHistoryItemUriPropertyInfo = T.Text+ type AttrLabel WebHistoryItemUriPropertyInfo = "WebHistoryItem::uri"+ attrGet _ = getWebHistoryItemUri+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList WebHistoryItem = '[ '("alternate-title", WebHistoryItemAlternateTitlePropertyInfo), '("last-visited-time", WebHistoryItemLastVisitedTimePropertyInfo), '("original-uri", WebHistoryItemOriginalUriPropertyInfo), '("title", WebHistoryItemTitlePropertyInfo), '("uri", WebHistoryItemUriPropertyInfo)]++-- VVV Prop "inspected-uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getWebInspectorInspectedUri :: (MonadIO m, WebInspectorK o) => o -> m T.Text+getWebInspectorInspectedUri obj = liftIO $ getObjectPropertyString obj "inspected-uri"++data WebInspectorInspectedUriPropertyInfo+instance AttrInfo WebInspectorInspectedUriPropertyInfo where+ type AttrAllowedOps WebInspectorInspectedUriPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebInspectorInspectedUriPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebInspectorInspectedUriPropertyInfo = WebInspectorK+ type AttrGetType WebInspectorInspectedUriPropertyInfo = T.Text+ type AttrLabel WebInspectorInspectedUriPropertyInfo = "WebInspector::inspected-uri"+ attrGet _ = getWebInspectorInspectedUri+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "javascript-profiling-enabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getWebInspectorJavascriptProfilingEnabled :: (MonadIO m, WebInspectorK o) => o -> m Bool+getWebInspectorJavascriptProfilingEnabled obj = liftIO $ getObjectPropertyBool obj "javascript-profiling-enabled"++setWebInspectorJavascriptProfilingEnabled :: (MonadIO m, WebInspectorK o) => o -> Bool -> m ()+setWebInspectorJavascriptProfilingEnabled obj val = liftIO $ setObjectPropertyBool obj "javascript-profiling-enabled" val++constructWebInspectorJavascriptProfilingEnabled :: Bool -> IO ([Char], GValue)+constructWebInspectorJavascriptProfilingEnabled val = constructObjectPropertyBool "javascript-profiling-enabled" val++data WebInspectorJavascriptProfilingEnabledPropertyInfo+instance AttrInfo WebInspectorJavascriptProfilingEnabledPropertyInfo where+ type AttrAllowedOps WebInspectorJavascriptProfilingEnabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebInspectorJavascriptProfilingEnabledPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebInspectorJavascriptProfilingEnabledPropertyInfo = WebInspectorK+ type AttrGetType WebInspectorJavascriptProfilingEnabledPropertyInfo = Bool+ type AttrLabel WebInspectorJavascriptProfilingEnabledPropertyInfo = "WebInspector::javascript-profiling-enabled"+ attrGet _ = getWebInspectorJavascriptProfilingEnabled+ attrSet _ = setWebInspectorJavascriptProfilingEnabled+ attrConstruct _ = constructWebInspectorJavascriptProfilingEnabled++-- VVV Prop "timeline-profiling-enabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getWebInspectorTimelineProfilingEnabled :: (MonadIO m, WebInspectorK o) => o -> m Bool+getWebInspectorTimelineProfilingEnabled obj = liftIO $ getObjectPropertyBool obj "timeline-profiling-enabled"++setWebInspectorTimelineProfilingEnabled :: (MonadIO m, WebInspectorK o) => o -> Bool -> m ()+setWebInspectorTimelineProfilingEnabled obj val = liftIO $ setObjectPropertyBool obj "timeline-profiling-enabled" val++constructWebInspectorTimelineProfilingEnabled :: Bool -> IO ([Char], GValue)+constructWebInspectorTimelineProfilingEnabled val = constructObjectPropertyBool "timeline-profiling-enabled" val++data WebInspectorTimelineProfilingEnabledPropertyInfo+instance AttrInfo WebInspectorTimelineProfilingEnabledPropertyInfo where+ type AttrAllowedOps WebInspectorTimelineProfilingEnabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebInspectorTimelineProfilingEnabledPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebInspectorTimelineProfilingEnabledPropertyInfo = WebInspectorK+ type AttrGetType WebInspectorTimelineProfilingEnabledPropertyInfo = Bool+ type AttrLabel WebInspectorTimelineProfilingEnabledPropertyInfo = "WebInspector::timeline-profiling-enabled"+ attrGet _ = getWebInspectorTimelineProfilingEnabled+ attrSet _ = setWebInspectorTimelineProfilingEnabled+ attrConstruct _ = constructWebInspectorTimelineProfilingEnabled++-- VVV Prop "web-view"+ -- Type: TInterface "WebKit" "WebView"+ -- Flags: [PropertyReadable]++getWebInspectorWebView :: (MonadIO m, WebInspectorK o) => o -> m WebView+getWebInspectorWebView obj = liftIO $ getObjectPropertyObject obj "web-view" WebView++data WebInspectorWebViewPropertyInfo+instance AttrInfo WebInspectorWebViewPropertyInfo where+ type AttrAllowedOps WebInspectorWebViewPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebInspectorWebViewPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebInspectorWebViewPropertyInfo = WebInspectorK+ type AttrGetType WebInspectorWebViewPropertyInfo = WebView+ type AttrLabel WebInspectorWebViewPropertyInfo = "WebInspector::web-view"+ attrGet _ = getWebInspectorWebView+ attrSet _ = undefined+ attrConstruct _ = undefined++type instance AttributeList WebInspector = '[ '("inspected-uri", WebInspectorInspectedUriPropertyInfo), '("javascript-profiling-enabled", WebInspectorJavascriptProfilingEnabledPropertyInfo), '("timeline-profiling-enabled", WebInspectorTimelineProfilingEnabledPropertyInfo), '("web-view", WebInspectorWebViewPropertyInfo)]++-- VVV Prop "button"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getWebNavigationActionButton :: (MonadIO m, WebNavigationActionK o) => o -> m Int32+getWebNavigationActionButton obj = liftIO $ getObjectPropertyCInt obj "button"++constructWebNavigationActionButton :: Int32 -> IO ([Char], GValue)+constructWebNavigationActionButton val = constructObjectPropertyCInt "button" val++data WebNavigationActionButtonPropertyInfo+instance AttrInfo WebNavigationActionButtonPropertyInfo where+ type AttrAllowedOps WebNavigationActionButtonPropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebNavigationActionButtonPropertyInfo = (~) Int32+ type AttrBaseTypeConstraint WebNavigationActionButtonPropertyInfo = WebNavigationActionK+ type AttrGetType WebNavigationActionButtonPropertyInfo = Int32+ type AttrLabel WebNavigationActionButtonPropertyInfo = "WebNavigationAction::button"+ attrGet _ = getWebNavigationActionButton+ attrSet _ = undefined+ attrConstruct _ = constructWebNavigationActionButton++-- VVV Prop "modifier-state"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getWebNavigationActionModifierState :: (MonadIO m, WebNavigationActionK o) => o -> m Int32+getWebNavigationActionModifierState obj = liftIO $ getObjectPropertyCInt obj "modifier-state"++constructWebNavigationActionModifierState :: Int32 -> IO ([Char], GValue)+constructWebNavigationActionModifierState val = constructObjectPropertyCInt "modifier-state" val++data WebNavigationActionModifierStatePropertyInfo+instance AttrInfo WebNavigationActionModifierStatePropertyInfo where+ type AttrAllowedOps WebNavigationActionModifierStatePropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebNavigationActionModifierStatePropertyInfo = (~) Int32+ type AttrBaseTypeConstraint WebNavigationActionModifierStatePropertyInfo = WebNavigationActionK+ type AttrGetType WebNavigationActionModifierStatePropertyInfo = Int32+ type AttrLabel WebNavigationActionModifierStatePropertyInfo = "WebNavigationAction::modifier-state"+ attrGet _ = getWebNavigationActionModifierState+ attrSet _ = undefined+ attrConstruct _ = constructWebNavigationActionModifierState++-- VVV Prop "original-uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebNavigationActionOriginalUri :: (MonadIO m, WebNavigationActionK o) => o -> m T.Text+getWebNavigationActionOriginalUri obj = liftIO $ getObjectPropertyString obj "original-uri"++setWebNavigationActionOriginalUri :: (MonadIO m, WebNavigationActionK o) => o -> T.Text -> m ()+setWebNavigationActionOriginalUri obj val = liftIO $ setObjectPropertyString obj "original-uri" val++constructWebNavigationActionOriginalUri :: T.Text -> IO ([Char], GValue)+constructWebNavigationActionOriginalUri val = constructObjectPropertyString "original-uri" val++data WebNavigationActionOriginalUriPropertyInfo+instance AttrInfo WebNavigationActionOriginalUriPropertyInfo where+ type AttrAllowedOps WebNavigationActionOriginalUriPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebNavigationActionOriginalUriPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebNavigationActionOriginalUriPropertyInfo = WebNavigationActionK+ type AttrGetType WebNavigationActionOriginalUriPropertyInfo = T.Text+ type AttrLabel WebNavigationActionOriginalUriPropertyInfo = "WebNavigationAction::original-uri"+ attrGet _ = getWebNavigationActionOriginalUri+ attrSet _ = setWebNavigationActionOriginalUri+ attrConstruct _ = constructWebNavigationActionOriginalUri++-- VVV Prop "reason"+ -- Type: TInterface "WebKit" "WebNavigationReason"+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebNavigationActionReason :: (MonadIO m, WebNavigationActionK o) => o -> m WebNavigationReason+getWebNavigationActionReason obj = liftIO $ getObjectPropertyEnum obj "reason"++setWebNavigationActionReason :: (MonadIO m, WebNavigationActionK o) => o -> WebNavigationReason -> m ()+setWebNavigationActionReason obj val = liftIO $ setObjectPropertyEnum obj "reason" val++constructWebNavigationActionReason :: WebNavigationReason -> IO ([Char], GValue)+constructWebNavigationActionReason val = constructObjectPropertyEnum "reason" val++data WebNavigationActionReasonPropertyInfo+instance AttrInfo WebNavigationActionReasonPropertyInfo where+ type AttrAllowedOps WebNavigationActionReasonPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebNavigationActionReasonPropertyInfo = (~) WebNavigationReason+ type AttrBaseTypeConstraint WebNavigationActionReasonPropertyInfo = WebNavigationActionK+ type AttrGetType WebNavigationActionReasonPropertyInfo = WebNavigationReason+ type AttrLabel WebNavigationActionReasonPropertyInfo = "WebNavigationAction::reason"+ attrGet _ = getWebNavigationActionReason+ attrSet _ = setWebNavigationActionReason+ attrConstruct _ = constructWebNavigationActionReason++-- VVV Prop "target-frame"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getWebNavigationActionTargetFrame :: (MonadIO m, WebNavigationActionK o) => o -> m T.Text+getWebNavigationActionTargetFrame obj = liftIO $ getObjectPropertyString obj "target-frame"++constructWebNavigationActionTargetFrame :: T.Text -> IO ([Char], GValue)+constructWebNavigationActionTargetFrame val = constructObjectPropertyString "target-frame" val++data WebNavigationActionTargetFramePropertyInfo+instance AttrInfo WebNavigationActionTargetFramePropertyInfo where+ type AttrAllowedOps WebNavigationActionTargetFramePropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebNavigationActionTargetFramePropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebNavigationActionTargetFramePropertyInfo = WebNavigationActionK+ type AttrGetType WebNavigationActionTargetFramePropertyInfo = T.Text+ type AttrLabel WebNavigationActionTargetFramePropertyInfo = "WebNavigationAction::target-frame"+ attrGet _ = getWebNavigationActionTargetFrame+ attrSet _ = undefined+ attrConstruct _ = constructWebNavigationActionTargetFrame++type instance AttributeList WebNavigationAction = '[ '("button", WebNavigationActionButtonPropertyInfo), '("modifier-state", WebNavigationActionModifierStatePropertyInfo), '("original-uri", WebNavigationActionOriginalUriPropertyInfo), '("reason", WebNavigationActionReasonPropertyInfo), '("target-frame", WebNavigationActionTargetFramePropertyInfo)]++-- VVV Prop "enabled"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getWebPluginEnabled :: (MonadIO m, WebPluginK o) => o -> m Bool+getWebPluginEnabled obj = liftIO $ getObjectPropertyBool obj "enabled"++setWebPluginEnabled :: (MonadIO m, WebPluginK o) => o -> Bool -> m ()+setWebPluginEnabled obj val = liftIO $ setObjectPropertyBool obj "enabled" val++constructWebPluginEnabled :: Bool -> IO ([Char], GValue)+constructWebPluginEnabled val = constructObjectPropertyBool "enabled" val++data WebPluginEnabledPropertyInfo+instance AttrInfo WebPluginEnabledPropertyInfo where+ type AttrAllowedOps WebPluginEnabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebPluginEnabledPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebPluginEnabledPropertyInfo = WebPluginK+ type AttrGetType WebPluginEnabledPropertyInfo = Bool+ type AttrLabel WebPluginEnabledPropertyInfo = "WebPlugin::enabled"+ attrGet _ = getWebPluginEnabled+ attrSet _ = setWebPluginEnabled+ attrConstruct _ = constructWebPluginEnabled++type instance AttributeList WebPlugin = '[ '("enabled", WebPluginEnabledPropertyInfo)]++type instance AttributeList WebPluginDatabase = '[ ]++type instance AttributeList WebPolicyDecision = '[ ]++-- VVV Prop "encoding"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getWebResourceEncoding :: (MonadIO m, WebResourceK o) => o -> m T.Text+getWebResourceEncoding obj = liftIO $ getObjectPropertyString obj "encoding"++data WebResourceEncodingPropertyInfo+instance AttrInfo WebResourceEncodingPropertyInfo where+ type AttrAllowedOps WebResourceEncodingPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebResourceEncodingPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebResourceEncodingPropertyInfo = WebResourceK+ type AttrGetType WebResourceEncodingPropertyInfo = T.Text+ type AttrLabel WebResourceEncodingPropertyInfo = "WebResource::encoding"+ attrGet _ = getWebResourceEncoding+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "frame-name"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getWebResourceFrameName :: (MonadIO m, WebResourceK o) => o -> m T.Text+getWebResourceFrameName obj = liftIO $ getObjectPropertyString obj "frame-name"++data WebResourceFrameNamePropertyInfo+instance AttrInfo WebResourceFrameNamePropertyInfo where+ type AttrAllowedOps WebResourceFrameNamePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebResourceFrameNamePropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebResourceFrameNamePropertyInfo = WebResourceK+ type AttrGetType WebResourceFrameNamePropertyInfo = T.Text+ type AttrLabel WebResourceFrameNamePropertyInfo = "WebResource::frame-name"+ attrGet _ = getWebResourceFrameName+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "mime-type"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getWebResourceMimeType :: (MonadIO m, WebResourceK o) => o -> m T.Text+getWebResourceMimeType obj = liftIO $ getObjectPropertyString obj "mime-type"++data WebResourceMimeTypePropertyInfo+instance AttrInfo WebResourceMimeTypePropertyInfo where+ type AttrAllowedOps WebResourceMimeTypePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebResourceMimeTypePropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebResourceMimeTypePropertyInfo = WebResourceK+ type AttrGetType WebResourceMimeTypePropertyInfo = T.Text+ type AttrLabel WebResourceMimeTypePropertyInfo = "WebResource::mime-type"+ attrGet _ = getWebResourceMimeType+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getWebResourceUri :: (MonadIO m, WebResourceK o) => o -> m T.Text+getWebResourceUri obj = liftIO $ getObjectPropertyString obj "uri"++constructWebResourceUri :: T.Text -> IO ([Char], GValue)+constructWebResourceUri val = constructObjectPropertyString "uri" val++data WebResourceUriPropertyInfo+instance AttrInfo WebResourceUriPropertyInfo where+ type AttrAllowedOps WebResourceUriPropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebResourceUriPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebResourceUriPropertyInfo = WebResourceK+ type AttrGetType WebResourceUriPropertyInfo = T.Text+ type AttrLabel WebResourceUriPropertyInfo = "WebResource::uri"+ attrGet _ = getWebResourceUri+ attrSet _ = undefined+ attrConstruct _ = constructWebResourceUri++type instance AttributeList WebResource = '[ '("encoding", WebResourceEncodingPropertyInfo), '("frame-name", WebResourceFrameNamePropertyInfo), '("mime-type", WebResourceMimeTypePropertyInfo), '("uri", WebResourceUriPropertyInfo)]++-- VVV Prop "auto-load-images"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsAutoLoadImages :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsAutoLoadImages obj = liftIO $ getObjectPropertyBool obj "auto-load-images"++setWebSettingsAutoLoadImages :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsAutoLoadImages obj val = liftIO $ setObjectPropertyBool obj "auto-load-images" val++constructWebSettingsAutoLoadImages :: Bool -> IO ([Char], GValue)+constructWebSettingsAutoLoadImages val = constructObjectPropertyBool "auto-load-images" val++data WebSettingsAutoLoadImagesPropertyInfo+instance AttrInfo WebSettingsAutoLoadImagesPropertyInfo where+ type AttrAllowedOps WebSettingsAutoLoadImagesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsAutoLoadImagesPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsAutoLoadImagesPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsAutoLoadImagesPropertyInfo = Bool+ type AttrLabel WebSettingsAutoLoadImagesPropertyInfo = "WebSettings::auto-load-images"+ attrGet _ = getWebSettingsAutoLoadImages+ attrSet _ = setWebSettingsAutoLoadImages+ attrConstruct _ = constructWebSettingsAutoLoadImages++-- VVV Prop "auto-resize-window"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsAutoResizeWindow :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsAutoResizeWindow obj = liftIO $ getObjectPropertyBool obj "auto-resize-window"++setWebSettingsAutoResizeWindow :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsAutoResizeWindow obj val = liftIO $ setObjectPropertyBool obj "auto-resize-window" val++constructWebSettingsAutoResizeWindow :: Bool -> IO ([Char], GValue)+constructWebSettingsAutoResizeWindow val = constructObjectPropertyBool "auto-resize-window" val++data WebSettingsAutoResizeWindowPropertyInfo+instance AttrInfo WebSettingsAutoResizeWindowPropertyInfo where+ type AttrAllowedOps WebSettingsAutoResizeWindowPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsAutoResizeWindowPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsAutoResizeWindowPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsAutoResizeWindowPropertyInfo = Bool+ type AttrLabel WebSettingsAutoResizeWindowPropertyInfo = "WebSettings::auto-resize-window"+ attrGet _ = getWebSettingsAutoResizeWindow+ attrSet _ = setWebSettingsAutoResizeWindow+ attrConstruct _ = constructWebSettingsAutoResizeWindow++-- VVV Prop "auto-shrink-images"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsAutoShrinkImages :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsAutoShrinkImages obj = liftIO $ getObjectPropertyBool obj "auto-shrink-images"++setWebSettingsAutoShrinkImages :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsAutoShrinkImages obj val = liftIO $ setObjectPropertyBool obj "auto-shrink-images" val++constructWebSettingsAutoShrinkImages :: Bool -> IO ([Char], GValue)+constructWebSettingsAutoShrinkImages val = constructObjectPropertyBool "auto-shrink-images" val++data WebSettingsAutoShrinkImagesPropertyInfo+instance AttrInfo WebSettingsAutoShrinkImagesPropertyInfo where+ type AttrAllowedOps WebSettingsAutoShrinkImagesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsAutoShrinkImagesPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsAutoShrinkImagesPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsAutoShrinkImagesPropertyInfo = Bool+ type AttrLabel WebSettingsAutoShrinkImagesPropertyInfo = "WebSettings::auto-shrink-images"+ attrGet _ = getWebSettingsAutoShrinkImages+ attrSet _ = setWebSettingsAutoShrinkImages+ attrConstruct _ = constructWebSettingsAutoShrinkImages++-- VVV Prop "cursive-font-family"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsCursiveFontFamily :: (MonadIO m, WebSettingsK o) => o -> m T.Text+getWebSettingsCursiveFontFamily obj = liftIO $ getObjectPropertyString obj "cursive-font-family"++setWebSettingsCursiveFontFamily :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()+setWebSettingsCursiveFontFamily obj val = liftIO $ setObjectPropertyString obj "cursive-font-family" val++constructWebSettingsCursiveFontFamily :: T.Text -> IO ([Char], GValue)+constructWebSettingsCursiveFontFamily val = constructObjectPropertyString "cursive-font-family" val++data WebSettingsCursiveFontFamilyPropertyInfo+instance AttrInfo WebSettingsCursiveFontFamilyPropertyInfo where+ type AttrAllowedOps WebSettingsCursiveFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsCursiveFontFamilyPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebSettingsCursiveFontFamilyPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsCursiveFontFamilyPropertyInfo = T.Text+ type AttrLabel WebSettingsCursiveFontFamilyPropertyInfo = "WebSettings::cursive-font-family"+ attrGet _ = getWebSettingsCursiveFontFamily+ attrSet _ = setWebSettingsCursiveFontFamily+ attrConstruct _ = constructWebSettingsCursiveFontFamily++-- VVV Prop "default-encoding"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsDefaultEncoding :: (MonadIO m, WebSettingsK o) => o -> m T.Text+getWebSettingsDefaultEncoding obj = liftIO $ getObjectPropertyString obj "default-encoding"++setWebSettingsDefaultEncoding :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()+setWebSettingsDefaultEncoding obj val = liftIO $ setObjectPropertyString obj "default-encoding" val++constructWebSettingsDefaultEncoding :: T.Text -> IO ([Char], GValue)+constructWebSettingsDefaultEncoding val = constructObjectPropertyString "default-encoding" val++data WebSettingsDefaultEncodingPropertyInfo+instance AttrInfo WebSettingsDefaultEncodingPropertyInfo where+ type AttrAllowedOps WebSettingsDefaultEncodingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsDefaultEncodingPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebSettingsDefaultEncodingPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsDefaultEncodingPropertyInfo = T.Text+ type AttrLabel WebSettingsDefaultEncodingPropertyInfo = "WebSettings::default-encoding"+ attrGet _ = getWebSettingsDefaultEncoding+ attrSet _ = setWebSettingsDefaultEncoding+ attrConstruct _ = constructWebSettingsDefaultEncoding++-- VVV Prop "default-font-family"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsDefaultFontFamily :: (MonadIO m, WebSettingsK o) => o -> m T.Text+getWebSettingsDefaultFontFamily obj = liftIO $ getObjectPropertyString obj "default-font-family"++setWebSettingsDefaultFontFamily :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()+setWebSettingsDefaultFontFamily obj val = liftIO $ setObjectPropertyString obj "default-font-family" val++constructWebSettingsDefaultFontFamily :: T.Text -> IO ([Char], GValue)+constructWebSettingsDefaultFontFamily val = constructObjectPropertyString "default-font-family" val++data WebSettingsDefaultFontFamilyPropertyInfo+instance AttrInfo WebSettingsDefaultFontFamilyPropertyInfo where+ type AttrAllowedOps WebSettingsDefaultFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsDefaultFontFamilyPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebSettingsDefaultFontFamilyPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsDefaultFontFamilyPropertyInfo = T.Text+ type AttrLabel WebSettingsDefaultFontFamilyPropertyInfo = "WebSettings::default-font-family"+ attrGet _ = getWebSettingsDefaultFontFamily+ attrSet _ = setWebSettingsDefaultFontFamily+ attrConstruct _ = constructWebSettingsDefaultFontFamily++-- VVV Prop "default-font-size"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsDefaultFontSize :: (MonadIO m, WebSettingsK o) => o -> m Int32+getWebSettingsDefaultFontSize obj = liftIO $ getObjectPropertyCInt obj "default-font-size"++setWebSettingsDefaultFontSize :: (MonadIO m, WebSettingsK o) => o -> Int32 -> m ()+setWebSettingsDefaultFontSize obj val = liftIO $ setObjectPropertyCInt obj "default-font-size" val++constructWebSettingsDefaultFontSize :: Int32 -> IO ([Char], GValue)+constructWebSettingsDefaultFontSize val = constructObjectPropertyCInt "default-font-size" val++data WebSettingsDefaultFontSizePropertyInfo+instance AttrInfo WebSettingsDefaultFontSizePropertyInfo where+ type AttrAllowedOps WebSettingsDefaultFontSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsDefaultFontSizePropertyInfo = (~) Int32+ type AttrBaseTypeConstraint WebSettingsDefaultFontSizePropertyInfo = WebSettingsK+ type AttrGetType WebSettingsDefaultFontSizePropertyInfo = Int32+ type AttrLabel WebSettingsDefaultFontSizePropertyInfo = "WebSettings::default-font-size"+ attrGet _ = getWebSettingsDefaultFontSize+ attrSet _ = setWebSettingsDefaultFontSize+ attrConstruct _ = constructWebSettingsDefaultFontSize++-- VVV Prop "default-monospace-font-size"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsDefaultMonospaceFontSize :: (MonadIO m, WebSettingsK o) => o -> m Int32+getWebSettingsDefaultMonospaceFontSize obj = liftIO $ getObjectPropertyCInt obj "default-monospace-font-size"++setWebSettingsDefaultMonospaceFontSize :: (MonadIO m, WebSettingsK o) => o -> Int32 -> m ()+setWebSettingsDefaultMonospaceFontSize obj val = liftIO $ setObjectPropertyCInt obj "default-monospace-font-size" val++constructWebSettingsDefaultMonospaceFontSize :: Int32 -> IO ([Char], GValue)+constructWebSettingsDefaultMonospaceFontSize val = constructObjectPropertyCInt "default-monospace-font-size" val++data WebSettingsDefaultMonospaceFontSizePropertyInfo+instance AttrInfo WebSettingsDefaultMonospaceFontSizePropertyInfo where+ type AttrAllowedOps WebSettingsDefaultMonospaceFontSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsDefaultMonospaceFontSizePropertyInfo = (~) Int32+ type AttrBaseTypeConstraint WebSettingsDefaultMonospaceFontSizePropertyInfo = WebSettingsK+ type AttrGetType WebSettingsDefaultMonospaceFontSizePropertyInfo = Int32+ type AttrLabel WebSettingsDefaultMonospaceFontSizePropertyInfo = "WebSettings::default-monospace-font-size"+ attrGet _ = getWebSettingsDefaultMonospaceFontSize+ attrSet _ = setWebSettingsDefaultMonospaceFontSize+ attrConstruct _ = constructWebSettingsDefaultMonospaceFontSize++-- VVV Prop "editing-behavior"+ -- Type: TInterface "WebKit" "EditingBehavior"+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEditingBehavior :: (MonadIO m, WebSettingsK o) => o -> m EditingBehavior+getWebSettingsEditingBehavior obj = liftIO $ getObjectPropertyEnum obj "editing-behavior"++setWebSettingsEditingBehavior :: (MonadIO m, WebSettingsK o) => o -> EditingBehavior -> m ()+setWebSettingsEditingBehavior obj val = liftIO $ setObjectPropertyEnum obj "editing-behavior" val++constructWebSettingsEditingBehavior :: EditingBehavior -> IO ([Char], GValue)+constructWebSettingsEditingBehavior val = constructObjectPropertyEnum "editing-behavior" val++data WebSettingsEditingBehaviorPropertyInfo+instance AttrInfo WebSettingsEditingBehaviorPropertyInfo where+ type AttrAllowedOps WebSettingsEditingBehaviorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEditingBehaviorPropertyInfo = (~) EditingBehavior+ type AttrBaseTypeConstraint WebSettingsEditingBehaviorPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEditingBehaviorPropertyInfo = EditingBehavior+ type AttrLabel WebSettingsEditingBehaviorPropertyInfo = "WebSettings::editing-behavior"+ attrGet _ = getWebSettingsEditingBehavior+ attrSet _ = setWebSettingsEditingBehavior+ attrConstruct _ = constructWebSettingsEditingBehavior++-- VVV Prop "enable-accelerated-compositing"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableAcceleratedCompositing :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableAcceleratedCompositing obj = liftIO $ getObjectPropertyBool obj "enable-accelerated-compositing"++setWebSettingsEnableAcceleratedCompositing :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableAcceleratedCompositing obj val = liftIO $ setObjectPropertyBool obj "enable-accelerated-compositing" val++constructWebSettingsEnableAcceleratedCompositing :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableAcceleratedCompositing val = constructObjectPropertyBool "enable-accelerated-compositing" val++data WebSettingsEnableAcceleratedCompositingPropertyInfo+instance AttrInfo WebSettingsEnableAcceleratedCompositingPropertyInfo where+ type AttrAllowedOps WebSettingsEnableAcceleratedCompositingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableAcceleratedCompositingPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableAcceleratedCompositingPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableAcceleratedCompositingPropertyInfo = Bool+ type AttrLabel WebSettingsEnableAcceleratedCompositingPropertyInfo = "WebSettings::enable-accelerated-compositing"+ attrGet _ = getWebSettingsEnableAcceleratedCompositing+ attrSet _ = setWebSettingsEnableAcceleratedCompositing+ attrConstruct _ = constructWebSettingsEnableAcceleratedCompositing++-- VVV Prop "enable-caret-browsing"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableCaretBrowsing :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableCaretBrowsing obj = liftIO $ getObjectPropertyBool obj "enable-caret-browsing"++setWebSettingsEnableCaretBrowsing :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableCaretBrowsing obj val = liftIO $ setObjectPropertyBool obj "enable-caret-browsing" val++constructWebSettingsEnableCaretBrowsing :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableCaretBrowsing val = constructObjectPropertyBool "enable-caret-browsing" val++data WebSettingsEnableCaretBrowsingPropertyInfo+instance AttrInfo WebSettingsEnableCaretBrowsingPropertyInfo where+ type AttrAllowedOps WebSettingsEnableCaretBrowsingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableCaretBrowsingPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableCaretBrowsingPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableCaretBrowsingPropertyInfo = Bool+ type AttrLabel WebSettingsEnableCaretBrowsingPropertyInfo = "WebSettings::enable-caret-browsing"+ attrGet _ = getWebSettingsEnableCaretBrowsing+ attrSet _ = setWebSettingsEnableCaretBrowsing+ attrConstruct _ = constructWebSettingsEnableCaretBrowsing++-- VVV Prop "enable-default-context-menu"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableDefaultContextMenu :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableDefaultContextMenu obj = liftIO $ getObjectPropertyBool obj "enable-default-context-menu"++setWebSettingsEnableDefaultContextMenu :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableDefaultContextMenu obj val = liftIO $ setObjectPropertyBool obj "enable-default-context-menu" val++constructWebSettingsEnableDefaultContextMenu :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableDefaultContextMenu val = constructObjectPropertyBool "enable-default-context-menu" val++data WebSettingsEnableDefaultContextMenuPropertyInfo+instance AttrInfo WebSettingsEnableDefaultContextMenuPropertyInfo where+ type AttrAllowedOps WebSettingsEnableDefaultContextMenuPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableDefaultContextMenuPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableDefaultContextMenuPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableDefaultContextMenuPropertyInfo = Bool+ type AttrLabel WebSettingsEnableDefaultContextMenuPropertyInfo = "WebSettings::enable-default-context-menu"+ attrGet _ = getWebSettingsEnableDefaultContextMenu+ attrSet _ = setWebSettingsEnableDefaultContextMenu+ attrConstruct _ = constructWebSettingsEnableDefaultContextMenu++-- VVV Prop "enable-developer-extras"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableDeveloperExtras :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableDeveloperExtras obj = liftIO $ getObjectPropertyBool obj "enable-developer-extras"++setWebSettingsEnableDeveloperExtras :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableDeveloperExtras obj val = liftIO $ setObjectPropertyBool obj "enable-developer-extras" val++constructWebSettingsEnableDeveloperExtras :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableDeveloperExtras val = constructObjectPropertyBool "enable-developer-extras" val++data WebSettingsEnableDeveloperExtrasPropertyInfo+instance AttrInfo WebSettingsEnableDeveloperExtrasPropertyInfo where+ type AttrAllowedOps WebSettingsEnableDeveloperExtrasPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableDeveloperExtrasPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableDeveloperExtrasPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableDeveloperExtrasPropertyInfo = Bool+ type AttrLabel WebSettingsEnableDeveloperExtrasPropertyInfo = "WebSettings::enable-developer-extras"+ attrGet _ = getWebSettingsEnableDeveloperExtras+ attrSet _ = setWebSettingsEnableDeveloperExtras+ attrConstruct _ = constructWebSettingsEnableDeveloperExtras++-- VVV Prop "enable-display-of-insecure-content"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableDisplayOfInsecureContent :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableDisplayOfInsecureContent obj = liftIO $ getObjectPropertyBool obj "enable-display-of-insecure-content"++setWebSettingsEnableDisplayOfInsecureContent :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableDisplayOfInsecureContent obj val = liftIO $ setObjectPropertyBool obj "enable-display-of-insecure-content" val++constructWebSettingsEnableDisplayOfInsecureContent :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableDisplayOfInsecureContent val = constructObjectPropertyBool "enable-display-of-insecure-content" val++data WebSettingsEnableDisplayOfInsecureContentPropertyInfo+instance AttrInfo WebSettingsEnableDisplayOfInsecureContentPropertyInfo where+ type AttrAllowedOps WebSettingsEnableDisplayOfInsecureContentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableDisplayOfInsecureContentPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableDisplayOfInsecureContentPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableDisplayOfInsecureContentPropertyInfo = Bool+ type AttrLabel WebSettingsEnableDisplayOfInsecureContentPropertyInfo = "WebSettings::enable-display-of-insecure-content"+ attrGet _ = getWebSettingsEnableDisplayOfInsecureContent+ attrSet _ = setWebSettingsEnableDisplayOfInsecureContent+ attrConstruct _ = constructWebSettingsEnableDisplayOfInsecureContent++-- VVV Prop "enable-dns-prefetching"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableDnsPrefetching :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableDnsPrefetching obj = liftIO $ getObjectPropertyBool obj "enable-dns-prefetching"++setWebSettingsEnableDnsPrefetching :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableDnsPrefetching obj val = liftIO $ setObjectPropertyBool obj "enable-dns-prefetching" val++constructWebSettingsEnableDnsPrefetching :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableDnsPrefetching val = constructObjectPropertyBool "enable-dns-prefetching" val++data WebSettingsEnableDnsPrefetchingPropertyInfo+instance AttrInfo WebSettingsEnableDnsPrefetchingPropertyInfo where+ type AttrAllowedOps WebSettingsEnableDnsPrefetchingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableDnsPrefetchingPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableDnsPrefetchingPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableDnsPrefetchingPropertyInfo = Bool+ type AttrLabel WebSettingsEnableDnsPrefetchingPropertyInfo = "WebSettings::enable-dns-prefetching"+ attrGet _ = getWebSettingsEnableDnsPrefetching+ attrSet _ = setWebSettingsEnableDnsPrefetching+ attrConstruct _ = constructWebSettingsEnableDnsPrefetching++-- VVV Prop "enable-dom-paste"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableDomPaste :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableDomPaste obj = liftIO $ getObjectPropertyBool obj "enable-dom-paste"++setWebSettingsEnableDomPaste :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableDomPaste obj val = liftIO $ setObjectPropertyBool obj "enable-dom-paste" val++constructWebSettingsEnableDomPaste :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableDomPaste val = constructObjectPropertyBool "enable-dom-paste" val++data WebSettingsEnableDomPastePropertyInfo+instance AttrInfo WebSettingsEnableDomPastePropertyInfo where+ type AttrAllowedOps WebSettingsEnableDomPastePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableDomPastePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableDomPastePropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableDomPastePropertyInfo = Bool+ type AttrLabel WebSettingsEnableDomPastePropertyInfo = "WebSettings::enable-dom-paste"+ attrGet _ = getWebSettingsEnableDomPaste+ attrSet _ = setWebSettingsEnableDomPaste+ attrConstruct _ = constructWebSettingsEnableDomPaste++-- VVV Prop "enable-file-access-from-file-uris"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableFileAccessFromFileUris :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableFileAccessFromFileUris obj = liftIO $ getObjectPropertyBool obj "enable-file-access-from-file-uris"++setWebSettingsEnableFileAccessFromFileUris :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableFileAccessFromFileUris obj val = liftIO $ setObjectPropertyBool obj "enable-file-access-from-file-uris" val++constructWebSettingsEnableFileAccessFromFileUris :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableFileAccessFromFileUris val = constructObjectPropertyBool "enable-file-access-from-file-uris" val++data WebSettingsEnableFileAccessFromFileUrisPropertyInfo+instance AttrInfo WebSettingsEnableFileAccessFromFileUrisPropertyInfo where+ type AttrAllowedOps WebSettingsEnableFileAccessFromFileUrisPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableFileAccessFromFileUrisPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableFileAccessFromFileUrisPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableFileAccessFromFileUrisPropertyInfo = Bool+ type AttrLabel WebSettingsEnableFileAccessFromFileUrisPropertyInfo = "WebSettings::enable-file-access-from-file-uris"+ attrGet _ = getWebSettingsEnableFileAccessFromFileUris+ attrSet _ = setWebSettingsEnableFileAccessFromFileUris+ attrConstruct _ = constructWebSettingsEnableFileAccessFromFileUris++-- VVV Prop "enable-frame-flattening"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableFrameFlattening :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableFrameFlattening obj = liftIO $ getObjectPropertyBool obj "enable-frame-flattening"++setWebSettingsEnableFrameFlattening :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableFrameFlattening obj val = liftIO $ setObjectPropertyBool obj "enable-frame-flattening" val++constructWebSettingsEnableFrameFlattening :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableFrameFlattening val = constructObjectPropertyBool "enable-frame-flattening" val++data WebSettingsEnableFrameFlatteningPropertyInfo+instance AttrInfo WebSettingsEnableFrameFlatteningPropertyInfo where+ type AttrAllowedOps WebSettingsEnableFrameFlatteningPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableFrameFlatteningPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableFrameFlatteningPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableFrameFlatteningPropertyInfo = Bool+ type AttrLabel WebSettingsEnableFrameFlatteningPropertyInfo = "WebSettings::enable-frame-flattening"+ attrGet _ = getWebSettingsEnableFrameFlattening+ attrSet _ = setWebSettingsEnableFrameFlattening+ attrConstruct _ = constructWebSettingsEnableFrameFlattening++-- VVV Prop "enable-fullscreen"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableFullscreen :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableFullscreen obj = liftIO $ getObjectPropertyBool obj "enable-fullscreen"++setWebSettingsEnableFullscreen :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableFullscreen obj val = liftIO $ setObjectPropertyBool obj "enable-fullscreen" val++constructWebSettingsEnableFullscreen :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableFullscreen val = constructObjectPropertyBool "enable-fullscreen" val++data WebSettingsEnableFullscreenPropertyInfo+instance AttrInfo WebSettingsEnableFullscreenPropertyInfo where+ type AttrAllowedOps WebSettingsEnableFullscreenPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableFullscreenPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableFullscreenPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableFullscreenPropertyInfo = Bool+ type AttrLabel WebSettingsEnableFullscreenPropertyInfo = "WebSettings::enable-fullscreen"+ attrGet _ = getWebSettingsEnableFullscreen+ attrSet _ = setWebSettingsEnableFullscreen+ attrConstruct _ = constructWebSettingsEnableFullscreen++-- VVV Prop "enable-html5-database"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableHtml5Database :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableHtml5Database obj = liftIO $ getObjectPropertyBool obj "enable-html5-database"++setWebSettingsEnableHtml5Database :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableHtml5Database obj val = liftIO $ setObjectPropertyBool obj "enable-html5-database" val++constructWebSettingsEnableHtml5Database :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableHtml5Database val = constructObjectPropertyBool "enable-html5-database" val++data WebSettingsEnableHtml5DatabasePropertyInfo+instance AttrInfo WebSettingsEnableHtml5DatabasePropertyInfo where+ type AttrAllowedOps WebSettingsEnableHtml5DatabasePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableHtml5DatabasePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableHtml5DatabasePropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableHtml5DatabasePropertyInfo = Bool+ type AttrLabel WebSettingsEnableHtml5DatabasePropertyInfo = "WebSettings::enable-html5-database"+ attrGet _ = getWebSettingsEnableHtml5Database+ attrSet _ = setWebSettingsEnableHtml5Database+ attrConstruct _ = constructWebSettingsEnableHtml5Database++-- VVV Prop "enable-html5-local-storage"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableHtml5LocalStorage :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableHtml5LocalStorage obj = liftIO $ getObjectPropertyBool obj "enable-html5-local-storage"++setWebSettingsEnableHtml5LocalStorage :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableHtml5LocalStorage obj val = liftIO $ setObjectPropertyBool obj "enable-html5-local-storage" val++constructWebSettingsEnableHtml5LocalStorage :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableHtml5LocalStorage val = constructObjectPropertyBool "enable-html5-local-storage" val++data WebSettingsEnableHtml5LocalStoragePropertyInfo+instance AttrInfo WebSettingsEnableHtml5LocalStoragePropertyInfo where+ type AttrAllowedOps WebSettingsEnableHtml5LocalStoragePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableHtml5LocalStoragePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableHtml5LocalStoragePropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableHtml5LocalStoragePropertyInfo = Bool+ type AttrLabel WebSettingsEnableHtml5LocalStoragePropertyInfo = "WebSettings::enable-html5-local-storage"+ attrGet _ = getWebSettingsEnableHtml5LocalStorage+ attrSet _ = setWebSettingsEnableHtml5LocalStorage+ attrConstruct _ = constructWebSettingsEnableHtml5LocalStorage++-- VVV Prop "enable-hyperlink-auditing"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableHyperlinkAuditing :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableHyperlinkAuditing obj = liftIO $ getObjectPropertyBool obj "enable-hyperlink-auditing"++setWebSettingsEnableHyperlinkAuditing :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableHyperlinkAuditing obj val = liftIO $ setObjectPropertyBool obj "enable-hyperlink-auditing" val++constructWebSettingsEnableHyperlinkAuditing :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableHyperlinkAuditing val = constructObjectPropertyBool "enable-hyperlink-auditing" val++data WebSettingsEnableHyperlinkAuditingPropertyInfo+instance AttrInfo WebSettingsEnableHyperlinkAuditingPropertyInfo where+ type AttrAllowedOps WebSettingsEnableHyperlinkAuditingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableHyperlinkAuditingPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableHyperlinkAuditingPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableHyperlinkAuditingPropertyInfo = Bool+ type AttrLabel WebSettingsEnableHyperlinkAuditingPropertyInfo = "WebSettings::enable-hyperlink-auditing"+ attrGet _ = getWebSettingsEnableHyperlinkAuditing+ attrSet _ = setWebSettingsEnableHyperlinkAuditing+ attrConstruct _ = constructWebSettingsEnableHyperlinkAuditing++-- VVV Prop "enable-java-applet"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableJavaApplet :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableJavaApplet obj = liftIO $ getObjectPropertyBool obj "enable-java-applet"++setWebSettingsEnableJavaApplet :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableJavaApplet obj val = liftIO $ setObjectPropertyBool obj "enable-java-applet" val++constructWebSettingsEnableJavaApplet :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableJavaApplet val = constructObjectPropertyBool "enable-java-applet" val++data WebSettingsEnableJavaAppletPropertyInfo+instance AttrInfo WebSettingsEnableJavaAppletPropertyInfo where+ type AttrAllowedOps WebSettingsEnableJavaAppletPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableJavaAppletPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableJavaAppletPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableJavaAppletPropertyInfo = Bool+ type AttrLabel WebSettingsEnableJavaAppletPropertyInfo = "WebSettings::enable-java-applet"+ attrGet _ = getWebSettingsEnableJavaApplet+ attrSet _ = setWebSettingsEnableJavaApplet+ attrConstruct _ = constructWebSettingsEnableJavaApplet++-- VVV Prop "enable-media-stream"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableMediaStream :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableMediaStream obj = liftIO $ getObjectPropertyBool obj "enable-media-stream"++setWebSettingsEnableMediaStream :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableMediaStream obj val = liftIO $ setObjectPropertyBool obj "enable-media-stream" val++constructWebSettingsEnableMediaStream :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableMediaStream val = constructObjectPropertyBool "enable-media-stream" val++data WebSettingsEnableMediaStreamPropertyInfo+instance AttrInfo WebSettingsEnableMediaStreamPropertyInfo where+ type AttrAllowedOps WebSettingsEnableMediaStreamPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableMediaStreamPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableMediaStreamPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableMediaStreamPropertyInfo = Bool+ type AttrLabel WebSettingsEnableMediaStreamPropertyInfo = "WebSettings::enable-media-stream"+ attrGet _ = getWebSettingsEnableMediaStream+ attrSet _ = setWebSettingsEnableMediaStream+ attrConstruct _ = constructWebSettingsEnableMediaStream++-- VVV Prop "enable-mediasource"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableMediasource :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableMediasource obj = liftIO $ getObjectPropertyBool obj "enable-mediasource"++setWebSettingsEnableMediasource :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableMediasource obj val = liftIO $ setObjectPropertyBool obj "enable-mediasource" val++constructWebSettingsEnableMediasource :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableMediasource val = constructObjectPropertyBool "enable-mediasource" val++data WebSettingsEnableMediasourcePropertyInfo+instance AttrInfo WebSettingsEnableMediasourcePropertyInfo where+ type AttrAllowedOps WebSettingsEnableMediasourcePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableMediasourcePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableMediasourcePropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableMediasourcePropertyInfo = Bool+ type AttrLabel WebSettingsEnableMediasourcePropertyInfo = "WebSettings::enable-mediasource"+ attrGet _ = getWebSettingsEnableMediasource+ attrSet _ = setWebSettingsEnableMediasource+ attrConstruct _ = constructWebSettingsEnableMediasource++-- VVV Prop "enable-offline-web-application-cache"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableOfflineWebApplicationCache :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableOfflineWebApplicationCache obj = liftIO $ getObjectPropertyBool obj "enable-offline-web-application-cache"++setWebSettingsEnableOfflineWebApplicationCache :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableOfflineWebApplicationCache obj val = liftIO $ setObjectPropertyBool obj "enable-offline-web-application-cache" val++constructWebSettingsEnableOfflineWebApplicationCache :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableOfflineWebApplicationCache val = constructObjectPropertyBool "enable-offline-web-application-cache" val++data WebSettingsEnableOfflineWebApplicationCachePropertyInfo+instance AttrInfo WebSettingsEnableOfflineWebApplicationCachePropertyInfo where+ type AttrAllowedOps WebSettingsEnableOfflineWebApplicationCachePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableOfflineWebApplicationCachePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableOfflineWebApplicationCachePropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableOfflineWebApplicationCachePropertyInfo = Bool+ type AttrLabel WebSettingsEnableOfflineWebApplicationCachePropertyInfo = "WebSettings::enable-offline-web-application-cache"+ attrGet _ = getWebSettingsEnableOfflineWebApplicationCache+ attrSet _ = setWebSettingsEnableOfflineWebApplicationCache+ attrConstruct _ = constructWebSettingsEnableOfflineWebApplicationCache++-- VVV Prop "enable-page-cache"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnablePageCache :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnablePageCache obj = liftIO $ getObjectPropertyBool obj "enable-page-cache"++setWebSettingsEnablePageCache :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnablePageCache obj val = liftIO $ setObjectPropertyBool obj "enable-page-cache" val++constructWebSettingsEnablePageCache :: Bool -> IO ([Char], GValue)+constructWebSettingsEnablePageCache val = constructObjectPropertyBool "enable-page-cache" val++data WebSettingsEnablePageCachePropertyInfo+instance AttrInfo WebSettingsEnablePageCachePropertyInfo where+ type AttrAllowedOps WebSettingsEnablePageCachePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnablePageCachePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnablePageCachePropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnablePageCachePropertyInfo = Bool+ type AttrLabel WebSettingsEnablePageCachePropertyInfo = "WebSettings::enable-page-cache"+ attrGet _ = getWebSettingsEnablePageCache+ attrSet _ = setWebSettingsEnablePageCache+ attrConstruct _ = constructWebSettingsEnablePageCache++-- VVV Prop "enable-plugins"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnablePlugins :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnablePlugins obj = liftIO $ getObjectPropertyBool obj "enable-plugins"++setWebSettingsEnablePlugins :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnablePlugins obj val = liftIO $ setObjectPropertyBool obj "enable-plugins" val++constructWebSettingsEnablePlugins :: Bool -> IO ([Char], GValue)+constructWebSettingsEnablePlugins val = constructObjectPropertyBool "enable-plugins" val++data WebSettingsEnablePluginsPropertyInfo+instance AttrInfo WebSettingsEnablePluginsPropertyInfo where+ type AttrAllowedOps WebSettingsEnablePluginsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnablePluginsPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnablePluginsPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnablePluginsPropertyInfo = Bool+ type AttrLabel WebSettingsEnablePluginsPropertyInfo = "WebSettings::enable-plugins"+ attrGet _ = getWebSettingsEnablePlugins+ attrSet _ = setWebSettingsEnablePlugins+ attrConstruct _ = constructWebSettingsEnablePlugins++-- VVV Prop "enable-private-browsing"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnablePrivateBrowsing :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnablePrivateBrowsing obj = liftIO $ getObjectPropertyBool obj "enable-private-browsing"++setWebSettingsEnablePrivateBrowsing :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnablePrivateBrowsing obj val = liftIO $ setObjectPropertyBool obj "enable-private-browsing" val++constructWebSettingsEnablePrivateBrowsing :: Bool -> IO ([Char], GValue)+constructWebSettingsEnablePrivateBrowsing val = constructObjectPropertyBool "enable-private-browsing" val++data WebSettingsEnablePrivateBrowsingPropertyInfo+instance AttrInfo WebSettingsEnablePrivateBrowsingPropertyInfo where+ type AttrAllowedOps WebSettingsEnablePrivateBrowsingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnablePrivateBrowsingPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnablePrivateBrowsingPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnablePrivateBrowsingPropertyInfo = Bool+ type AttrLabel WebSettingsEnablePrivateBrowsingPropertyInfo = "WebSettings::enable-private-browsing"+ attrGet _ = getWebSettingsEnablePrivateBrowsing+ attrSet _ = setWebSettingsEnablePrivateBrowsing+ attrConstruct _ = constructWebSettingsEnablePrivateBrowsing++-- VVV Prop "enable-running-of-insecure-content"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableRunningOfInsecureContent :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableRunningOfInsecureContent obj = liftIO $ getObjectPropertyBool obj "enable-running-of-insecure-content"++setWebSettingsEnableRunningOfInsecureContent :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableRunningOfInsecureContent obj val = liftIO $ setObjectPropertyBool obj "enable-running-of-insecure-content" val++constructWebSettingsEnableRunningOfInsecureContent :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableRunningOfInsecureContent val = constructObjectPropertyBool "enable-running-of-insecure-content" val++data WebSettingsEnableRunningOfInsecureContentPropertyInfo+instance AttrInfo WebSettingsEnableRunningOfInsecureContentPropertyInfo where+ type AttrAllowedOps WebSettingsEnableRunningOfInsecureContentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableRunningOfInsecureContentPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableRunningOfInsecureContentPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableRunningOfInsecureContentPropertyInfo = Bool+ type AttrLabel WebSettingsEnableRunningOfInsecureContentPropertyInfo = "WebSettings::enable-running-of-insecure-content"+ attrGet _ = getWebSettingsEnableRunningOfInsecureContent+ attrSet _ = setWebSettingsEnableRunningOfInsecureContent+ attrConstruct _ = constructWebSettingsEnableRunningOfInsecureContent++-- VVV Prop "enable-scripts"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableScripts :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableScripts obj = liftIO $ getObjectPropertyBool obj "enable-scripts"++setWebSettingsEnableScripts :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableScripts obj val = liftIO $ setObjectPropertyBool obj "enable-scripts" val++constructWebSettingsEnableScripts :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableScripts val = constructObjectPropertyBool "enable-scripts" val++data WebSettingsEnableScriptsPropertyInfo+instance AttrInfo WebSettingsEnableScriptsPropertyInfo where+ type AttrAllowedOps WebSettingsEnableScriptsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableScriptsPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableScriptsPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableScriptsPropertyInfo = Bool+ type AttrLabel WebSettingsEnableScriptsPropertyInfo = "WebSettings::enable-scripts"+ attrGet _ = getWebSettingsEnableScripts+ attrSet _ = setWebSettingsEnableScripts+ attrConstruct _ = constructWebSettingsEnableScripts++-- VVV Prop "enable-site-specific-quirks"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableSiteSpecificQuirks :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableSiteSpecificQuirks obj = liftIO $ getObjectPropertyBool obj "enable-site-specific-quirks"++setWebSettingsEnableSiteSpecificQuirks :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableSiteSpecificQuirks obj val = liftIO $ setObjectPropertyBool obj "enable-site-specific-quirks" val++constructWebSettingsEnableSiteSpecificQuirks :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableSiteSpecificQuirks val = constructObjectPropertyBool "enable-site-specific-quirks" val++data WebSettingsEnableSiteSpecificQuirksPropertyInfo+instance AttrInfo WebSettingsEnableSiteSpecificQuirksPropertyInfo where+ type AttrAllowedOps WebSettingsEnableSiteSpecificQuirksPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableSiteSpecificQuirksPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableSiteSpecificQuirksPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableSiteSpecificQuirksPropertyInfo = Bool+ type AttrLabel WebSettingsEnableSiteSpecificQuirksPropertyInfo = "WebSettings::enable-site-specific-quirks"+ attrGet _ = getWebSettingsEnableSiteSpecificQuirks+ attrSet _ = setWebSettingsEnableSiteSpecificQuirks+ attrConstruct _ = constructWebSettingsEnableSiteSpecificQuirks++-- VVV Prop "enable-smooth-scrolling"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableSmoothScrolling :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableSmoothScrolling obj = liftIO $ getObjectPropertyBool obj "enable-smooth-scrolling"++setWebSettingsEnableSmoothScrolling :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableSmoothScrolling obj val = liftIO $ setObjectPropertyBool obj "enable-smooth-scrolling" val++constructWebSettingsEnableSmoothScrolling :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableSmoothScrolling val = constructObjectPropertyBool "enable-smooth-scrolling" val++data WebSettingsEnableSmoothScrollingPropertyInfo+instance AttrInfo WebSettingsEnableSmoothScrollingPropertyInfo where+ type AttrAllowedOps WebSettingsEnableSmoothScrollingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableSmoothScrollingPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableSmoothScrollingPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableSmoothScrollingPropertyInfo = Bool+ type AttrLabel WebSettingsEnableSmoothScrollingPropertyInfo = "WebSettings::enable-smooth-scrolling"+ attrGet _ = getWebSettingsEnableSmoothScrolling+ attrSet _ = setWebSettingsEnableSmoothScrolling+ attrConstruct _ = constructWebSettingsEnableSmoothScrolling++-- VVV Prop "enable-spatial-navigation"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableSpatialNavigation :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableSpatialNavigation obj = liftIO $ getObjectPropertyBool obj "enable-spatial-navigation"++setWebSettingsEnableSpatialNavigation :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableSpatialNavigation obj val = liftIO $ setObjectPropertyBool obj "enable-spatial-navigation" val++constructWebSettingsEnableSpatialNavigation :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableSpatialNavigation val = constructObjectPropertyBool "enable-spatial-navigation" val++data WebSettingsEnableSpatialNavigationPropertyInfo+instance AttrInfo WebSettingsEnableSpatialNavigationPropertyInfo where+ type AttrAllowedOps WebSettingsEnableSpatialNavigationPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableSpatialNavigationPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableSpatialNavigationPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableSpatialNavigationPropertyInfo = Bool+ type AttrLabel WebSettingsEnableSpatialNavigationPropertyInfo = "WebSettings::enable-spatial-navigation"+ attrGet _ = getWebSettingsEnableSpatialNavigation+ attrSet _ = setWebSettingsEnableSpatialNavigation+ attrConstruct _ = constructWebSettingsEnableSpatialNavigation++-- VVV Prop "enable-spell-checking"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableSpellChecking :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableSpellChecking obj = liftIO $ getObjectPropertyBool obj "enable-spell-checking"++setWebSettingsEnableSpellChecking :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableSpellChecking obj val = liftIO $ setObjectPropertyBool obj "enable-spell-checking" val++constructWebSettingsEnableSpellChecking :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableSpellChecking val = constructObjectPropertyBool "enable-spell-checking" val++data WebSettingsEnableSpellCheckingPropertyInfo+instance AttrInfo WebSettingsEnableSpellCheckingPropertyInfo where+ type AttrAllowedOps WebSettingsEnableSpellCheckingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableSpellCheckingPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableSpellCheckingPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableSpellCheckingPropertyInfo = Bool+ type AttrLabel WebSettingsEnableSpellCheckingPropertyInfo = "WebSettings::enable-spell-checking"+ attrGet _ = getWebSettingsEnableSpellChecking+ attrSet _ = setWebSettingsEnableSpellChecking+ attrConstruct _ = constructWebSettingsEnableSpellChecking++-- VVV Prop "enable-universal-access-from-file-uris"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableUniversalAccessFromFileUris :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableUniversalAccessFromFileUris obj = liftIO $ getObjectPropertyBool obj "enable-universal-access-from-file-uris"++setWebSettingsEnableUniversalAccessFromFileUris :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableUniversalAccessFromFileUris obj val = liftIO $ setObjectPropertyBool obj "enable-universal-access-from-file-uris" val++constructWebSettingsEnableUniversalAccessFromFileUris :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableUniversalAccessFromFileUris val = constructObjectPropertyBool "enable-universal-access-from-file-uris" val++data WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo+instance AttrInfo WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo where+ type AttrAllowedOps WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo = Bool+ type AttrLabel WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo = "WebSettings::enable-universal-access-from-file-uris"+ attrGet _ = getWebSettingsEnableUniversalAccessFromFileUris+ attrSet _ = setWebSettingsEnableUniversalAccessFromFileUris+ attrConstruct _ = constructWebSettingsEnableUniversalAccessFromFileUris++-- VVV Prop "enable-webaudio"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableWebaudio :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableWebaudio obj = liftIO $ getObjectPropertyBool obj "enable-webaudio"++setWebSettingsEnableWebaudio :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableWebaudio obj val = liftIO $ setObjectPropertyBool obj "enable-webaudio" val++constructWebSettingsEnableWebaudio :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableWebaudio val = constructObjectPropertyBool "enable-webaudio" val++data WebSettingsEnableWebaudioPropertyInfo+instance AttrInfo WebSettingsEnableWebaudioPropertyInfo where+ type AttrAllowedOps WebSettingsEnableWebaudioPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableWebaudioPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableWebaudioPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableWebaudioPropertyInfo = Bool+ type AttrLabel WebSettingsEnableWebaudioPropertyInfo = "WebSettings::enable-webaudio"+ attrGet _ = getWebSettingsEnableWebaudio+ attrSet _ = setWebSettingsEnableWebaudio+ attrConstruct _ = constructWebSettingsEnableWebaudio++-- VVV Prop "enable-webgl"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableWebgl :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableWebgl obj = liftIO $ getObjectPropertyBool obj "enable-webgl"++setWebSettingsEnableWebgl :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableWebgl obj val = liftIO $ setObjectPropertyBool obj "enable-webgl" val++constructWebSettingsEnableWebgl :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableWebgl val = constructObjectPropertyBool "enable-webgl" val++data WebSettingsEnableWebglPropertyInfo+instance AttrInfo WebSettingsEnableWebglPropertyInfo where+ type AttrAllowedOps WebSettingsEnableWebglPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableWebglPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableWebglPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableWebglPropertyInfo = Bool+ type AttrLabel WebSettingsEnableWebglPropertyInfo = "WebSettings::enable-webgl"+ attrGet _ = getWebSettingsEnableWebgl+ attrSet _ = setWebSettingsEnableWebgl+ attrConstruct _ = constructWebSettingsEnableWebgl++-- VVV Prop "enable-xss-auditor"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnableXssAuditor :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnableXssAuditor obj = liftIO $ getObjectPropertyBool obj "enable-xss-auditor"++setWebSettingsEnableXssAuditor :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnableXssAuditor obj val = liftIO $ setObjectPropertyBool obj "enable-xss-auditor" val++constructWebSettingsEnableXssAuditor :: Bool -> IO ([Char], GValue)+constructWebSettingsEnableXssAuditor val = constructObjectPropertyBool "enable-xss-auditor" val++data WebSettingsEnableXssAuditorPropertyInfo+instance AttrInfo WebSettingsEnableXssAuditorPropertyInfo where+ type AttrAllowedOps WebSettingsEnableXssAuditorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnableXssAuditorPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnableXssAuditorPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnableXssAuditorPropertyInfo = Bool+ type AttrLabel WebSettingsEnableXssAuditorPropertyInfo = "WebSettings::enable-xss-auditor"+ attrGet _ = getWebSettingsEnableXssAuditor+ attrSet _ = setWebSettingsEnableXssAuditor+ attrConstruct _ = constructWebSettingsEnableXssAuditor++-- VVV Prop "enforce-96-dpi"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsEnforce96Dpi :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsEnforce96Dpi obj = liftIO $ getObjectPropertyBool obj "enforce-96-dpi"++setWebSettingsEnforce96Dpi :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsEnforce96Dpi obj val = liftIO $ setObjectPropertyBool obj "enforce-96-dpi" val++constructWebSettingsEnforce96Dpi :: Bool -> IO ([Char], GValue)+constructWebSettingsEnforce96Dpi val = constructObjectPropertyBool "enforce-96-dpi" val++data WebSettingsEnforce96DpiPropertyInfo+instance AttrInfo WebSettingsEnforce96DpiPropertyInfo where+ type AttrAllowedOps WebSettingsEnforce96DpiPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsEnforce96DpiPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsEnforce96DpiPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsEnforce96DpiPropertyInfo = Bool+ type AttrLabel WebSettingsEnforce96DpiPropertyInfo = "WebSettings::enforce-96-dpi"+ attrGet _ = getWebSettingsEnforce96Dpi+ attrSet _ = setWebSettingsEnforce96Dpi+ attrConstruct _ = constructWebSettingsEnforce96Dpi++-- VVV Prop "fantasy-font-family"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsFantasyFontFamily :: (MonadIO m, WebSettingsK o) => o -> m T.Text+getWebSettingsFantasyFontFamily obj = liftIO $ getObjectPropertyString obj "fantasy-font-family"++setWebSettingsFantasyFontFamily :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()+setWebSettingsFantasyFontFamily obj val = liftIO $ setObjectPropertyString obj "fantasy-font-family" val++constructWebSettingsFantasyFontFamily :: T.Text -> IO ([Char], GValue)+constructWebSettingsFantasyFontFamily val = constructObjectPropertyString "fantasy-font-family" val++data WebSettingsFantasyFontFamilyPropertyInfo+instance AttrInfo WebSettingsFantasyFontFamilyPropertyInfo where+ type AttrAllowedOps WebSettingsFantasyFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsFantasyFontFamilyPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebSettingsFantasyFontFamilyPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsFantasyFontFamilyPropertyInfo = T.Text+ type AttrLabel WebSettingsFantasyFontFamilyPropertyInfo = "WebSettings::fantasy-font-family"+ attrGet _ = getWebSettingsFantasyFontFamily+ attrSet _ = setWebSettingsFantasyFontFamily+ attrConstruct _ = constructWebSettingsFantasyFontFamily++-- VVV Prop "html5-local-storage-database-path"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsHtml5LocalStorageDatabasePath :: (MonadIO m, WebSettingsK o) => o -> m T.Text+getWebSettingsHtml5LocalStorageDatabasePath obj = liftIO $ getObjectPropertyString obj "html5-local-storage-database-path"++setWebSettingsHtml5LocalStorageDatabasePath :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()+setWebSettingsHtml5LocalStorageDatabasePath obj val = liftIO $ setObjectPropertyString obj "html5-local-storage-database-path" val++constructWebSettingsHtml5LocalStorageDatabasePath :: T.Text -> IO ([Char], GValue)+constructWebSettingsHtml5LocalStorageDatabasePath val = constructObjectPropertyString "html5-local-storage-database-path" val++data WebSettingsHtml5LocalStorageDatabasePathPropertyInfo+instance AttrInfo WebSettingsHtml5LocalStorageDatabasePathPropertyInfo where+ type AttrAllowedOps WebSettingsHtml5LocalStorageDatabasePathPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsHtml5LocalStorageDatabasePathPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebSettingsHtml5LocalStorageDatabasePathPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsHtml5LocalStorageDatabasePathPropertyInfo = T.Text+ type AttrLabel WebSettingsHtml5LocalStorageDatabasePathPropertyInfo = "WebSettings::html5-local-storage-database-path"+ attrGet _ = getWebSettingsHtml5LocalStorageDatabasePath+ attrSet _ = setWebSettingsHtml5LocalStorageDatabasePath+ attrConstruct _ = constructWebSettingsHtml5LocalStorageDatabasePath++-- VVV Prop "javascript-can-access-clipboard"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsJavascriptCanAccessClipboard :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsJavascriptCanAccessClipboard obj = liftIO $ getObjectPropertyBool obj "javascript-can-access-clipboard"++setWebSettingsJavascriptCanAccessClipboard :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsJavascriptCanAccessClipboard obj val = liftIO $ setObjectPropertyBool obj "javascript-can-access-clipboard" val++constructWebSettingsJavascriptCanAccessClipboard :: Bool -> IO ([Char], GValue)+constructWebSettingsJavascriptCanAccessClipboard val = constructObjectPropertyBool "javascript-can-access-clipboard" val++data WebSettingsJavascriptCanAccessClipboardPropertyInfo+instance AttrInfo WebSettingsJavascriptCanAccessClipboardPropertyInfo where+ type AttrAllowedOps WebSettingsJavascriptCanAccessClipboardPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsJavascriptCanAccessClipboardPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsJavascriptCanAccessClipboardPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsJavascriptCanAccessClipboardPropertyInfo = Bool+ type AttrLabel WebSettingsJavascriptCanAccessClipboardPropertyInfo = "WebSettings::javascript-can-access-clipboard"+ attrGet _ = getWebSettingsJavascriptCanAccessClipboard+ attrSet _ = setWebSettingsJavascriptCanAccessClipboard+ attrConstruct _ = constructWebSettingsJavascriptCanAccessClipboard++-- VVV Prop "javascript-can-open-windows-automatically"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsJavascriptCanOpenWindowsAutomatically :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsJavascriptCanOpenWindowsAutomatically obj = liftIO $ getObjectPropertyBool obj "javascript-can-open-windows-automatically"++setWebSettingsJavascriptCanOpenWindowsAutomatically :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsJavascriptCanOpenWindowsAutomatically obj val = liftIO $ setObjectPropertyBool obj "javascript-can-open-windows-automatically" val++constructWebSettingsJavascriptCanOpenWindowsAutomatically :: Bool -> IO ([Char], GValue)+constructWebSettingsJavascriptCanOpenWindowsAutomatically val = constructObjectPropertyBool "javascript-can-open-windows-automatically" val++data WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo+instance AttrInfo WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo where+ type AttrAllowedOps WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = Bool+ type AttrLabel WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = "WebSettings::javascript-can-open-windows-automatically"+ attrGet _ = getWebSettingsJavascriptCanOpenWindowsAutomatically+ attrSet _ = setWebSettingsJavascriptCanOpenWindowsAutomatically+ attrConstruct _ = constructWebSettingsJavascriptCanOpenWindowsAutomatically++-- VVV Prop "media-playback-allows-inline"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsMediaPlaybackAllowsInline :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsMediaPlaybackAllowsInline obj = liftIO $ getObjectPropertyBool obj "media-playback-allows-inline"++setWebSettingsMediaPlaybackAllowsInline :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsMediaPlaybackAllowsInline obj val = liftIO $ setObjectPropertyBool obj "media-playback-allows-inline" val++constructWebSettingsMediaPlaybackAllowsInline :: Bool -> IO ([Char], GValue)+constructWebSettingsMediaPlaybackAllowsInline val = constructObjectPropertyBool "media-playback-allows-inline" val++data WebSettingsMediaPlaybackAllowsInlinePropertyInfo+instance AttrInfo WebSettingsMediaPlaybackAllowsInlinePropertyInfo where+ type AttrAllowedOps WebSettingsMediaPlaybackAllowsInlinePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsMediaPlaybackAllowsInlinePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsMediaPlaybackAllowsInlinePropertyInfo = WebSettingsK+ type AttrGetType WebSettingsMediaPlaybackAllowsInlinePropertyInfo = Bool+ type AttrLabel WebSettingsMediaPlaybackAllowsInlinePropertyInfo = "WebSettings::media-playback-allows-inline"+ attrGet _ = getWebSettingsMediaPlaybackAllowsInline+ attrSet _ = setWebSettingsMediaPlaybackAllowsInline+ attrConstruct _ = constructWebSettingsMediaPlaybackAllowsInline++-- VVV Prop "media-playback-requires-user-gesture"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsMediaPlaybackRequiresUserGesture :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsMediaPlaybackRequiresUserGesture obj = liftIO $ getObjectPropertyBool obj "media-playback-requires-user-gesture"++setWebSettingsMediaPlaybackRequiresUserGesture :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsMediaPlaybackRequiresUserGesture obj val = liftIO $ setObjectPropertyBool obj "media-playback-requires-user-gesture" val++constructWebSettingsMediaPlaybackRequiresUserGesture :: Bool -> IO ([Char], GValue)+constructWebSettingsMediaPlaybackRequiresUserGesture val = constructObjectPropertyBool "media-playback-requires-user-gesture" val++data WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo+instance AttrInfo WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo where+ type AttrAllowedOps WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo = WebSettingsK+ type AttrGetType WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo = Bool+ type AttrLabel WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo = "WebSettings::media-playback-requires-user-gesture"+ attrGet _ = getWebSettingsMediaPlaybackRequiresUserGesture+ attrSet _ = setWebSettingsMediaPlaybackRequiresUserGesture+ attrConstruct _ = constructWebSettingsMediaPlaybackRequiresUserGesture++-- VVV Prop "minimum-font-size"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsMinimumFontSize :: (MonadIO m, WebSettingsK o) => o -> m Int32+getWebSettingsMinimumFontSize obj = liftIO $ getObjectPropertyCInt obj "minimum-font-size"++setWebSettingsMinimumFontSize :: (MonadIO m, WebSettingsK o) => o -> Int32 -> m ()+setWebSettingsMinimumFontSize obj val = liftIO $ setObjectPropertyCInt obj "minimum-font-size" val++constructWebSettingsMinimumFontSize :: Int32 -> IO ([Char], GValue)+constructWebSettingsMinimumFontSize val = constructObjectPropertyCInt "minimum-font-size" val++data WebSettingsMinimumFontSizePropertyInfo+instance AttrInfo WebSettingsMinimumFontSizePropertyInfo where+ type AttrAllowedOps WebSettingsMinimumFontSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsMinimumFontSizePropertyInfo = (~) Int32+ type AttrBaseTypeConstraint WebSettingsMinimumFontSizePropertyInfo = WebSettingsK+ type AttrGetType WebSettingsMinimumFontSizePropertyInfo = Int32+ type AttrLabel WebSettingsMinimumFontSizePropertyInfo = "WebSettings::minimum-font-size"+ attrGet _ = getWebSettingsMinimumFontSize+ attrSet _ = setWebSettingsMinimumFontSize+ attrConstruct _ = constructWebSettingsMinimumFontSize++-- VVV Prop "minimum-logical-font-size"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsMinimumLogicalFontSize :: (MonadIO m, WebSettingsK o) => o -> m Int32+getWebSettingsMinimumLogicalFontSize obj = liftIO $ getObjectPropertyCInt obj "minimum-logical-font-size"++setWebSettingsMinimumLogicalFontSize :: (MonadIO m, WebSettingsK o) => o -> Int32 -> m ()+setWebSettingsMinimumLogicalFontSize obj val = liftIO $ setObjectPropertyCInt obj "minimum-logical-font-size" val++constructWebSettingsMinimumLogicalFontSize :: Int32 -> IO ([Char], GValue)+constructWebSettingsMinimumLogicalFontSize val = constructObjectPropertyCInt "minimum-logical-font-size" val++data WebSettingsMinimumLogicalFontSizePropertyInfo+instance AttrInfo WebSettingsMinimumLogicalFontSizePropertyInfo where+ type AttrAllowedOps WebSettingsMinimumLogicalFontSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsMinimumLogicalFontSizePropertyInfo = (~) Int32+ type AttrBaseTypeConstraint WebSettingsMinimumLogicalFontSizePropertyInfo = WebSettingsK+ type AttrGetType WebSettingsMinimumLogicalFontSizePropertyInfo = Int32+ type AttrLabel WebSettingsMinimumLogicalFontSizePropertyInfo = "WebSettings::minimum-logical-font-size"+ attrGet _ = getWebSettingsMinimumLogicalFontSize+ attrSet _ = setWebSettingsMinimumLogicalFontSize+ attrConstruct _ = constructWebSettingsMinimumLogicalFontSize++-- VVV Prop "monospace-font-family"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsMonospaceFontFamily :: (MonadIO m, WebSettingsK o) => o -> m T.Text+getWebSettingsMonospaceFontFamily obj = liftIO $ getObjectPropertyString obj "monospace-font-family"++setWebSettingsMonospaceFontFamily :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()+setWebSettingsMonospaceFontFamily obj val = liftIO $ setObjectPropertyString obj "monospace-font-family" val++constructWebSettingsMonospaceFontFamily :: T.Text -> IO ([Char], GValue)+constructWebSettingsMonospaceFontFamily val = constructObjectPropertyString "monospace-font-family" val++data WebSettingsMonospaceFontFamilyPropertyInfo+instance AttrInfo WebSettingsMonospaceFontFamilyPropertyInfo where+ type AttrAllowedOps WebSettingsMonospaceFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsMonospaceFontFamilyPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebSettingsMonospaceFontFamilyPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsMonospaceFontFamilyPropertyInfo = T.Text+ type AttrLabel WebSettingsMonospaceFontFamilyPropertyInfo = "WebSettings::monospace-font-family"+ attrGet _ = getWebSettingsMonospaceFontFamily+ attrSet _ = setWebSettingsMonospaceFontFamily+ attrConstruct _ = constructWebSettingsMonospaceFontFamily++-- VVV Prop "print-backgrounds"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsPrintBackgrounds :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsPrintBackgrounds obj = liftIO $ getObjectPropertyBool obj "print-backgrounds"++setWebSettingsPrintBackgrounds :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsPrintBackgrounds obj val = liftIO $ setObjectPropertyBool obj "print-backgrounds" val++constructWebSettingsPrintBackgrounds :: Bool -> IO ([Char], GValue)+constructWebSettingsPrintBackgrounds val = constructObjectPropertyBool "print-backgrounds" val++data WebSettingsPrintBackgroundsPropertyInfo+instance AttrInfo WebSettingsPrintBackgroundsPropertyInfo where+ type AttrAllowedOps WebSettingsPrintBackgroundsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsPrintBackgroundsPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsPrintBackgroundsPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsPrintBackgroundsPropertyInfo = Bool+ type AttrLabel WebSettingsPrintBackgroundsPropertyInfo = "WebSettings::print-backgrounds"+ attrGet _ = getWebSettingsPrintBackgrounds+ attrSet _ = setWebSettingsPrintBackgrounds+ attrConstruct _ = constructWebSettingsPrintBackgrounds++-- VVV Prop "resizable-text-areas"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsResizableTextAreas :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsResizableTextAreas obj = liftIO $ getObjectPropertyBool obj "resizable-text-areas"++setWebSettingsResizableTextAreas :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsResizableTextAreas obj val = liftIO $ setObjectPropertyBool obj "resizable-text-areas" val++constructWebSettingsResizableTextAreas :: Bool -> IO ([Char], GValue)+constructWebSettingsResizableTextAreas val = constructObjectPropertyBool "resizable-text-areas" val++data WebSettingsResizableTextAreasPropertyInfo+instance AttrInfo WebSettingsResizableTextAreasPropertyInfo where+ type AttrAllowedOps WebSettingsResizableTextAreasPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsResizableTextAreasPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsResizableTextAreasPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsResizableTextAreasPropertyInfo = Bool+ type AttrLabel WebSettingsResizableTextAreasPropertyInfo = "WebSettings::resizable-text-areas"+ attrGet _ = getWebSettingsResizableTextAreas+ attrSet _ = setWebSettingsResizableTextAreas+ attrConstruct _ = constructWebSettingsResizableTextAreas++-- VVV Prop "respect-image-orientation"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsRespectImageOrientation :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsRespectImageOrientation obj = liftIO $ getObjectPropertyBool obj "respect-image-orientation"++setWebSettingsRespectImageOrientation :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsRespectImageOrientation obj val = liftIO $ setObjectPropertyBool obj "respect-image-orientation" val++constructWebSettingsRespectImageOrientation :: Bool -> IO ([Char], GValue)+constructWebSettingsRespectImageOrientation val = constructObjectPropertyBool "respect-image-orientation" val++data WebSettingsRespectImageOrientationPropertyInfo+instance AttrInfo WebSettingsRespectImageOrientationPropertyInfo where+ type AttrAllowedOps WebSettingsRespectImageOrientationPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsRespectImageOrientationPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsRespectImageOrientationPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsRespectImageOrientationPropertyInfo = Bool+ type AttrLabel WebSettingsRespectImageOrientationPropertyInfo = "WebSettings::respect-image-orientation"+ attrGet _ = getWebSettingsRespectImageOrientation+ attrSet _ = setWebSettingsRespectImageOrientation+ attrConstruct _ = constructWebSettingsRespectImageOrientation++-- VVV Prop "sans-serif-font-family"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsSansSerifFontFamily :: (MonadIO m, WebSettingsK o) => o -> m T.Text+getWebSettingsSansSerifFontFamily obj = liftIO $ getObjectPropertyString obj "sans-serif-font-family"++setWebSettingsSansSerifFontFamily :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()+setWebSettingsSansSerifFontFamily obj val = liftIO $ setObjectPropertyString obj "sans-serif-font-family" val++constructWebSettingsSansSerifFontFamily :: T.Text -> IO ([Char], GValue)+constructWebSettingsSansSerifFontFamily val = constructObjectPropertyString "sans-serif-font-family" val++data WebSettingsSansSerifFontFamilyPropertyInfo+instance AttrInfo WebSettingsSansSerifFontFamilyPropertyInfo where+ type AttrAllowedOps WebSettingsSansSerifFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsSansSerifFontFamilyPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebSettingsSansSerifFontFamilyPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsSansSerifFontFamilyPropertyInfo = T.Text+ type AttrLabel WebSettingsSansSerifFontFamilyPropertyInfo = "WebSettings::sans-serif-font-family"+ attrGet _ = getWebSettingsSansSerifFontFamily+ attrSet _ = setWebSettingsSansSerifFontFamily+ attrConstruct _ = constructWebSettingsSansSerifFontFamily++-- VVV Prop "serif-font-family"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsSerifFontFamily :: (MonadIO m, WebSettingsK o) => o -> m T.Text+getWebSettingsSerifFontFamily obj = liftIO $ getObjectPropertyString obj "serif-font-family"++setWebSettingsSerifFontFamily :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()+setWebSettingsSerifFontFamily obj val = liftIO $ setObjectPropertyString obj "serif-font-family" val++constructWebSettingsSerifFontFamily :: T.Text -> IO ([Char], GValue)+constructWebSettingsSerifFontFamily val = constructObjectPropertyString "serif-font-family" val++data WebSettingsSerifFontFamilyPropertyInfo+instance AttrInfo WebSettingsSerifFontFamilyPropertyInfo where+ type AttrAllowedOps WebSettingsSerifFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsSerifFontFamilyPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebSettingsSerifFontFamilyPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsSerifFontFamilyPropertyInfo = T.Text+ type AttrLabel WebSettingsSerifFontFamilyPropertyInfo = "WebSettings::serif-font-family"+ attrGet _ = getWebSettingsSerifFontFamily+ attrSet _ = setWebSettingsSerifFontFamily+ attrConstruct _ = constructWebSettingsSerifFontFamily++-- VVV Prop "spell-checking-languages"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsSpellCheckingLanguages :: (MonadIO m, WebSettingsK o) => o -> m T.Text+getWebSettingsSpellCheckingLanguages obj = liftIO $ getObjectPropertyString obj "spell-checking-languages"++setWebSettingsSpellCheckingLanguages :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()+setWebSettingsSpellCheckingLanguages obj val = liftIO $ setObjectPropertyString obj "spell-checking-languages" val++constructWebSettingsSpellCheckingLanguages :: T.Text -> IO ([Char], GValue)+constructWebSettingsSpellCheckingLanguages val = constructObjectPropertyString "spell-checking-languages" val++data WebSettingsSpellCheckingLanguagesPropertyInfo+instance AttrInfo WebSettingsSpellCheckingLanguagesPropertyInfo where+ type AttrAllowedOps WebSettingsSpellCheckingLanguagesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsSpellCheckingLanguagesPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebSettingsSpellCheckingLanguagesPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsSpellCheckingLanguagesPropertyInfo = T.Text+ type AttrLabel WebSettingsSpellCheckingLanguagesPropertyInfo = "WebSettings::spell-checking-languages"+ attrGet _ = getWebSettingsSpellCheckingLanguages+ attrSet _ = setWebSettingsSpellCheckingLanguages+ attrConstruct _ = constructWebSettingsSpellCheckingLanguages++-- VVV Prop "tab-key-cycles-through-elements"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsTabKeyCyclesThroughElements :: (MonadIO m, WebSettingsK o) => o -> m Bool+getWebSettingsTabKeyCyclesThroughElements obj = liftIO $ getObjectPropertyBool obj "tab-key-cycles-through-elements"++setWebSettingsTabKeyCyclesThroughElements :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()+setWebSettingsTabKeyCyclesThroughElements obj val = liftIO $ setObjectPropertyBool obj "tab-key-cycles-through-elements" val++constructWebSettingsTabKeyCyclesThroughElements :: Bool -> IO ([Char], GValue)+constructWebSettingsTabKeyCyclesThroughElements val = constructObjectPropertyBool "tab-key-cycles-through-elements" val++data WebSettingsTabKeyCyclesThroughElementsPropertyInfo+instance AttrInfo WebSettingsTabKeyCyclesThroughElementsPropertyInfo where+ type AttrAllowedOps WebSettingsTabKeyCyclesThroughElementsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsTabKeyCyclesThroughElementsPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebSettingsTabKeyCyclesThroughElementsPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsTabKeyCyclesThroughElementsPropertyInfo = Bool+ type AttrLabel WebSettingsTabKeyCyclesThroughElementsPropertyInfo = "WebSettings::tab-key-cycles-through-elements"+ attrGet _ = getWebSettingsTabKeyCyclesThroughElements+ attrSet _ = setWebSettingsTabKeyCyclesThroughElements+ attrConstruct _ = constructWebSettingsTabKeyCyclesThroughElements++-- VVV Prop "user-agent"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsUserAgent :: (MonadIO m, WebSettingsK o) => o -> m T.Text+getWebSettingsUserAgent obj = liftIO $ getObjectPropertyString obj "user-agent"++setWebSettingsUserAgent :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()+setWebSettingsUserAgent obj val = liftIO $ setObjectPropertyString obj "user-agent" val++constructWebSettingsUserAgent :: T.Text -> IO ([Char], GValue)+constructWebSettingsUserAgent val = constructObjectPropertyString "user-agent" val++data WebSettingsUserAgentPropertyInfo+instance AttrInfo WebSettingsUserAgentPropertyInfo where+ type AttrAllowedOps WebSettingsUserAgentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsUserAgentPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebSettingsUserAgentPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsUserAgentPropertyInfo = T.Text+ type AttrLabel WebSettingsUserAgentPropertyInfo = "WebSettings::user-agent"+ attrGet _ = getWebSettingsUserAgent+ attrSet _ = setWebSettingsUserAgent+ attrConstruct _ = constructWebSettingsUserAgent++-- VVV Prop "user-stylesheet-uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsUserStylesheetUri :: (MonadIO m, WebSettingsK o) => o -> m T.Text+getWebSettingsUserStylesheetUri obj = liftIO $ getObjectPropertyString obj "user-stylesheet-uri"++setWebSettingsUserStylesheetUri :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()+setWebSettingsUserStylesheetUri obj val = liftIO $ setObjectPropertyString obj "user-stylesheet-uri" val++constructWebSettingsUserStylesheetUri :: T.Text -> IO ([Char], GValue)+constructWebSettingsUserStylesheetUri val = constructObjectPropertyString "user-stylesheet-uri" val++data WebSettingsUserStylesheetUriPropertyInfo+instance AttrInfo WebSettingsUserStylesheetUriPropertyInfo where+ type AttrAllowedOps WebSettingsUserStylesheetUriPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsUserStylesheetUriPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebSettingsUserStylesheetUriPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsUserStylesheetUriPropertyInfo = T.Text+ type AttrLabel WebSettingsUserStylesheetUriPropertyInfo = "WebSettings::user-stylesheet-uri"+ attrGet _ = getWebSettingsUserStylesheetUri+ attrSet _ = setWebSettingsUserStylesheetUri+ attrConstruct _ = constructWebSettingsUserStylesheetUri++-- VVV Prop "zoom-step"+ -- Type: TBasicType TFloat+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebSettingsZoomStep :: (MonadIO m, WebSettingsK o) => o -> m Float+getWebSettingsZoomStep obj = liftIO $ getObjectPropertyFloat obj "zoom-step"++setWebSettingsZoomStep :: (MonadIO m, WebSettingsK o) => o -> Float -> m ()+setWebSettingsZoomStep obj val = liftIO $ setObjectPropertyFloat obj "zoom-step" val++constructWebSettingsZoomStep :: Float -> IO ([Char], GValue)+constructWebSettingsZoomStep val = constructObjectPropertyFloat "zoom-step" val++data WebSettingsZoomStepPropertyInfo+instance AttrInfo WebSettingsZoomStepPropertyInfo where+ type AttrAllowedOps WebSettingsZoomStepPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebSettingsZoomStepPropertyInfo = (~) Float+ type AttrBaseTypeConstraint WebSettingsZoomStepPropertyInfo = WebSettingsK+ type AttrGetType WebSettingsZoomStepPropertyInfo = Float+ type AttrLabel WebSettingsZoomStepPropertyInfo = "WebSettings::zoom-step"+ attrGet _ = getWebSettingsZoomStep+ attrSet _ = setWebSettingsZoomStep+ attrConstruct _ = constructWebSettingsZoomStep++type instance AttributeList WebSettings = '[ '("auto-load-images", WebSettingsAutoLoadImagesPropertyInfo), '("auto-resize-window", WebSettingsAutoResizeWindowPropertyInfo), '("auto-shrink-images", WebSettingsAutoShrinkImagesPropertyInfo), '("cursive-font-family", WebSettingsCursiveFontFamilyPropertyInfo), '("default-encoding", WebSettingsDefaultEncodingPropertyInfo), '("default-font-family", WebSettingsDefaultFontFamilyPropertyInfo), '("default-font-size", WebSettingsDefaultFontSizePropertyInfo), '("default-monospace-font-size", WebSettingsDefaultMonospaceFontSizePropertyInfo), '("editing-behavior", WebSettingsEditingBehaviorPropertyInfo), '("enable-accelerated-compositing", WebSettingsEnableAcceleratedCompositingPropertyInfo), '("enable-caret-browsing", WebSettingsEnableCaretBrowsingPropertyInfo), '("enable-default-context-menu", WebSettingsEnableDefaultContextMenuPropertyInfo), '("enable-developer-extras", WebSettingsEnableDeveloperExtrasPropertyInfo), '("enable-display-of-insecure-content", WebSettingsEnableDisplayOfInsecureContentPropertyInfo), '("enable-dns-prefetching", WebSettingsEnableDnsPrefetchingPropertyInfo), '("enable-dom-paste", WebSettingsEnableDomPastePropertyInfo), '("enable-file-access-from-file-uris", WebSettingsEnableFileAccessFromFileUrisPropertyInfo), '("enable-frame-flattening", WebSettingsEnableFrameFlatteningPropertyInfo), '("enable-fullscreen", WebSettingsEnableFullscreenPropertyInfo), '("enable-html5-database", WebSettingsEnableHtml5DatabasePropertyInfo), '("enable-html5-local-storage", WebSettingsEnableHtml5LocalStoragePropertyInfo), '("enable-hyperlink-auditing", WebSettingsEnableHyperlinkAuditingPropertyInfo), '("enable-java-applet", WebSettingsEnableJavaAppletPropertyInfo), '("enable-media-stream", WebSettingsEnableMediaStreamPropertyInfo), '("enable-mediasource", WebSettingsEnableMediasourcePropertyInfo), '("enable-offline-web-application-cache", WebSettingsEnableOfflineWebApplicationCachePropertyInfo), '("enable-page-cache", WebSettingsEnablePageCachePropertyInfo), '("enable-plugins", WebSettingsEnablePluginsPropertyInfo), '("enable-private-browsing", WebSettingsEnablePrivateBrowsingPropertyInfo), '("enable-running-of-insecure-content", WebSettingsEnableRunningOfInsecureContentPropertyInfo), '("enable-scripts", WebSettingsEnableScriptsPropertyInfo), '("enable-site-specific-quirks", WebSettingsEnableSiteSpecificQuirksPropertyInfo), '("enable-smooth-scrolling", WebSettingsEnableSmoothScrollingPropertyInfo), '("enable-spatial-navigation", WebSettingsEnableSpatialNavigationPropertyInfo), '("enable-spell-checking", WebSettingsEnableSpellCheckingPropertyInfo), '("enable-universal-access-from-file-uris", WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo), '("enable-webaudio", WebSettingsEnableWebaudioPropertyInfo), '("enable-webgl", WebSettingsEnableWebglPropertyInfo), '("enable-xss-auditor", WebSettingsEnableXssAuditorPropertyInfo), '("enforce-96-dpi", WebSettingsEnforce96DpiPropertyInfo), '("fantasy-font-family", WebSettingsFantasyFontFamilyPropertyInfo), '("html5-local-storage-database-path", WebSettingsHtml5LocalStorageDatabasePathPropertyInfo), '("javascript-can-access-clipboard", WebSettingsJavascriptCanAccessClipboardPropertyInfo), '("javascript-can-open-windows-automatically", WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo), '("media-playback-allows-inline", WebSettingsMediaPlaybackAllowsInlinePropertyInfo), '("media-playback-requires-user-gesture", WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo), '("minimum-font-size", WebSettingsMinimumFontSizePropertyInfo), '("minimum-logical-font-size", WebSettingsMinimumLogicalFontSizePropertyInfo), '("monospace-font-family", WebSettingsMonospaceFontFamilyPropertyInfo), '("print-backgrounds", WebSettingsPrintBackgroundsPropertyInfo), '("resizable-text-areas", WebSettingsResizableTextAreasPropertyInfo), '("respect-image-orientation", WebSettingsRespectImageOrientationPropertyInfo), '("sans-serif-font-family", WebSettingsSansSerifFontFamilyPropertyInfo), '("serif-font-family", WebSettingsSerifFontFamilyPropertyInfo), '("spell-checking-languages", WebSettingsSpellCheckingLanguagesPropertyInfo), '("tab-key-cycles-through-elements", WebSettingsTabKeyCyclesThroughElementsPropertyInfo), '("user-agent", WebSettingsUserAgentPropertyInfo), '("user-stylesheet-uri", WebSettingsUserStylesheetUriPropertyInfo), '("zoom-step", WebSettingsZoomStepPropertyInfo)]++-- VVV Prop "copy-target-list"+ -- Type: TInterface "Gtk" "TargetList"+ -- Flags: [PropertyReadable]++getWebViewCopyTargetList :: (MonadIO m, WebViewK o) => o -> m Gtk.TargetList+getWebViewCopyTargetList obj = liftIO $ getObjectPropertyBoxed obj "copy-target-list" Gtk.TargetList++data WebViewCopyTargetListPropertyInfo+instance AttrInfo WebViewCopyTargetListPropertyInfo where+ type AttrAllowedOps WebViewCopyTargetListPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebViewCopyTargetListPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebViewCopyTargetListPropertyInfo = WebViewK+ type AttrGetType WebViewCopyTargetListPropertyInfo = Gtk.TargetList+ type AttrLabel WebViewCopyTargetListPropertyInfo = "WebView::copy-target-list"+ attrGet _ = getWebViewCopyTargetList+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "custom-encoding"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable,PropertyWritable]++getWebViewCustomEncoding :: (MonadIO m, WebViewK o) => o -> m T.Text+getWebViewCustomEncoding obj = liftIO $ getObjectPropertyString obj "custom-encoding"++setWebViewCustomEncoding :: (MonadIO m, WebViewK o) => o -> T.Text -> m ()+setWebViewCustomEncoding obj val = liftIO $ setObjectPropertyString obj "custom-encoding" val++constructWebViewCustomEncoding :: T.Text -> IO ([Char], GValue)+constructWebViewCustomEncoding val = constructObjectPropertyString "custom-encoding" val++data WebViewCustomEncodingPropertyInfo+instance AttrInfo WebViewCustomEncodingPropertyInfo where+ type AttrAllowedOps WebViewCustomEncodingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebViewCustomEncodingPropertyInfo = (~) T.Text+ type AttrBaseTypeConstraint WebViewCustomEncodingPropertyInfo = WebViewK+ type AttrGetType WebViewCustomEncodingPropertyInfo = T.Text+ type AttrLabel WebViewCustomEncodingPropertyInfo = "WebView::custom-encoding"+ attrGet _ = getWebViewCustomEncoding+ attrSet _ = setWebViewCustomEncoding+ attrConstruct _ = constructWebViewCustomEncoding++-- VVV Prop "editable"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getWebViewEditable :: (MonadIO m, WebViewK o) => o -> m Bool+getWebViewEditable obj = liftIO $ getObjectPropertyBool obj "editable"++setWebViewEditable :: (MonadIO m, WebViewK o) => o -> Bool -> m ()+setWebViewEditable obj val = liftIO $ setObjectPropertyBool obj "editable" val++constructWebViewEditable :: Bool -> IO ([Char], GValue)+constructWebViewEditable val = constructObjectPropertyBool "editable" val++data WebViewEditablePropertyInfo+instance AttrInfo WebViewEditablePropertyInfo where+ type AttrAllowedOps WebViewEditablePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebViewEditablePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebViewEditablePropertyInfo = WebViewK+ type AttrGetType WebViewEditablePropertyInfo = Bool+ type AttrLabel WebViewEditablePropertyInfo = "WebView::editable"+ attrGet _ = getWebViewEditable+ attrSet _ = setWebViewEditable+ attrConstruct _ = constructWebViewEditable++-- VVV Prop "encoding"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getWebViewEncoding :: (MonadIO m, WebViewK o) => o -> m T.Text+getWebViewEncoding obj = liftIO $ getObjectPropertyString obj "encoding"++data WebViewEncodingPropertyInfo+instance AttrInfo WebViewEncodingPropertyInfo where+ type AttrAllowedOps WebViewEncodingPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebViewEncodingPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebViewEncodingPropertyInfo = WebViewK+ type AttrGetType WebViewEncodingPropertyInfo = T.Text+ type AttrLabel WebViewEncodingPropertyInfo = "WebView::encoding"+ attrGet _ = getWebViewEncoding+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "full-content-zoom"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getWebViewFullContentZoom :: (MonadIO m, WebViewK o) => o -> m Bool+getWebViewFullContentZoom obj = liftIO $ getObjectPropertyBool obj "full-content-zoom"++setWebViewFullContentZoom :: (MonadIO m, WebViewK o) => o -> Bool -> m ()+setWebViewFullContentZoom obj val = liftIO $ setObjectPropertyBool obj "full-content-zoom" val++constructWebViewFullContentZoom :: Bool -> IO ([Char], GValue)+constructWebViewFullContentZoom val = constructObjectPropertyBool "full-content-zoom" val++data WebViewFullContentZoomPropertyInfo+instance AttrInfo WebViewFullContentZoomPropertyInfo where+ type AttrAllowedOps WebViewFullContentZoomPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebViewFullContentZoomPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebViewFullContentZoomPropertyInfo = WebViewK+ type AttrGetType WebViewFullContentZoomPropertyInfo = Bool+ type AttrLabel WebViewFullContentZoomPropertyInfo = "WebView::full-content-zoom"+ attrGet _ = getWebViewFullContentZoom+ attrSet _ = setWebViewFullContentZoom+ attrConstruct _ = constructWebViewFullContentZoom++-- VVV Prop "icon-uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getWebViewIconUri :: (MonadIO m, WebViewK o) => o -> m T.Text+getWebViewIconUri obj = liftIO $ getObjectPropertyString obj "icon-uri"++data WebViewIconUriPropertyInfo+instance AttrInfo WebViewIconUriPropertyInfo where+ type AttrAllowedOps WebViewIconUriPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebViewIconUriPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebViewIconUriPropertyInfo = WebViewK+ type AttrGetType WebViewIconUriPropertyInfo = T.Text+ type AttrLabel WebViewIconUriPropertyInfo = "WebView::icon-uri"+ attrGet _ = getWebViewIconUri+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "im-context"+ -- Type: TInterface "Gtk" "IMContext"+ -- Flags: [PropertyReadable]++getWebViewImContext :: (MonadIO m, WebViewK o) => o -> m Gtk.IMContext+getWebViewImContext obj = liftIO $ getObjectPropertyObject obj "im-context" Gtk.IMContext++data WebViewImContextPropertyInfo+instance AttrInfo WebViewImContextPropertyInfo where+ type AttrAllowedOps WebViewImContextPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebViewImContextPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebViewImContextPropertyInfo = WebViewK+ type AttrGetType WebViewImContextPropertyInfo = Gtk.IMContext+ type AttrLabel WebViewImContextPropertyInfo = "WebView::im-context"+ attrGet _ = getWebViewImContext+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "load-status"+ -- Type: TInterface "WebKit" "LoadStatus"+ -- Flags: [PropertyReadable]++getWebViewLoadStatus :: (MonadIO m, WebViewK o) => o -> m LoadStatus+getWebViewLoadStatus obj = liftIO $ getObjectPropertyEnum obj "load-status"++data WebViewLoadStatusPropertyInfo+instance AttrInfo WebViewLoadStatusPropertyInfo where+ type AttrAllowedOps WebViewLoadStatusPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebViewLoadStatusPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebViewLoadStatusPropertyInfo = WebViewK+ type AttrGetType WebViewLoadStatusPropertyInfo = LoadStatus+ type AttrLabel WebViewLoadStatusPropertyInfo = "WebView::load-status"+ attrGet _ = getWebViewLoadStatus+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "paste-target-list"+ -- Type: TInterface "Gtk" "TargetList"+ -- Flags: [PropertyReadable]++getWebViewPasteTargetList :: (MonadIO m, WebViewK o) => o -> m Gtk.TargetList+getWebViewPasteTargetList obj = liftIO $ getObjectPropertyBoxed obj "paste-target-list" Gtk.TargetList++data WebViewPasteTargetListPropertyInfo+instance AttrInfo WebViewPasteTargetListPropertyInfo where+ type AttrAllowedOps WebViewPasteTargetListPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebViewPasteTargetListPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebViewPasteTargetListPropertyInfo = WebViewK+ type AttrGetType WebViewPasteTargetListPropertyInfo = Gtk.TargetList+ type AttrLabel WebViewPasteTargetListPropertyInfo = "WebView::paste-target-list"+ attrGet _ = getWebViewPasteTargetList+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "progress"+ -- Type: TBasicType TDouble+ -- Flags: [PropertyReadable]++getWebViewProgress :: (MonadIO m, WebViewK o) => o -> m Double+getWebViewProgress obj = liftIO $ getObjectPropertyDouble obj "progress"++data WebViewProgressPropertyInfo+instance AttrInfo WebViewProgressPropertyInfo where+ type AttrAllowedOps WebViewProgressPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebViewProgressPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebViewProgressPropertyInfo = WebViewK+ type AttrGetType WebViewProgressPropertyInfo = Double+ type AttrLabel WebViewProgressPropertyInfo = "WebView::progress"+ attrGet _ = getWebViewProgress+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "self-scrolling"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]++getWebViewSelfScrolling :: (MonadIO m, WebViewK o) => o -> m Bool+getWebViewSelfScrolling obj = liftIO $ getObjectPropertyBool obj "self-scrolling"++constructWebViewSelfScrolling :: Bool -> IO ([Char], GValue)+constructWebViewSelfScrolling val = constructObjectPropertyBool "self-scrolling" val++data WebViewSelfScrollingPropertyInfo+instance AttrInfo WebViewSelfScrollingPropertyInfo where+ type AttrAllowedOps WebViewSelfScrollingPropertyInfo = '[ 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebViewSelfScrollingPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebViewSelfScrollingPropertyInfo = WebViewK+ type AttrGetType WebViewSelfScrollingPropertyInfo = Bool+ type AttrLabel WebViewSelfScrollingPropertyInfo = "WebView::self-scrolling"+ attrGet _ = getWebViewSelfScrolling+ attrSet _ = undefined+ attrConstruct _ = constructWebViewSelfScrolling++-- VVV Prop "settings"+ -- Type: TInterface "WebKit" "WebSettings"+ -- Flags: [PropertyReadable,PropertyWritable]++getWebViewSettings :: (MonadIO m, WebViewK o) => o -> m WebSettings+getWebViewSettings obj = liftIO $ getObjectPropertyObject obj "settings" WebSettings++setWebViewSettings :: (MonadIO m, WebViewK o, WebSettingsK a) => o -> a -> m ()+setWebViewSettings obj val = liftIO $ setObjectPropertyObject obj "settings" val++constructWebViewSettings :: (WebSettingsK a) => a -> IO ([Char], GValue)+constructWebViewSettings val = constructObjectPropertyObject "settings" val++data WebViewSettingsPropertyInfo+instance AttrInfo WebViewSettingsPropertyInfo where+ type AttrAllowedOps WebViewSettingsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebViewSettingsPropertyInfo = WebSettingsK+ type AttrBaseTypeConstraint WebViewSettingsPropertyInfo = WebViewK+ type AttrGetType WebViewSettingsPropertyInfo = WebSettings+ type AttrLabel WebViewSettingsPropertyInfo = "WebView::settings"+ attrGet _ = getWebViewSettings+ attrSet _ = setWebViewSettings+ attrConstruct _ = constructWebViewSettings++-- VVV Prop "title"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getWebViewTitle :: (MonadIO m, WebViewK o) => o -> m T.Text+getWebViewTitle obj = liftIO $ getObjectPropertyString obj "title"++data WebViewTitlePropertyInfo+instance AttrInfo WebViewTitlePropertyInfo where+ type AttrAllowedOps WebViewTitlePropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebViewTitlePropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebViewTitlePropertyInfo = WebViewK+ type AttrGetType WebViewTitlePropertyInfo = T.Text+ type AttrLabel WebViewTitlePropertyInfo = "WebView::title"+ attrGet _ = getWebViewTitle+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "transparent"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable]++getWebViewTransparent :: (MonadIO m, WebViewK o) => o -> m Bool+getWebViewTransparent obj = liftIO $ getObjectPropertyBool obj "transparent"++setWebViewTransparent :: (MonadIO m, WebViewK o) => o -> Bool -> m ()+setWebViewTransparent obj val = liftIO $ setObjectPropertyBool obj "transparent" val++constructWebViewTransparent :: Bool -> IO ([Char], GValue)+constructWebViewTransparent val = constructObjectPropertyBool "transparent" val++data WebViewTransparentPropertyInfo+instance AttrInfo WebViewTransparentPropertyInfo where+ type AttrAllowedOps WebViewTransparentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebViewTransparentPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebViewTransparentPropertyInfo = WebViewK+ type AttrGetType WebViewTransparentPropertyInfo = Bool+ type AttrLabel WebViewTransparentPropertyInfo = "WebView::transparent"+ attrGet _ = getWebViewTransparent+ attrSet _ = setWebViewTransparent+ attrConstruct _ = constructWebViewTransparent++-- VVV Prop "uri"+ -- Type: TBasicType TUTF8+ -- Flags: [PropertyReadable]++getWebViewUri :: (MonadIO m, WebViewK o) => o -> m T.Text+getWebViewUri obj = liftIO $ getObjectPropertyString obj "uri"++data WebViewUriPropertyInfo+instance AttrInfo WebViewUriPropertyInfo where+ type AttrAllowedOps WebViewUriPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebViewUriPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebViewUriPropertyInfo = WebViewK+ type AttrGetType WebViewUriPropertyInfo = T.Text+ type AttrLabel WebViewUriPropertyInfo = "WebView::uri"+ attrGet _ = getWebViewUri+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "view-mode"+ -- Type: TInterface "WebKit" "WebViewViewMode"+ -- Flags: [PropertyReadable,PropertyWritable]++getWebViewViewMode :: (MonadIO m, WebViewK o) => o -> m WebViewViewMode+getWebViewViewMode obj = liftIO $ getObjectPropertyEnum obj "view-mode"++setWebViewViewMode :: (MonadIO m, WebViewK o) => o -> WebViewViewMode -> m ()+setWebViewViewMode obj val = liftIO $ setObjectPropertyEnum obj "view-mode" val++constructWebViewViewMode :: WebViewViewMode -> IO ([Char], GValue)+constructWebViewViewMode val = constructObjectPropertyEnum "view-mode" val++data WebViewViewModePropertyInfo+instance AttrInfo WebViewViewModePropertyInfo where+ type AttrAllowedOps WebViewViewModePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebViewViewModePropertyInfo = (~) WebViewViewMode+ type AttrBaseTypeConstraint WebViewViewModePropertyInfo = WebViewK+ type AttrGetType WebViewViewModePropertyInfo = WebViewViewMode+ type AttrLabel WebViewViewModePropertyInfo = "WebView::view-mode"+ attrGet _ = getWebViewViewMode+ attrSet _ = setWebViewViewMode+ attrConstruct _ = constructWebViewViewMode++-- VVV Prop "viewport-attributes"+ -- Type: TInterface "WebKit" "ViewportAttributes"+ -- Flags: [PropertyReadable]++getWebViewViewportAttributes :: (MonadIO m, WebViewK o) => o -> m ViewportAttributes+getWebViewViewportAttributes obj = liftIO $ getObjectPropertyObject obj "viewport-attributes" ViewportAttributes++data WebViewViewportAttributesPropertyInfo+instance AttrInfo WebViewViewportAttributesPropertyInfo where+ type AttrAllowedOps WebViewViewportAttributesPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebViewViewportAttributesPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebViewViewportAttributesPropertyInfo = WebViewK+ type AttrGetType WebViewViewportAttributesPropertyInfo = ViewportAttributes+ type AttrLabel WebViewViewportAttributesPropertyInfo = "WebView::viewport-attributes"+ attrGet _ = getWebViewViewportAttributes+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "web-inspector"+ -- Type: TInterface "WebKit" "WebInspector"+ -- Flags: [PropertyReadable]++getWebViewWebInspector :: (MonadIO m, WebViewK o) => o -> m WebInspector+getWebViewWebInspector obj = liftIO $ getObjectPropertyObject obj "web-inspector" WebInspector++data WebViewWebInspectorPropertyInfo+instance AttrInfo WebViewWebInspectorPropertyInfo where+ type AttrAllowedOps WebViewWebInspectorPropertyInfo = '[ 'AttrGet]+ type AttrSetTypeConstraint WebViewWebInspectorPropertyInfo = (~) ()+ type AttrBaseTypeConstraint WebViewWebInspectorPropertyInfo = WebViewK+ type AttrGetType WebViewWebInspectorPropertyInfo = WebInspector+ type AttrLabel WebViewWebInspectorPropertyInfo = "WebView::web-inspector"+ attrGet _ = getWebViewWebInspector+ attrSet _ = undefined+ attrConstruct _ = undefined++-- VVV Prop "window-features"+ -- Type: TInterface "WebKit" "WebWindowFeatures"+ -- Flags: [PropertyReadable,PropertyWritable]++getWebViewWindowFeatures :: (MonadIO m, WebViewK o) => o -> m WebWindowFeatures+getWebViewWindowFeatures obj = liftIO $ getObjectPropertyObject obj "window-features" WebWindowFeatures++setWebViewWindowFeatures :: (MonadIO m, WebViewK o, WebWindowFeaturesK a) => o -> a -> m ()+setWebViewWindowFeatures obj val = liftIO $ setObjectPropertyObject obj "window-features" val++constructWebViewWindowFeatures :: (WebWindowFeaturesK a) => a -> IO ([Char], GValue)+constructWebViewWindowFeatures val = constructObjectPropertyObject "window-features" val++data WebViewWindowFeaturesPropertyInfo+instance AttrInfo WebViewWindowFeaturesPropertyInfo where+ type AttrAllowedOps WebViewWindowFeaturesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebViewWindowFeaturesPropertyInfo = WebWindowFeaturesK+ type AttrBaseTypeConstraint WebViewWindowFeaturesPropertyInfo = WebViewK+ type AttrGetType WebViewWindowFeaturesPropertyInfo = WebWindowFeatures+ type AttrLabel WebViewWindowFeaturesPropertyInfo = "WebView::window-features"+ attrGet _ = getWebViewWindowFeatures+ attrSet _ = setWebViewWindowFeatures+ attrConstruct _ = constructWebViewWindowFeatures++-- VVV Prop "zoom-level"+ -- Type: TBasicType TFloat+ -- Flags: [PropertyReadable,PropertyWritable]++getWebViewZoomLevel :: (MonadIO m, WebViewK o) => o -> m Float+getWebViewZoomLevel obj = liftIO $ getObjectPropertyFloat obj "zoom-level"++setWebViewZoomLevel :: (MonadIO m, WebViewK o) => o -> Float -> m ()+setWebViewZoomLevel obj val = liftIO $ setObjectPropertyFloat obj "zoom-level" val++constructWebViewZoomLevel :: Float -> IO ([Char], GValue)+constructWebViewZoomLevel val = constructObjectPropertyFloat "zoom-level" val++data WebViewZoomLevelPropertyInfo+instance AttrInfo WebViewZoomLevelPropertyInfo where+ type AttrAllowedOps WebViewZoomLevelPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebViewZoomLevelPropertyInfo = (~) Float+ type AttrBaseTypeConstraint WebViewZoomLevelPropertyInfo = WebViewK+ type AttrGetType WebViewZoomLevelPropertyInfo = Float+ type AttrLabel WebViewZoomLevelPropertyInfo = "WebView::zoom-level"+ attrGet _ = getWebViewZoomLevel+ attrSet _ = setWebViewZoomLevel+ attrConstruct _ = constructWebViewZoomLevel++type instance AttributeList WebView = '[ '("app-paintable", GtkA.WidgetAppPaintablePropertyInfo), '("border-width", GtkA.ContainerBorderWidthPropertyInfo), '("can-default", GtkA.WidgetCanDefaultPropertyInfo), '("can-focus", GtkA.WidgetCanFocusPropertyInfo), '("child", GtkA.ContainerChildPropertyInfo), '("composite-child", GtkA.WidgetCompositeChildPropertyInfo), '("copy-target-list", WebViewCopyTargetListPropertyInfo), '("custom-encoding", WebViewCustomEncodingPropertyInfo), '("double-buffered", GtkA.WidgetDoubleBufferedPropertyInfo), '("editable", WebViewEditablePropertyInfo), '("encoding", WebViewEncodingPropertyInfo), '("events", GtkA.WidgetEventsPropertyInfo), '("expand", GtkA.WidgetExpandPropertyInfo), '("full-content-zoom", WebViewFullContentZoomPropertyInfo), '("hadjustment", GtkA.ScrollableHadjustmentPropertyInfo), '("halign", GtkA.WidgetHalignPropertyInfo), '("has-default", GtkA.WidgetHasDefaultPropertyInfo), '("has-focus", GtkA.WidgetHasFocusPropertyInfo), '("has-tooltip", GtkA.WidgetHasTooltipPropertyInfo), '("height-request", GtkA.WidgetHeightRequestPropertyInfo), '("hexpand", GtkA.WidgetHexpandPropertyInfo), '("hexpand-set", GtkA.WidgetHexpandSetPropertyInfo), '("hscroll-policy", GtkA.ScrollableHscrollPolicyPropertyInfo), '("icon-uri", WebViewIconUriPropertyInfo), '("im-context", WebViewImContextPropertyInfo), '("is-focus", GtkA.WidgetIsFocusPropertyInfo), '("load-status", WebViewLoadStatusPropertyInfo), '("margin", GtkA.WidgetMarginPropertyInfo), '("margin-bottom", GtkA.WidgetMarginBottomPropertyInfo), '("margin-end", GtkA.WidgetMarginEndPropertyInfo), '("margin-left", GtkA.WidgetMarginLeftPropertyInfo), '("margin-right", GtkA.WidgetMarginRightPropertyInfo), '("margin-start", GtkA.WidgetMarginStartPropertyInfo), '("margin-top", GtkA.WidgetMarginTopPropertyInfo), '("name", GtkA.WidgetNamePropertyInfo), '("no-show-all", GtkA.WidgetNoShowAllPropertyInfo), '("opacity", GtkA.WidgetOpacityPropertyInfo), '("parent", GtkA.WidgetParentPropertyInfo), '("paste-target-list", WebViewPasteTargetListPropertyInfo), '("progress", WebViewProgressPropertyInfo), '("receives-default", GtkA.WidgetReceivesDefaultPropertyInfo), '("resize-mode", GtkA.ContainerResizeModePropertyInfo), '("scale-factor", GtkA.WidgetScaleFactorPropertyInfo), '("self-scrolling", WebViewSelfScrollingPropertyInfo), '("sensitive", GtkA.WidgetSensitivePropertyInfo), '("settings", WebViewSettingsPropertyInfo), '("style", GtkA.WidgetStylePropertyInfo), '("title", WebViewTitlePropertyInfo), '("tooltip-markup", GtkA.WidgetTooltipMarkupPropertyInfo), '("tooltip-text", GtkA.WidgetTooltipTextPropertyInfo), '("transparent", WebViewTransparentPropertyInfo), '("uri", WebViewUriPropertyInfo), '("vadjustment", GtkA.ScrollableVadjustmentPropertyInfo), '("valign", GtkA.WidgetValignPropertyInfo), '("vexpand", GtkA.WidgetVexpandPropertyInfo), '("vexpand-set", GtkA.WidgetVexpandSetPropertyInfo), '("view-mode", WebViewViewModePropertyInfo), '("viewport-attributes", WebViewViewportAttributesPropertyInfo), '("visible", GtkA.WidgetVisiblePropertyInfo), '("vscroll-policy", GtkA.ScrollableVscrollPolicyPropertyInfo), '("web-inspector", WebViewWebInspectorPropertyInfo), '("width-request", GtkA.WidgetWidthRequestPropertyInfo), '("window", GtkA.WidgetWindowPropertyInfo), '("window-features", WebViewWindowFeaturesPropertyInfo), '("zoom-level", WebViewZoomLevelPropertyInfo)]++-- VVV Prop "fullscreen"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebWindowFeaturesFullscreen :: (MonadIO m, WebWindowFeaturesK o) => o -> m Bool+getWebWindowFeaturesFullscreen obj = liftIO $ getObjectPropertyBool obj "fullscreen"++setWebWindowFeaturesFullscreen :: (MonadIO m, WebWindowFeaturesK o) => o -> Bool -> m ()+setWebWindowFeaturesFullscreen obj val = liftIO $ setObjectPropertyBool obj "fullscreen" val++constructWebWindowFeaturesFullscreen :: Bool -> IO ([Char], GValue)+constructWebWindowFeaturesFullscreen val = constructObjectPropertyBool "fullscreen" val++data WebWindowFeaturesFullscreenPropertyInfo+instance AttrInfo WebWindowFeaturesFullscreenPropertyInfo where+ type AttrAllowedOps WebWindowFeaturesFullscreenPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebWindowFeaturesFullscreenPropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebWindowFeaturesFullscreenPropertyInfo = WebWindowFeaturesK+ type AttrGetType WebWindowFeaturesFullscreenPropertyInfo = Bool+ type AttrLabel WebWindowFeaturesFullscreenPropertyInfo = "WebWindowFeatures::fullscreen"+ attrGet _ = getWebWindowFeaturesFullscreen+ attrSet _ = setWebWindowFeaturesFullscreen+ attrConstruct _ = constructWebWindowFeaturesFullscreen++-- VVV Prop "height"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebWindowFeaturesHeight :: (MonadIO m, WebWindowFeaturesK o) => o -> m Int32+getWebWindowFeaturesHeight obj = liftIO $ getObjectPropertyCInt obj "height"++setWebWindowFeaturesHeight :: (MonadIO m, WebWindowFeaturesK o) => o -> Int32 -> m ()+setWebWindowFeaturesHeight obj val = liftIO $ setObjectPropertyCInt obj "height" val++constructWebWindowFeaturesHeight :: Int32 -> IO ([Char], GValue)+constructWebWindowFeaturesHeight val = constructObjectPropertyCInt "height" val++data WebWindowFeaturesHeightPropertyInfo+instance AttrInfo WebWindowFeaturesHeightPropertyInfo where+ type AttrAllowedOps WebWindowFeaturesHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebWindowFeaturesHeightPropertyInfo = (~) Int32+ type AttrBaseTypeConstraint WebWindowFeaturesHeightPropertyInfo = WebWindowFeaturesK+ type AttrGetType WebWindowFeaturesHeightPropertyInfo = Int32+ type AttrLabel WebWindowFeaturesHeightPropertyInfo = "WebWindowFeatures::height"+ attrGet _ = getWebWindowFeaturesHeight+ attrSet _ = setWebWindowFeaturesHeight+ attrConstruct _ = constructWebWindowFeaturesHeight++-- VVV Prop "locationbar-visible"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebWindowFeaturesLocationbarVisible :: (MonadIO m, WebWindowFeaturesK o) => o -> m Bool+getWebWindowFeaturesLocationbarVisible obj = liftIO $ getObjectPropertyBool obj "locationbar-visible"++setWebWindowFeaturesLocationbarVisible :: (MonadIO m, WebWindowFeaturesK o) => o -> Bool -> m ()+setWebWindowFeaturesLocationbarVisible obj val = liftIO $ setObjectPropertyBool obj "locationbar-visible" val++constructWebWindowFeaturesLocationbarVisible :: Bool -> IO ([Char], GValue)+constructWebWindowFeaturesLocationbarVisible val = constructObjectPropertyBool "locationbar-visible" val++data WebWindowFeaturesLocationbarVisiblePropertyInfo+instance AttrInfo WebWindowFeaturesLocationbarVisiblePropertyInfo where+ type AttrAllowedOps WebWindowFeaturesLocationbarVisiblePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebWindowFeaturesLocationbarVisiblePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebWindowFeaturesLocationbarVisiblePropertyInfo = WebWindowFeaturesK+ type AttrGetType WebWindowFeaturesLocationbarVisiblePropertyInfo = Bool+ type AttrLabel WebWindowFeaturesLocationbarVisiblePropertyInfo = "WebWindowFeatures::locationbar-visible"+ attrGet _ = getWebWindowFeaturesLocationbarVisible+ attrSet _ = setWebWindowFeaturesLocationbarVisible+ attrConstruct _ = constructWebWindowFeaturesLocationbarVisible++-- VVV Prop "menubar-visible"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebWindowFeaturesMenubarVisible :: (MonadIO m, WebWindowFeaturesK o) => o -> m Bool+getWebWindowFeaturesMenubarVisible obj = liftIO $ getObjectPropertyBool obj "menubar-visible"++setWebWindowFeaturesMenubarVisible :: (MonadIO m, WebWindowFeaturesK o) => o -> Bool -> m ()+setWebWindowFeaturesMenubarVisible obj val = liftIO $ setObjectPropertyBool obj "menubar-visible" val++constructWebWindowFeaturesMenubarVisible :: Bool -> IO ([Char], GValue)+constructWebWindowFeaturesMenubarVisible val = constructObjectPropertyBool "menubar-visible" val++data WebWindowFeaturesMenubarVisiblePropertyInfo+instance AttrInfo WebWindowFeaturesMenubarVisiblePropertyInfo where+ type AttrAllowedOps WebWindowFeaturesMenubarVisiblePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebWindowFeaturesMenubarVisiblePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebWindowFeaturesMenubarVisiblePropertyInfo = WebWindowFeaturesK+ type AttrGetType WebWindowFeaturesMenubarVisiblePropertyInfo = Bool+ type AttrLabel WebWindowFeaturesMenubarVisiblePropertyInfo = "WebWindowFeatures::menubar-visible"+ attrGet _ = getWebWindowFeaturesMenubarVisible+ attrSet _ = setWebWindowFeaturesMenubarVisible+ attrConstruct _ = constructWebWindowFeaturesMenubarVisible++-- VVV Prop "scrollbar-visible"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebWindowFeaturesScrollbarVisible :: (MonadIO m, WebWindowFeaturesK o) => o -> m Bool+getWebWindowFeaturesScrollbarVisible obj = liftIO $ getObjectPropertyBool obj "scrollbar-visible"++setWebWindowFeaturesScrollbarVisible :: (MonadIO m, WebWindowFeaturesK o) => o -> Bool -> m ()+setWebWindowFeaturesScrollbarVisible obj val = liftIO $ setObjectPropertyBool obj "scrollbar-visible" val++constructWebWindowFeaturesScrollbarVisible :: Bool -> IO ([Char], GValue)+constructWebWindowFeaturesScrollbarVisible val = constructObjectPropertyBool "scrollbar-visible" val++data WebWindowFeaturesScrollbarVisiblePropertyInfo+instance AttrInfo WebWindowFeaturesScrollbarVisiblePropertyInfo where+ type AttrAllowedOps WebWindowFeaturesScrollbarVisiblePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebWindowFeaturesScrollbarVisiblePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebWindowFeaturesScrollbarVisiblePropertyInfo = WebWindowFeaturesK+ type AttrGetType WebWindowFeaturesScrollbarVisiblePropertyInfo = Bool+ type AttrLabel WebWindowFeaturesScrollbarVisiblePropertyInfo = "WebWindowFeatures::scrollbar-visible"+ attrGet _ = getWebWindowFeaturesScrollbarVisible+ attrSet _ = setWebWindowFeaturesScrollbarVisible+ attrConstruct _ = constructWebWindowFeaturesScrollbarVisible++-- VVV Prop "statusbar-visible"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebWindowFeaturesStatusbarVisible :: (MonadIO m, WebWindowFeaturesK o) => o -> m Bool+getWebWindowFeaturesStatusbarVisible obj = liftIO $ getObjectPropertyBool obj "statusbar-visible"++setWebWindowFeaturesStatusbarVisible :: (MonadIO m, WebWindowFeaturesK o) => o -> Bool -> m ()+setWebWindowFeaturesStatusbarVisible obj val = liftIO $ setObjectPropertyBool obj "statusbar-visible" val++constructWebWindowFeaturesStatusbarVisible :: Bool -> IO ([Char], GValue)+constructWebWindowFeaturesStatusbarVisible val = constructObjectPropertyBool "statusbar-visible" val++data WebWindowFeaturesStatusbarVisiblePropertyInfo+instance AttrInfo WebWindowFeaturesStatusbarVisiblePropertyInfo where+ type AttrAllowedOps WebWindowFeaturesStatusbarVisiblePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebWindowFeaturesStatusbarVisiblePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebWindowFeaturesStatusbarVisiblePropertyInfo = WebWindowFeaturesK+ type AttrGetType WebWindowFeaturesStatusbarVisiblePropertyInfo = Bool+ type AttrLabel WebWindowFeaturesStatusbarVisiblePropertyInfo = "WebWindowFeatures::statusbar-visible"+ attrGet _ = getWebWindowFeaturesStatusbarVisible+ attrSet _ = setWebWindowFeaturesStatusbarVisible+ attrConstruct _ = constructWebWindowFeaturesStatusbarVisible++-- VVV Prop "toolbar-visible"+ -- Type: TBasicType TBoolean+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebWindowFeaturesToolbarVisible :: (MonadIO m, WebWindowFeaturesK o) => o -> m Bool+getWebWindowFeaturesToolbarVisible obj = liftIO $ getObjectPropertyBool obj "toolbar-visible"++setWebWindowFeaturesToolbarVisible :: (MonadIO m, WebWindowFeaturesK o) => o -> Bool -> m ()+setWebWindowFeaturesToolbarVisible obj val = liftIO $ setObjectPropertyBool obj "toolbar-visible" val++constructWebWindowFeaturesToolbarVisible :: Bool -> IO ([Char], GValue)+constructWebWindowFeaturesToolbarVisible val = constructObjectPropertyBool "toolbar-visible" val++data WebWindowFeaturesToolbarVisiblePropertyInfo+instance AttrInfo WebWindowFeaturesToolbarVisiblePropertyInfo where+ type AttrAllowedOps WebWindowFeaturesToolbarVisiblePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebWindowFeaturesToolbarVisiblePropertyInfo = (~) Bool+ type AttrBaseTypeConstraint WebWindowFeaturesToolbarVisiblePropertyInfo = WebWindowFeaturesK+ type AttrGetType WebWindowFeaturesToolbarVisiblePropertyInfo = Bool+ type AttrLabel WebWindowFeaturesToolbarVisiblePropertyInfo = "WebWindowFeatures::toolbar-visible"+ attrGet _ = getWebWindowFeaturesToolbarVisible+ attrSet _ = setWebWindowFeaturesToolbarVisible+ attrConstruct _ = constructWebWindowFeaturesToolbarVisible++-- VVV Prop "width"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebWindowFeaturesWidth :: (MonadIO m, WebWindowFeaturesK o) => o -> m Int32+getWebWindowFeaturesWidth obj = liftIO $ getObjectPropertyCInt obj "width"++setWebWindowFeaturesWidth :: (MonadIO m, WebWindowFeaturesK o) => o -> Int32 -> m ()+setWebWindowFeaturesWidth obj val = liftIO $ setObjectPropertyCInt obj "width" val++constructWebWindowFeaturesWidth :: Int32 -> IO ([Char], GValue)+constructWebWindowFeaturesWidth val = constructObjectPropertyCInt "width" val++data WebWindowFeaturesWidthPropertyInfo+instance AttrInfo WebWindowFeaturesWidthPropertyInfo where+ type AttrAllowedOps WebWindowFeaturesWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebWindowFeaturesWidthPropertyInfo = (~) Int32+ type AttrBaseTypeConstraint WebWindowFeaturesWidthPropertyInfo = WebWindowFeaturesK+ type AttrGetType WebWindowFeaturesWidthPropertyInfo = Int32+ type AttrLabel WebWindowFeaturesWidthPropertyInfo = "WebWindowFeatures::width"+ attrGet _ = getWebWindowFeaturesWidth+ attrSet _ = setWebWindowFeaturesWidth+ attrConstruct _ = constructWebWindowFeaturesWidth++-- VVV Prop "x"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebWindowFeaturesX :: (MonadIO m, WebWindowFeaturesK o) => o -> m Int32+getWebWindowFeaturesX obj = liftIO $ getObjectPropertyCInt obj "x"++setWebWindowFeaturesX :: (MonadIO m, WebWindowFeaturesK o) => o -> Int32 -> m ()+setWebWindowFeaturesX obj val = liftIO $ setObjectPropertyCInt obj "x" val++constructWebWindowFeaturesX :: Int32 -> IO ([Char], GValue)+constructWebWindowFeaturesX val = constructObjectPropertyCInt "x" val++data WebWindowFeaturesXPropertyInfo+instance AttrInfo WebWindowFeaturesXPropertyInfo where+ type AttrAllowedOps WebWindowFeaturesXPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebWindowFeaturesXPropertyInfo = (~) Int32+ type AttrBaseTypeConstraint WebWindowFeaturesXPropertyInfo = WebWindowFeaturesK+ type AttrGetType WebWindowFeaturesXPropertyInfo = Int32+ type AttrLabel WebWindowFeaturesXPropertyInfo = "WebWindowFeatures::x"+ attrGet _ = getWebWindowFeaturesX+ attrSet _ = setWebWindowFeaturesX+ attrConstruct _ = constructWebWindowFeaturesX++-- VVV Prop "y"+ -- Type: TBasicType TInt32+ -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]++getWebWindowFeaturesY :: (MonadIO m, WebWindowFeaturesK o) => o -> m Int32+getWebWindowFeaturesY obj = liftIO $ getObjectPropertyCInt obj "y"++setWebWindowFeaturesY :: (MonadIO m, WebWindowFeaturesK o) => o -> Int32 -> m ()+setWebWindowFeaturesY obj val = liftIO $ setObjectPropertyCInt obj "y" val++constructWebWindowFeaturesY :: Int32 -> IO ([Char], GValue)+constructWebWindowFeaturesY val = constructObjectPropertyCInt "y" val++data WebWindowFeaturesYPropertyInfo+instance AttrInfo WebWindowFeaturesYPropertyInfo where+ type AttrAllowedOps WebWindowFeaturesYPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]+ type AttrSetTypeConstraint WebWindowFeaturesYPropertyInfo = (~) Int32+ type AttrBaseTypeConstraint WebWindowFeaturesYPropertyInfo = WebWindowFeaturesK+ type AttrGetType WebWindowFeaturesYPropertyInfo = Int32+ type AttrLabel WebWindowFeaturesYPropertyInfo = "WebWindowFeatures::y"+ attrGet _ = getWebWindowFeaturesY+ attrSet _ = setWebWindowFeaturesY+ attrConstruct _ = constructWebWindowFeaturesY++type instance AttributeList WebWindowFeatures = '[ '("fullscreen", WebWindowFeaturesFullscreenPropertyInfo), '("height", WebWindowFeaturesHeightPropertyInfo), '("locationbar-visible", WebWindowFeaturesLocationbarVisiblePropertyInfo), '("menubar-visible", WebWindowFeaturesMenubarVisiblePropertyInfo), '("scrollbar-visible", WebWindowFeaturesScrollbarVisiblePropertyInfo), '("statusbar-visible", WebWindowFeaturesStatusbarVisiblePropertyInfo), '("toolbar-visible", WebWindowFeaturesToolbarVisiblePropertyInfo), '("width", WebWindowFeaturesWidthPropertyInfo), '("x", WebWindowFeaturesXPropertyInfo), '("y", WebWindowFeaturesYPropertyInfo)]+
+ GI/WebKitSignals.hs view
@@ -0,0 +1,824 @@+-- Generated code.++{-# OPTIONS_GHC -fno-warn-orphans #-}++{-# LANGUAGE DataKinds, FlexibleInstances,+ TypeFamilies, MultiParamTypeClasses,+ TypeOperators #-}++module GI.WebKitSignals where++import Data.GI.Base.Properties (GObjectNotifySignalInfo)+import Data.GI.Base.Signals+import Data.GI.Base.Overloading++import qualified GI.GObjectSignals as GObject+import qualified GI.GtkSignals as Gtk+import GI.WebKit++type instance SignalList DOMAttr = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMAudioTrack = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMAudioTrackList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMBarInfo = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMBarProp = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMBatteryManager = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMBlob = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMCDATASection = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMCSSRule = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMCSSRuleList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMCSSStyleDeclaration = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMCSSStyleSheet = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMCSSValue = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMCharacterData = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMComment = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMConsole = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDOMApplicationCache = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDOMImplementation = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDOMMimeType = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDOMMimeTypeArray = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDOMNamedFlowCollection = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDOMPlugin = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDOMPluginArray = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDOMSecurityPolicy = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDOMSelection = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDOMSettableTokenList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDOMStringList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDOMStringMap = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDOMTokenList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDOMWindow = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDOMWindowCSS = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDatabase = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDocument = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDocumentFragment = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMDocumentType = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMEntityReference = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMEvent = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMEventTarget = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMFile = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMFileList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMGamepad = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMGamepadList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMGeolocation = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLAnchorElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLAppletElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLAreaElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLAudioElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLBRElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLBaseElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLBaseFontElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLBodyElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLButtonElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLCanvasElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLCollection = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLDListElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLDetailsElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLDirectoryElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLDivElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLDocument = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLEmbedElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLFieldSetElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLFontElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLFormElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLFrameElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLFrameSetElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLHRElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLHeadElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLHeadingElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLHtmlElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLIFrameElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLImageElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLInputElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLKeygenElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLLIElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLLabelElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLLegendElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLLinkElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLMapElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLMarqueeElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLMediaElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLMenuElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLMetaElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLModElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLOListElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLObjectElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLOptGroupElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLOptionElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLOptionsCollection = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLParagraphElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLParamElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLPreElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLPropertiesCollection = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLQuoteElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLScriptElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLSelectElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLStyleElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLTableCaptionElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLTableCellElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLTableColElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLTableElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLTableRowElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLTableSectionElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLTextAreaElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLTitleElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLUListElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHTMLVideoElement = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMHistory = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMKeyboardEvent = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMLocation = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMMediaController = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMMediaError = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMMediaList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMMediaQueryList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMMemoryInfo = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMMessagePort = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMMicroDataItemValue = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMMouseEvent = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMNamedNodeMap = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMNavigator = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMNode = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMNodeFilter = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMNodeIterator = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMNodeList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMObject = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMPerformance = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMPerformanceEntry = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMPerformanceEntryList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMPerformanceNavigation = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMPerformanceTiming = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMProcessingInstruction = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMPropertyNodeList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMRange = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMScreen = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMShadowRoot = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMStorage = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMStorageInfo = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMStorageQuota = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMStyleMedia = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMStyleSheet = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMStyleSheetList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMText = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMTextTrack = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMTextTrackCue = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMTextTrackCueList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMTextTrackList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMTimeRanges = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMTouch = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMTrackEvent = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMTreeWalker = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMUIEvent = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMValidityState = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMVideoPlaybackQuality = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMVideoTrack = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMVideoTrackList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMWebKitNamedFlow = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMWebKitPoint = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMWheelEvent = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMXPathExpression = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMXPathNSResolver = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList DOMXPathResult = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++data DownloadErrorSignalInfo+instance SignalInfo DownloadErrorSignalInfo where+ type HaskellCallbackType DownloadErrorSignalInfo = DownloadErrorCallback+ connectSignal _ = connectDownloadError++type instance SignalList Download = '[ '("error", DownloadErrorSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++data FaviconDatabaseIconLoadedSignalInfo+instance SignalInfo FaviconDatabaseIconLoadedSignalInfo where+ type HaskellCallbackType FaviconDatabaseIconLoadedSignalInfo = FaviconDatabaseIconLoadedCallback+ connectSignal _ = connectFaviconDatabaseIconLoaded++type instance SignalList FaviconDatabase = '[ '("icon-loaded", FaviconDatabaseIconLoadedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList FileChooserRequest = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList GeolocationPolicyDecision = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList HitTestResult = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++data IconDatabaseIconLoadedSignalInfo+instance SignalInfo IconDatabaseIconLoadedSignalInfo where+ type HaskellCallbackType IconDatabaseIconLoadedSignalInfo = IconDatabaseIconLoadedCallback+ connectSignal _ = connectIconDatabaseIconLoaded++type instance SignalList IconDatabase = '[ '("icon-loaded", IconDatabaseIconLoadedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList NetworkRequest = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList NetworkResponse = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList SecurityOrigin = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++data SoupAuthDialogCurrentToplevelSignalInfo+instance SignalInfo SoupAuthDialogCurrentToplevelSignalInfo where+ type HaskellCallbackType SoupAuthDialogCurrentToplevelSignalInfo = SoupAuthDialogCurrentToplevelCallback+ connectSignal _ = connectSoupAuthDialogCurrentToplevel++type instance SignalList SoupAuthDialog = '[ '("current-toplevel", SoupAuthDialogCurrentToplevelSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList SpellChecker = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList ViewportAttributes = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList WebBackForwardList = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList WebDataSource = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList WebDatabase = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++data WebFrameClearedSignalInfo+instance SignalInfo WebFrameClearedSignalInfo where+ type HaskellCallbackType WebFrameClearedSignalInfo = WebFrameClearedCallback+ connectSignal _ = connectWebFrameCleared++data WebFrameHoveringOverLinkSignalInfo+instance SignalInfo WebFrameHoveringOverLinkSignalInfo where+ type HaskellCallbackType WebFrameHoveringOverLinkSignalInfo = WebFrameHoveringOverLinkCallback+ connectSignal _ = connectWebFrameHoveringOverLink++data WebFrameInsecureContentRunSignalInfo+instance SignalInfo WebFrameInsecureContentRunSignalInfo where+ type HaskellCallbackType WebFrameInsecureContentRunSignalInfo = WebFrameInsecureContentRunCallback+ connectSignal _ = connectWebFrameInsecureContentRun++data WebFrameLoadCommittedSignalInfo+instance SignalInfo WebFrameLoadCommittedSignalInfo where+ type HaskellCallbackType WebFrameLoadCommittedSignalInfo = WebFrameLoadCommittedCallback+ connectSignal _ = connectWebFrameLoadCommitted++data WebFrameResourceContentLengthReceivedSignalInfo+instance SignalInfo WebFrameResourceContentLengthReceivedSignalInfo where+ type HaskellCallbackType WebFrameResourceContentLengthReceivedSignalInfo = WebFrameResourceContentLengthReceivedCallback+ connectSignal _ = connectWebFrameResourceContentLengthReceived++data WebFrameResourceLoadFailedSignalInfo+instance SignalInfo WebFrameResourceLoadFailedSignalInfo where+ type HaskellCallbackType WebFrameResourceLoadFailedSignalInfo = WebFrameResourceLoadFailedCallback+ connectSignal _ = connectWebFrameResourceLoadFailed++data WebFrameResourceLoadFinishedSignalInfo+instance SignalInfo WebFrameResourceLoadFinishedSignalInfo where+ type HaskellCallbackType WebFrameResourceLoadFinishedSignalInfo = WebFrameResourceLoadFinishedCallback+ connectSignal _ = connectWebFrameResourceLoadFinished++data WebFrameResourceRequestStartingSignalInfo+instance SignalInfo WebFrameResourceRequestStartingSignalInfo where+ type HaskellCallbackType WebFrameResourceRequestStartingSignalInfo = WebFrameResourceRequestStartingCallback+ connectSignal _ = connectWebFrameResourceRequestStarting++data WebFrameResourceResponseReceivedSignalInfo+instance SignalInfo WebFrameResourceResponseReceivedSignalInfo where+ type HaskellCallbackType WebFrameResourceResponseReceivedSignalInfo = WebFrameResourceResponseReceivedCallback+ connectSignal _ = connectWebFrameResourceResponseReceived++data WebFrameScrollbarsPolicyChangedSignalInfo+instance SignalInfo WebFrameScrollbarsPolicyChangedSignalInfo where+ type HaskellCallbackType WebFrameScrollbarsPolicyChangedSignalInfo = WebFrameScrollbarsPolicyChangedCallback+ connectSignal _ = connectWebFrameScrollbarsPolicyChanged++data WebFrameTitleChangedSignalInfo+instance SignalInfo WebFrameTitleChangedSignalInfo where+ type HaskellCallbackType WebFrameTitleChangedSignalInfo = WebFrameTitleChangedCallback+ connectSignal _ = connectWebFrameTitleChanged++type instance SignalList WebFrame = '[ '("cleared", WebFrameClearedSignalInfo), '("hovering-over-link", WebFrameHoveringOverLinkSignalInfo), '("insecure-content-run", WebFrameInsecureContentRunSignalInfo), '("load-committed", WebFrameLoadCommittedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("resource-content-length-received", WebFrameResourceContentLengthReceivedSignalInfo), '("resource-load-failed", WebFrameResourceLoadFailedSignalInfo), '("resource-load-finished", WebFrameResourceLoadFinishedSignalInfo), '("resource-request-starting", WebFrameResourceRequestStartingSignalInfo), '("resource-response-received", WebFrameResourceResponseReceivedSignalInfo), '("scrollbars-policy-changed", WebFrameScrollbarsPolicyChangedSignalInfo), '("title-changed", WebFrameTitleChangedSignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList WebHistoryItem = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++data WebInspectorAttachWindowSignalInfo+instance SignalInfo WebInspectorAttachWindowSignalInfo where+ type HaskellCallbackType WebInspectorAttachWindowSignalInfo = WebInspectorAttachWindowCallback+ connectSignal _ = connectWebInspectorAttachWindow++data WebInspectorCloseWindowSignalInfo+instance SignalInfo WebInspectorCloseWindowSignalInfo where+ type HaskellCallbackType WebInspectorCloseWindowSignalInfo = WebInspectorCloseWindowCallback+ connectSignal _ = connectWebInspectorCloseWindow++data WebInspectorDetachWindowSignalInfo+instance SignalInfo WebInspectorDetachWindowSignalInfo where+ type HaskellCallbackType WebInspectorDetachWindowSignalInfo = WebInspectorDetachWindowCallback+ connectSignal _ = connectWebInspectorDetachWindow++data WebInspectorFinishedSignalInfo+instance SignalInfo WebInspectorFinishedSignalInfo where+ type HaskellCallbackType WebInspectorFinishedSignalInfo = WebInspectorFinishedCallback+ connectSignal _ = connectWebInspectorFinished++data WebInspectorInspectWebViewSignalInfo+instance SignalInfo WebInspectorInspectWebViewSignalInfo where+ type HaskellCallbackType WebInspectorInspectWebViewSignalInfo = WebInspectorInspectWebViewCallback+ connectSignal _ = connectWebInspectorInspectWebView++data WebInspectorShowWindowSignalInfo+instance SignalInfo WebInspectorShowWindowSignalInfo where+ type HaskellCallbackType WebInspectorShowWindowSignalInfo = WebInspectorShowWindowCallback+ connectSignal _ = connectWebInspectorShowWindow++type instance SignalList WebInspector = '[ '("attach-window", WebInspectorAttachWindowSignalInfo), '("close-window", WebInspectorCloseWindowSignalInfo), '("detach-window", WebInspectorDetachWindowSignalInfo), '("finished", WebInspectorFinishedSignalInfo), '("inspect-web-view", WebInspectorInspectWebViewSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("show-window", WebInspectorShowWindowSignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList WebNavigationAction = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList WebPlugin = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList WebPluginDatabase = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList WebPolicyDecision = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++data WebResourceContentLengthReceivedSignalInfo+instance SignalInfo WebResourceContentLengthReceivedSignalInfo where+ type HaskellCallbackType WebResourceContentLengthReceivedSignalInfo = WebResourceContentLengthReceivedCallback+ connectSignal _ = connectWebResourceContentLengthReceived++data WebResourceLoadFailedSignalInfo+instance SignalInfo WebResourceLoadFailedSignalInfo where+ type HaskellCallbackType WebResourceLoadFailedSignalInfo = WebResourceLoadFailedCallback+ connectSignal _ = connectWebResourceLoadFailed++data WebResourceLoadFinishedSignalInfo+instance SignalInfo WebResourceLoadFinishedSignalInfo where+ type HaskellCallbackType WebResourceLoadFinishedSignalInfo = WebResourceLoadFinishedCallback+ connectSignal _ = connectWebResourceLoadFinished++data WebResourceResponseReceivedSignalInfo+instance SignalInfo WebResourceResponseReceivedSignalInfo where+ type HaskellCallbackType WebResourceResponseReceivedSignalInfo = WebResourceResponseReceivedCallback+ connectSignal _ = connectWebResourceResponseReceived++type instance SignalList WebResource = '[ '("content-length-received", WebResourceContentLengthReceivedSignalInfo), '("load-failed", WebResourceLoadFailedSignalInfo), '("load-finished", WebResourceLoadFinishedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("response-received", WebResourceResponseReceivedSignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList WebSettings = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++data WebViewCloseWebViewSignalInfo+instance SignalInfo WebViewCloseWebViewSignalInfo where+ type HaskellCallbackType WebViewCloseWebViewSignalInfo = WebViewCloseWebViewCallback+ connectSignal _ = connectWebViewCloseWebView++data WebViewConsoleMessageSignalInfo+instance SignalInfo WebViewConsoleMessageSignalInfo where+ type HaskellCallbackType WebViewConsoleMessageSignalInfo = WebViewConsoleMessageCallback+ connectSignal _ = connectWebViewConsoleMessage++data WebViewContextMenuSignalInfo+instance SignalInfo WebViewContextMenuSignalInfo where+ type HaskellCallbackType WebViewContextMenuSignalInfo = WebViewContextMenuCallback+ connectSignal _ = connectWebViewContextMenu++data WebViewCopyClipboardSignalInfo+instance SignalInfo WebViewCopyClipboardSignalInfo where+ type HaskellCallbackType WebViewCopyClipboardSignalInfo = WebViewCopyClipboardCallback+ connectSignal _ = connectWebViewCopyClipboard++data WebViewCreatePluginWidgetSignalInfo+instance SignalInfo WebViewCreatePluginWidgetSignalInfo where+ type HaskellCallbackType WebViewCreatePluginWidgetSignalInfo = WebViewCreatePluginWidgetCallback+ connectSignal _ = connectWebViewCreatePluginWidget++data WebViewCreateWebViewSignalInfo+instance SignalInfo WebViewCreateWebViewSignalInfo where+ type HaskellCallbackType WebViewCreateWebViewSignalInfo = WebViewCreateWebViewCallback+ connectSignal _ = connectWebViewCreateWebView++data WebViewCutClipboardSignalInfo+instance SignalInfo WebViewCutClipboardSignalInfo where+ type HaskellCallbackType WebViewCutClipboardSignalInfo = WebViewCutClipboardCallback+ connectSignal _ = connectWebViewCutClipboard++data WebViewDatabaseQuotaExceededSignalInfo+instance SignalInfo WebViewDatabaseQuotaExceededSignalInfo where+ type HaskellCallbackType WebViewDatabaseQuotaExceededSignalInfo = WebViewDatabaseQuotaExceededCallback+ connectSignal _ = connectWebViewDatabaseQuotaExceeded++data WebViewDocumentLoadFinishedSignalInfo+instance SignalInfo WebViewDocumentLoadFinishedSignalInfo where+ type HaskellCallbackType WebViewDocumentLoadFinishedSignalInfo = WebViewDocumentLoadFinishedCallback+ connectSignal _ = connectWebViewDocumentLoadFinished++data WebViewDownloadRequestedSignalInfo+instance SignalInfo WebViewDownloadRequestedSignalInfo where+ type HaskellCallbackType WebViewDownloadRequestedSignalInfo = WebViewDownloadRequestedCallback+ connectSignal _ = connectWebViewDownloadRequested++data WebViewEditingBeganSignalInfo+instance SignalInfo WebViewEditingBeganSignalInfo where+ type HaskellCallbackType WebViewEditingBeganSignalInfo = WebViewEditingBeganCallback+ connectSignal _ = connectWebViewEditingBegan++data WebViewEditingEndedSignalInfo+instance SignalInfo WebViewEditingEndedSignalInfo where+ type HaskellCallbackType WebViewEditingEndedSignalInfo = WebViewEditingEndedCallback+ connectSignal _ = connectWebViewEditingEnded++data WebViewEnteringFullscreenSignalInfo+instance SignalInfo WebViewEnteringFullscreenSignalInfo where+ type HaskellCallbackType WebViewEnteringFullscreenSignalInfo = WebViewEnteringFullscreenCallback+ connectSignal _ = connectWebViewEnteringFullscreen++data WebViewFrameCreatedSignalInfo+instance SignalInfo WebViewFrameCreatedSignalInfo where+ type HaskellCallbackType WebViewFrameCreatedSignalInfo = WebViewFrameCreatedCallback+ connectSignal _ = connectWebViewFrameCreated++data WebViewGeolocationPolicyDecisionCancelledSignalInfo+instance SignalInfo WebViewGeolocationPolicyDecisionCancelledSignalInfo where+ type HaskellCallbackType WebViewGeolocationPolicyDecisionCancelledSignalInfo = WebViewGeolocationPolicyDecisionCancelledCallback+ connectSignal _ = connectWebViewGeolocationPolicyDecisionCancelled++data WebViewGeolocationPolicyDecisionRequestedSignalInfo+instance SignalInfo WebViewGeolocationPolicyDecisionRequestedSignalInfo where+ type HaskellCallbackType WebViewGeolocationPolicyDecisionRequestedSignalInfo = WebViewGeolocationPolicyDecisionRequestedCallback+ connectSignal _ = connectWebViewGeolocationPolicyDecisionRequested++data WebViewHoveringOverLinkSignalInfo+instance SignalInfo WebViewHoveringOverLinkSignalInfo where+ type HaskellCallbackType WebViewHoveringOverLinkSignalInfo = WebViewHoveringOverLinkCallback+ connectSignal _ = connectWebViewHoveringOverLink++data WebViewIconLoadedSignalInfo+instance SignalInfo WebViewIconLoadedSignalInfo where+ type HaskellCallbackType WebViewIconLoadedSignalInfo = WebViewIconLoadedCallback+ connectSignal _ = connectWebViewIconLoaded++data WebViewLeavingFullscreenSignalInfo+instance SignalInfo WebViewLeavingFullscreenSignalInfo where+ type HaskellCallbackType WebViewLeavingFullscreenSignalInfo = WebViewLeavingFullscreenCallback+ connectSignal _ = connectWebViewLeavingFullscreen++data WebViewLoadCommittedSignalInfo+instance SignalInfo WebViewLoadCommittedSignalInfo where+ type HaskellCallbackType WebViewLoadCommittedSignalInfo = WebViewLoadCommittedCallback+ connectSignal _ = connectWebViewLoadCommitted++data WebViewLoadErrorSignalInfo+instance SignalInfo WebViewLoadErrorSignalInfo where+ type HaskellCallbackType WebViewLoadErrorSignalInfo = WebViewLoadErrorCallback+ connectSignal _ = connectWebViewLoadError++data WebViewLoadFinishedSignalInfo+instance SignalInfo WebViewLoadFinishedSignalInfo where+ type HaskellCallbackType WebViewLoadFinishedSignalInfo = WebViewLoadFinishedCallback+ connectSignal _ = connectWebViewLoadFinished++data WebViewLoadProgressChangedSignalInfo+instance SignalInfo WebViewLoadProgressChangedSignalInfo where+ type HaskellCallbackType WebViewLoadProgressChangedSignalInfo = WebViewLoadProgressChangedCallback+ connectSignal _ = connectWebViewLoadProgressChanged++data WebViewLoadStartedSignalInfo+instance SignalInfo WebViewLoadStartedSignalInfo where+ type HaskellCallbackType WebViewLoadStartedSignalInfo = WebViewLoadStartedCallback+ connectSignal _ = connectWebViewLoadStarted++data WebViewMimeTypePolicyDecisionRequestedSignalInfo+instance SignalInfo WebViewMimeTypePolicyDecisionRequestedSignalInfo where+ type HaskellCallbackType WebViewMimeTypePolicyDecisionRequestedSignalInfo = WebViewMimeTypePolicyDecisionRequestedCallback+ connectSignal _ = connectWebViewMimeTypePolicyDecisionRequested++data WebViewMoveCursorSignalInfo+instance SignalInfo WebViewMoveCursorSignalInfo where+ type HaskellCallbackType WebViewMoveCursorSignalInfo = WebViewMoveCursorCallback+ connectSignal _ = connectWebViewMoveCursor++data WebViewNavigationPolicyDecisionRequestedSignalInfo+instance SignalInfo WebViewNavigationPolicyDecisionRequestedSignalInfo where+ type HaskellCallbackType WebViewNavigationPolicyDecisionRequestedSignalInfo = WebViewNavigationPolicyDecisionRequestedCallback+ connectSignal _ = connectWebViewNavigationPolicyDecisionRequested++data WebViewNavigationRequestedSignalInfo+instance SignalInfo WebViewNavigationRequestedSignalInfo where+ type HaskellCallbackType WebViewNavigationRequestedSignalInfo = WebViewNavigationRequestedCallback+ connectSignal _ = connectWebViewNavigationRequested++data WebViewNewWindowPolicyDecisionRequestedSignalInfo+instance SignalInfo WebViewNewWindowPolicyDecisionRequestedSignalInfo where+ type HaskellCallbackType WebViewNewWindowPolicyDecisionRequestedSignalInfo = WebViewNewWindowPolicyDecisionRequestedCallback+ connectSignal _ = connectWebViewNewWindowPolicyDecisionRequested++data WebViewOnloadEventSignalInfo+instance SignalInfo WebViewOnloadEventSignalInfo where+ type HaskellCallbackType WebViewOnloadEventSignalInfo = WebViewOnloadEventCallback+ connectSignal _ = connectWebViewOnloadEvent++data WebViewPasteClipboardSignalInfo+instance SignalInfo WebViewPasteClipboardSignalInfo where+ type HaskellCallbackType WebViewPasteClipboardSignalInfo = WebViewPasteClipboardCallback+ connectSignal _ = connectWebViewPasteClipboard++data WebViewPopulatePopupSignalInfo+instance SignalInfo WebViewPopulatePopupSignalInfo where+ type HaskellCallbackType WebViewPopulatePopupSignalInfo = WebViewPopulatePopupCallback+ connectSignal _ = connectWebViewPopulatePopup++data WebViewPrintRequestedSignalInfo+instance SignalInfo WebViewPrintRequestedSignalInfo where+ type HaskellCallbackType WebViewPrintRequestedSignalInfo = WebViewPrintRequestedCallback+ connectSignal _ = connectWebViewPrintRequested++data WebViewRedoSignalInfo+instance SignalInfo WebViewRedoSignalInfo where+ type HaskellCallbackType WebViewRedoSignalInfo = WebViewRedoCallback+ connectSignal _ = connectWebViewRedo++data WebViewResourceContentLengthReceivedSignalInfo+instance SignalInfo WebViewResourceContentLengthReceivedSignalInfo where+ type HaskellCallbackType WebViewResourceContentLengthReceivedSignalInfo = WebViewResourceContentLengthReceivedCallback+ connectSignal _ = connectWebViewResourceContentLengthReceived++data WebViewResourceLoadFailedSignalInfo+instance SignalInfo WebViewResourceLoadFailedSignalInfo where+ type HaskellCallbackType WebViewResourceLoadFailedSignalInfo = WebViewResourceLoadFailedCallback+ connectSignal _ = connectWebViewResourceLoadFailed++data WebViewResourceLoadFinishedSignalInfo+instance SignalInfo WebViewResourceLoadFinishedSignalInfo where+ type HaskellCallbackType WebViewResourceLoadFinishedSignalInfo = WebViewResourceLoadFinishedCallback+ connectSignal _ = connectWebViewResourceLoadFinished++data WebViewResourceRequestStartingSignalInfo+instance SignalInfo WebViewResourceRequestStartingSignalInfo where+ type HaskellCallbackType WebViewResourceRequestStartingSignalInfo = WebViewResourceRequestStartingCallback+ connectSignal _ = connectWebViewResourceRequestStarting++data WebViewResourceResponseReceivedSignalInfo+instance SignalInfo WebViewResourceResponseReceivedSignalInfo where+ type HaskellCallbackType WebViewResourceResponseReceivedSignalInfo = WebViewResourceResponseReceivedCallback+ connectSignal _ = connectWebViewResourceResponseReceived++data WebViewRunFileChooserSignalInfo+instance SignalInfo WebViewRunFileChooserSignalInfo where+ type HaskellCallbackType WebViewRunFileChooserSignalInfo = WebViewRunFileChooserCallback+ connectSignal _ = connectWebViewRunFileChooser++data WebViewScriptAlertSignalInfo+instance SignalInfo WebViewScriptAlertSignalInfo where+ type HaskellCallbackType WebViewScriptAlertSignalInfo = WebViewScriptAlertCallback+ connectSignal _ = connectWebViewScriptAlert++data WebViewScriptConfirmSignalInfo+instance SignalInfo WebViewScriptConfirmSignalInfo where+ type HaskellCallbackType WebViewScriptConfirmSignalInfo = WebViewScriptConfirmCallback+ connectSignal _ = connectWebViewScriptConfirm++data WebViewScriptPromptSignalInfo+instance SignalInfo WebViewScriptPromptSignalInfo where+ type HaskellCallbackType WebViewScriptPromptSignalInfo = WebViewScriptPromptCallback+ connectSignal _ = connectWebViewScriptPrompt++data WebViewSelectAllSignalInfo+instance SignalInfo WebViewSelectAllSignalInfo where+ type HaskellCallbackType WebViewSelectAllSignalInfo = WebViewSelectAllCallback+ connectSignal _ = connectWebViewSelectAll++data WebViewSelectionChangedSignalInfo+instance SignalInfo WebViewSelectionChangedSignalInfo where+ type HaskellCallbackType WebViewSelectionChangedSignalInfo = WebViewSelectionChangedCallback+ connectSignal _ = connectWebViewSelectionChanged++data WebViewShouldApplyStyleSignalInfo+instance SignalInfo WebViewShouldApplyStyleSignalInfo where+ type HaskellCallbackType WebViewShouldApplyStyleSignalInfo = WebViewShouldApplyStyleCallback+ connectSignal _ = connectWebViewShouldApplyStyle++data WebViewShouldBeginEditingSignalInfo+instance SignalInfo WebViewShouldBeginEditingSignalInfo where+ type HaskellCallbackType WebViewShouldBeginEditingSignalInfo = WebViewShouldBeginEditingCallback+ connectSignal _ = connectWebViewShouldBeginEditing++data WebViewShouldChangeSelectedRangeSignalInfo+instance SignalInfo WebViewShouldChangeSelectedRangeSignalInfo where+ type HaskellCallbackType WebViewShouldChangeSelectedRangeSignalInfo = WebViewShouldChangeSelectedRangeCallback+ connectSignal _ = connectWebViewShouldChangeSelectedRange++data WebViewShouldDeleteRangeSignalInfo+instance SignalInfo WebViewShouldDeleteRangeSignalInfo where+ type HaskellCallbackType WebViewShouldDeleteRangeSignalInfo = WebViewShouldDeleteRangeCallback+ connectSignal _ = connectWebViewShouldDeleteRange++data WebViewShouldEndEditingSignalInfo+instance SignalInfo WebViewShouldEndEditingSignalInfo where+ type HaskellCallbackType WebViewShouldEndEditingSignalInfo = WebViewShouldEndEditingCallback+ connectSignal _ = connectWebViewShouldEndEditing++data WebViewShouldInsertNodeSignalInfo+instance SignalInfo WebViewShouldInsertNodeSignalInfo where+ type HaskellCallbackType WebViewShouldInsertNodeSignalInfo = WebViewShouldInsertNodeCallback+ connectSignal _ = connectWebViewShouldInsertNode++data WebViewShouldInsertTextSignalInfo+instance SignalInfo WebViewShouldInsertTextSignalInfo where+ type HaskellCallbackType WebViewShouldInsertTextSignalInfo = WebViewShouldInsertTextCallback+ connectSignal _ = connectWebViewShouldInsertText++data WebViewShouldShowDeleteInterfaceForElementSignalInfo+instance SignalInfo WebViewShouldShowDeleteInterfaceForElementSignalInfo where+ type HaskellCallbackType WebViewShouldShowDeleteInterfaceForElementSignalInfo = WebViewShouldShowDeleteInterfaceForElementCallback+ connectSignal _ = connectWebViewShouldShowDeleteInterfaceForElement++data WebViewStatusBarTextChangedSignalInfo+instance SignalInfo WebViewStatusBarTextChangedSignalInfo where+ type HaskellCallbackType WebViewStatusBarTextChangedSignalInfo = WebViewStatusBarTextChangedCallback+ connectSignal _ = connectWebViewStatusBarTextChanged++data WebViewTitleChangedSignalInfo+instance SignalInfo WebViewTitleChangedSignalInfo where+ type HaskellCallbackType WebViewTitleChangedSignalInfo = WebViewTitleChangedCallback+ connectSignal _ = connectWebViewTitleChanged++data WebViewUndoSignalInfo+instance SignalInfo WebViewUndoSignalInfo where+ type HaskellCallbackType WebViewUndoSignalInfo = WebViewUndoCallback+ connectSignal _ = connectWebViewUndo++data WebViewUserChangedContentsSignalInfo+instance SignalInfo WebViewUserChangedContentsSignalInfo where+ type HaskellCallbackType WebViewUserChangedContentsSignalInfo = WebViewUserChangedContentsCallback+ connectSignal _ = connectWebViewUserChangedContents++data WebViewViewportAttributesChangedSignalInfo+instance SignalInfo WebViewViewportAttributesChangedSignalInfo where+ type HaskellCallbackType WebViewViewportAttributesChangedSignalInfo = WebViewViewportAttributesChangedCallback+ connectSignal _ = connectWebViewViewportAttributesChanged++data WebViewViewportAttributesRecomputeRequestedSignalInfo+instance SignalInfo WebViewViewportAttributesRecomputeRequestedSignalInfo where+ type HaskellCallbackType WebViewViewportAttributesRecomputeRequestedSignalInfo = WebViewViewportAttributesRecomputeRequestedCallback+ connectSignal _ = connectWebViewViewportAttributesRecomputeRequested++data WebViewWebViewReadySignalInfo+instance SignalInfo WebViewWebViewReadySignalInfo where+ type HaskellCallbackType WebViewWebViewReadySignalInfo = WebViewWebViewReadyCallback+ connectSignal _ = connectWebViewWebViewReady++data WebViewWindowObjectClearedSignalInfo+instance SignalInfo WebViewWindowObjectClearedSignalInfo where+ type HaskellCallbackType WebViewWindowObjectClearedSignalInfo = WebViewWindowObjectClearedCallback+ connectSignal _ = connectWebViewWindowObjectCleared++type instance SignalList WebView = '[ '("accel-closures-changed", Gtk.WidgetAccelClosuresChangedSignalInfo), '("add", Gtk.ContainerAddSignalInfo), '("button-press-event", Gtk.WidgetButtonPressEventSignalInfo), '("button-release-event", Gtk.WidgetButtonReleaseEventSignalInfo), '("can-activate-accel", Gtk.WidgetCanActivateAccelSignalInfo), '("check-resize", Gtk.ContainerCheckResizeSignalInfo), '("child-notify", Gtk.WidgetChildNotifySignalInfo), '("close-web-view", WebViewCloseWebViewSignalInfo), '("composited-changed", Gtk.WidgetCompositedChangedSignalInfo), '("configure-event", Gtk.WidgetConfigureEventSignalInfo), '("console-message", WebViewConsoleMessageSignalInfo), '("context-menu", WebViewContextMenuSignalInfo), '("copy-clipboard", WebViewCopyClipboardSignalInfo), '("create-plugin-widget", WebViewCreatePluginWidgetSignalInfo), '("create-web-view", WebViewCreateWebViewSignalInfo), '("cut-clipboard", WebViewCutClipboardSignalInfo), '("damage-event", Gtk.WidgetDamageEventSignalInfo), '("database-quota-exceeded", WebViewDatabaseQuotaExceededSignalInfo), '("delete-event", Gtk.WidgetDeleteEventSignalInfo), '("destroy", Gtk.WidgetDestroySignalInfo), '("destroy-event", Gtk.WidgetDestroyEventSignalInfo), '("direction-changed", Gtk.WidgetDirectionChangedSignalInfo), '("document-load-finished", WebViewDocumentLoadFinishedSignalInfo), '("download-requested", WebViewDownloadRequestedSignalInfo), '("drag-begin", Gtk.WidgetDragBeginSignalInfo), '("drag-data-delete", Gtk.WidgetDragDataDeleteSignalInfo), '("drag-data-get", Gtk.WidgetDragDataGetSignalInfo), '("drag-data-received", Gtk.WidgetDragDataReceivedSignalInfo), '("drag-drop", Gtk.WidgetDragDropSignalInfo), '("drag-end", Gtk.WidgetDragEndSignalInfo), '("drag-failed", Gtk.WidgetDragFailedSignalInfo), '("drag-leave", Gtk.WidgetDragLeaveSignalInfo), '("drag-motion", Gtk.WidgetDragMotionSignalInfo), '("draw", Gtk.WidgetDrawSignalInfo), '("editing-began", WebViewEditingBeganSignalInfo), '("editing-ended", WebViewEditingEndedSignalInfo), '("enter-notify-event", Gtk.WidgetEnterNotifyEventSignalInfo), '("entering-fullscreen", WebViewEnteringFullscreenSignalInfo), '("event", Gtk.WidgetEventSignalInfo), '("event-after", Gtk.WidgetEventAfterSignalInfo), '("focus", Gtk.WidgetFocusSignalInfo), '("focus-in-event", Gtk.WidgetFocusInEventSignalInfo), '("focus-out-event", Gtk.WidgetFocusOutEventSignalInfo), '("frame-created", WebViewFrameCreatedSignalInfo), '("geolocation-policy-decision-cancelled", WebViewGeolocationPolicyDecisionCancelledSignalInfo), '("geolocation-policy-decision-requested", WebViewGeolocationPolicyDecisionRequestedSignalInfo), '("grab-broken-event", Gtk.WidgetGrabBrokenEventSignalInfo), '("grab-focus", Gtk.WidgetGrabFocusSignalInfo), '("grab-notify", Gtk.WidgetGrabNotifySignalInfo), '("hide", Gtk.WidgetHideSignalInfo), '("hierarchy-changed", Gtk.WidgetHierarchyChangedSignalInfo), '("hovering-over-link", WebViewHoveringOverLinkSignalInfo), '("icon-loaded", WebViewIconLoadedSignalInfo), '("key-press-event", Gtk.WidgetKeyPressEventSignalInfo), '("key-release-event", Gtk.WidgetKeyReleaseEventSignalInfo), '("keynav-failed", Gtk.WidgetKeynavFailedSignalInfo), '("leave-notify-event", Gtk.WidgetLeaveNotifyEventSignalInfo), '("leaving-fullscreen", WebViewLeavingFullscreenSignalInfo), '("load-committed", WebViewLoadCommittedSignalInfo), '("load-error", WebViewLoadErrorSignalInfo), '("load-finished", WebViewLoadFinishedSignalInfo), '("load-progress-changed", WebViewLoadProgressChangedSignalInfo), '("load-started", WebViewLoadStartedSignalInfo), '("map", Gtk.WidgetMapSignalInfo), '("map-event", Gtk.WidgetMapEventSignalInfo), '("mime-type-policy-decision-requested", WebViewMimeTypePolicyDecisionRequestedSignalInfo), '("mnemonic-activate", Gtk.WidgetMnemonicActivateSignalInfo), '("motion-notify-event", Gtk.WidgetMotionNotifyEventSignalInfo), '("move-cursor", WebViewMoveCursorSignalInfo), '("move-focus", Gtk.WidgetMoveFocusSignalInfo), '("navigation-policy-decision-requested", WebViewNavigationPolicyDecisionRequestedSignalInfo), '("navigation-requested", WebViewNavigationRequestedSignalInfo), '("new-window-policy-decision-requested", WebViewNewWindowPolicyDecisionRequestedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("onload-event", WebViewOnloadEventSignalInfo), '("parent-set", Gtk.WidgetParentSetSignalInfo), '("paste-clipboard", WebViewPasteClipboardSignalInfo), '("populate-popup", WebViewPopulatePopupSignalInfo), '("popup-menu", Gtk.WidgetPopupMenuSignalInfo), '("print-requested", WebViewPrintRequestedSignalInfo), '("property-notify-event", Gtk.WidgetPropertyNotifyEventSignalInfo), '("proximity-in-event", Gtk.WidgetProximityInEventSignalInfo), '("proximity-out-event", Gtk.WidgetProximityOutEventSignalInfo), '("query-tooltip", Gtk.WidgetQueryTooltipSignalInfo), '("realize", Gtk.WidgetRealizeSignalInfo), '("redo", WebViewRedoSignalInfo), '("remove", Gtk.ContainerRemoveSignalInfo), '("resource-content-length-received", WebViewResourceContentLengthReceivedSignalInfo), '("resource-load-failed", WebViewResourceLoadFailedSignalInfo), '("resource-load-finished", WebViewResourceLoadFinishedSignalInfo), '("resource-request-starting", WebViewResourceRequestStartingSignalInfo), '("resource-response-received", WebViewResourceResponseReceivedSignalInfo), '("run-file-chooser", WebViewRunFileChooserSignalInfo), '("screen-changed", Gtk.WidgetScreenChangedSignalInfo), '("script-alert", WebViewScriptAlertSignalInfo), '("script-confirm", WebViewScriptConfirmSignalInfo), '("script-prompt", WebViewScriptPromptSignalInfo), '("scroll-event", Gtk.WidgetScrollEventSignalInfo), '("select-all", WebViewSelectAllSignalInfo), '("selection-changed", WebViewSelectionChangedSignalInfo), '("selection-clear-event", Gtk.WidgetSelectionClearEventSignalInfo), '("selection-get", Gtk.WidgetSelectionGetSignalInfo), '("selection-notify-event", Gtk.WidgetSelectionNotifyEventSignalInfo), '("selection-received", Gtk.WidgetSelectionReceivedSignalInfo), '("selection-request-event", Gtk.WidgetSelectionRequestEventSignalInfo), '("set-focus-child", Gtk.ContainerSetFocusChildSignalInfo), '("should-apply-style", WebViewShouldApplyStyleSignalInfo), '("should-begin-editing", WebViewShouldBeginEditingSignalInfo), '("should-change-selected-range", WebViewShouldChangeSelectedRangeSignalInfo), '("should-delete-range", WebViewShouldDeleteRangeSignalInfo), '("should-end-editing", WebViewShouldEndEditingSignalInfo), '("should-insert-node", WebViewShouldInsertNodeSignalInfo), '("should-insert-text", WebViewShouldInsertTextSignalInfo), '("should-show-delete-interface-for-element", WebViewShouldShowDeleteInterfaceForElementSignalInfo), '("show", Gtk.WidgetShowSignalInfo), '("show-help", Gtk.WidgetShowHelpSignalInfo), '("size-allocate", Gtk.WidgetSizeAllocateSignalInfo), '("state-changed", Gtk.WidgetStateChangedSignalInfo), '("state-flags-changed", Gtk.WidgetStateFlagsChangedSignalInfo), '("status-bar-text-changed", WebViewStatusBarTextChangedSignalInfo), '("style-set", Gtk.WidgetStyleSetSignalInfo), '("style-updated", Gtk.WidgetStyleUpdatedSignalInfo), '("title-changed", WebViewTitleChangedSignalInfo), '("touch-event", Gtk.WidgetTouchEventSignalInfo), '("undo", WebViewUndoSignalInfo), '("unmap", Gtk.WidgetUnmapSignalInfo), '("unmap-event", Gtk.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.WidgetUnrealizeSignalInfo), '("user-changed-contents", WebViewUserChangedContentsSignalInfo), '("viewport-attributes-changed", WebViewViewportAttributesChangedSignalInfo), '("viewport-attributes-recompute-requested", WebViewViewportAttributesRecomputeRequestedSignalInfo), '("visibility-notify-event", Gtk.WidgetVisibilityNotifyEventSignalInfo), '("web-view-ready", WebViewWebViewReadySignalInfo), '("window-object-cleared", WebViewWindowObjectClearedSignalInfo), '("window-state-event", Gtk.WidgetWindowStateEventSignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]++type instance SignalList WebWindowFeatures = '[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)]+
+ LICENSE view
@@ -0,0 +1,502 @@+ GNU LESSER GENERAL PUBLIC LICENSE+ Version 2.1, February 1999++ Copyright (C) 1991, 1999 Free Software Foundation, Inc.+ 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA+ Everyone is permitted to copy and distribute verbatim copies+ of this license document, but changing it is not allowed.++[This is the first released version of the Lesser GPL. It also counts+ as the successor of the GNU Library Public License, version 2, hence+ the version number 2.1.]++ Preamble++ The licenses for most software are designed to take away your+freedom to share and change it. By contrast, the GNU General Public+Licenses are intended to guarantee your freedom to share and change+free software--to make sure the software is free for all its users.++ This license, the Lesser General Public License, applies to some+specially designated software packages--typically libraries--of the+Free Software Foundation and other authors who decide to use it. You+can use it too, but we suggest you first think carefully about whether+this license or the ordinary General Public License is the better+strategy to use in any particular case, based on the explanations below.++ When we speak of free software, we are referring to freedom of use,+not price. Our General Public Licenses are designed to make sure that+you have the freedom to distribute copies of free software (and charge+for this service if you wish); that you receive source code or can get+it if you want it; that you can change the software and use pieces of+it in new free programs; and that you are informed that you can do+these things.++ To protect your rights, we need to make restrictions that forbid+distributors to deny you these rights or to ask you to surrender these+rights. These restrictions translate to certain responsibilities for+you if you distribute copies of the library or if you modify it.++ For example, if you distribute copies of the library, whether gratis+or for a fee, you must give the recipients all the rights that we gave+you. You must make sure that they, too, receive or can get the source+code. If you link other code with the library, you must provide+complete object files to the recipients, so that they can relink them+with the library after making changes to the library and recompiling+it. And you must show them these terms so they know their rights.++ We protect your rights with a two-step method: (1) we copyright the+library, and (2) we offer you this license, which gives you legal+permission to copy, distribute and/or modify the library.++ To protect each distributor, we want to make it very clear that+there is no warranty for the free library. Also, if the library is+modified by someone else and passed on, the recipients should know+that what they have is not the original version, so that the original+author's reputation will not be affected by problems that might be+introduced by others.++ Finally, software patents pose a constant threat to the existence of+any free program. We wish to make sure that a company cannot+effectively restrict the users of a free program by obtaining a+restrictive license from a patent holder. Therefore, we insist that+any patent license obtained for a version of the library must be+consistent with the full freedom of use specified in this license.++ Most GNU software, including some libraries, is covered by the+ordinary GNU General Public License. This license, the GNU Lesser+General Public License, applies to certain designated libraries, and+is quite different from the ordinary General Public License. We use+this license for certain libraries in order to permit linking those+libraries into non-free programs.++ When a program is linked with a library, whether statically or using+a shared library, the combination of the two is legally speaking a+combined work, a derivative of the original library. The ordinary+General Public License therefore permits such linking only if the+entire combination fits its criteria of freedom. The Lesser General+Public License permits more lax criteria for linking other code with+the library.++ We call this license the "Lesser" General Public License because it+does Less to protect the user's freedom than the ordinary General+Public License. It also provides other free software developers Less+of an advantage over competing non-free programs. These disadvantages+are the reason we use the ordinary General Public License for many+libraries. However, the Lesser license provides advantages in certain+special circumstances.++ For example, on rare occasions, there may be a special need to+encourage the widest possible use of a certain library, so that it becomes+a de-facto standard. To achieve this, non-free programs must be+allowed to use the library. A more frequent case is that a free+library does the same job as widely used non-free libraries. In this+case, there is little to gain by limiting the free library to free+software only, so we use the Lesser General Public License.++ In other cases, permission to use a particular library in non-free+programs enables a greater number of people to use a large body of+free software. For example, permission to use the GNU C Library in+non-free programs enables many more people to use the whole GNU+operating system, as well as its variant, the GNU/Linux operating+system.++ Although the Lesser General Public License is Less protective of the+users' freedom, it does ensure that the user of a program that is+linked with the Library has the freedom and the wherewithal to run+that program using a modified version of the Library.++ The precise terms and conditions for copying, distribution and+modification follow. Pay close attention to the difference between a+"work based on the library" and a "work that uses the library". The+former contains code derived from the library, whereas the latter must+be combined with the library in order to run.++ GNU LESSER GENERAL PUBLIC LICENSE+ TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION++ 0. This License Agreement applies to any software library or other+program which contains a notice placed by the copyright holder or+other authorized party saying it may be distributed under the terms of+this Lesser General Public License (also called "this License").+Each licensee is addressed as "you".++ A "library" means a collection of software functions and/or data+prepared so as to be conveniently linked with application programs+(which use some of those functions and data) to form executables.++ The "Library", below, refers to any such software library or work+which has been distributed under these terms. A "work based on the+Library" means either the Library or any derivative work under+copyright law: that is to say, a work containing the Library or a+portion of it, either verbatim or with modifications and/or translated+straightforwardly into another language. (Hereinafter, translation is+included without limitation in the term "modification".)++ "Source code" for a work means the preferred form of the work for+making modifications to it. For a library, complete source code means+all the source code for all modules it contains, plus any associated+interface definition files, plus the scripts used to control compilation+and installation of the library.++ Activities other than copying, distribution and modification are not+covered by this License; they are outside its scope. The act of+running a program using the Library is not restricted, and output from+such a program is covered only if its contents constitute a work based+on the Library (independent of the use of the Library in a tool for+writing it). Whether that is true depends on what the Library does+and what the program that uses the Library does.++ 1. You may copy and distribute verbatim copies of the Library's+complete source code as you receive it, in any medium, provided that+you conspicuously and appropriately publish on each copy an+appropriate copyright notice and disclaimer of warranty; keep intact+all the notices that refer to this License and to the absence of any+warranty; and distribute a copy of this License along with the+Library.++ You may charge a fee for the physical act of transferring a copy,+and you may at your option offer warranty protection in exchange for a+fee.++ 2. You may modify your copy or copies of the Library or any portion+of it, thus forming a work based on the Library, and copy and+distribute such modifications or work under the terms of Section 1+above, provided that you also meet all of these conditions:++ a) The modified work must itself be a software library.++ b) You must cause the files modified to carry prominent notices+ stating that you changed the files and the date of any change.++ c) You must cause the whole of the work to be licensed at no+ charge to all third parties under the terms of this License.++ d) If a facility in the modified Library refers to a function or a+ table of data to be supplied by an application program that uses+ the facility, other than as an argument passed when the facility+ is invoked, then you must make a good faith effort to ensure that,+ in the event an application does not supply such function or+ table, the facility still operates, and performs whatever part of+ its purpose remains meaningful.++ (For example, a function in a library to compute square roots has+ a purpose that is entirely well-defined independent of the+ application. Therefore, Subsection 2d requires that any+ application-supplied function or table used by this function must+ be optional: if the application does not supply it, the square+ root function must still compute square roots.)++These requirements apply to the modified work as a whole. If+identifiable sections of that work are not derived from the Library,+and can be reasonably considered independent and separate works in+themselves, then this License, and its terms, do not apply to those+sections when you distribute them as separate works. But when you+distribute the same sections as part of a whole which is a work based+on the Library, the distribution of the whole must be on the terms of+this License, whose permissions for other licensees extend to the+entire whole, and thus to each and every part regardless of who wrote+it.++Thus, it is not the intent of this section to claim rights or contest+your rights to work written entirely by you; rather, the intent is to+exercise the right to control the distribution of derivative or+collective works based on the Library.++In addition, mere aggregation of another work not based on the Library+with the Library (or with a work based on the Library) on a volume of+a storage or distribution medium does not bring the other work under+the scope of this License.++ 3. You may opt to apply the terms of the ordinary GNU General Public+License instead of this License to a given copy of the Library. To do+this, you must alter all the notices that refer to this License, so+that they refer to the ordinary GNU General Public License, version 2,+instead of to this License. (If a newer version than version 2 of the+ordinary GNU General Public License has appeared, then you can specify+that version instead if you wish.) Do not make any other change in+these notices.++ Once this change is made in a given copy, it is irreversible for+that copy, so the ordinary GNU General Public License applies to all+subsequent copies and derivative works made from that copy.++ This option is useful when you wish to copy part of the code of+the Library into a program that is not a library.++ 4. You may copy and distribute the Library (or a portion or+derivative of it, under Section 2) in object code or executable form+under the terms of Sections 1 and 2 above provided that you accompany+it with the complete corresponding machine-readable source code, which+must be distributed under the terms of Sections 1 and 2 above on a+medium customarily used for software interchange.++ If distribution of object code is made by offering access to copy+from a designated place, then offering equivalent access to copy the+source code from the same place satisfies the requirement to+distribute the source code, even though third parties are not+compelled to copy the source along with the object code.++ 5. A program that contains no derivative of any portion of the+Library, but is designed to work with the Library by being compiled or+linked with it, is called a "work that uses the Library". Such a+work, in isolation, is not a derivative work of the Library, and+therefore falls outside the scope of this License.++ However, linking a "work that uses the Library" with the Library+creates an executable that is a derivative of the Library (because it+contains portions of the Library), rather than a "work that uses the+library". The executable is therefore covered by this License.+Section 6 states terms for distribution of such executables.++ When a "work that uses the Library" uses material from a header file+that is part of the Library, the object code for the work may be a+derivative work of the Library even though the source code is not.+Whether this is true is especially significant if the work can be+linked without the Library, or if the work is itself a library. The+threshold for this to be true is not precisely defined by law.++ If such an object file uses only numerical parameters, data+structure layouts and accessors, and small macros and small inline+functions (ten lines or less in length), then the use of the object+file is unrestricted, regardless of whether it is legally a derivative+work. (Executables containing this object code plus portions of the+Library will still fall under Section 6.)++ Otherwise, if the work is a derivative of the Library, you may+distribute the object code for the work under the terms of Section 6.+Any executables containing that work also fall under Section 6,+whether or not they are linked directly with the Library itself.++ 6. As an exception to the Sections above, you may also combine or+link a "work that uses the Library" with the Library to produce a+work containing portions of the Library, and distribute that work+under terms of your choice, provided that the terms permit+modification of the work for the customer's own use and reverse+engineering for debugging such modifications.++ You must give prominent notice with each copy of the work that the+Library is used in it and that the Library and its use are covered by+this License. You must supply a copy of this License. If the work+during execution displays copyright notices, you must include the+copyright notice for the Library among them, as well as a reference+directing the user to the copy of this License. Also, you must do one+of these things:++ a) Accompany the work with the complete corresponding+ machine-readable source code for the Library including whatever+ changes were used in the work (which must be distributed under+ Sections 1 and 2 above); and, if the work is an executable linked+ with the Library, with the complete machine-readable "work that+ uses the Library", as object code and/or source code, so that the+ user can modify the Library and then relink to produce a modified+ executable containing the modified Library. (It is understood+ that the user who changes the contents of definitions files in the+ Library will not necessarily be able to recompile the application+ to use the modified definitions.)++ b) Use a suitable shared library mechanism for linking with the+ Library. A suitable mechanism is one that (1) uses at run time a+ copy of the library already present on the user's computer system,+ rather than copying library functions into the executable, and (2)+ will operate properly with a modified version of the library, if+ the user installs one, as long as the modified version is+ interface-compatible with the version that the work was made with.++ c) Accompany the work with a written offer, valid for at+ least three years, to give the same user the materials+ specified in Subsection 6a, above, for a charge no more+ than the cost of performing this distribution.++ d) If distribution of the work is made by offering access to copy+ from a designated place, offer equivalent access to copy the above+ specified materials from the same place.++ e) Verify that the user has already received a copy of these+ materials or that you have already sent this user a copy.++ For an executable, the required form of the "work that uses the+Library" must include any data and utility programs needed for+reproducing the executable from it. However, as a special exception,+the materials to be distributed need not include anything that is+normally distributed (in either source or binary form) with the major+components (compiler, kernel, and so on) of the operating system on+which the executable runs, unless that component itself accompanies+the executable.++ It may happen that this requirement contradicts the license+restrictions of other proprietary libraries that do not normally+accompany the operating system. Such a contradiction means you cannot+use both them and the Library together in an executable that you+distribute.++ 7. You may place library facilities that are a work based on the+Library side-by-side in a single library together with other library+facilities not covered by this License, and distribute such a combined+library, provided that the separate distribution of the work based on+the Library and of the other library facilities is otherwise+permitted, and provided that you do these two things:++ a) Accompany the combined library with a copy of the same work+ based on the Library, uncombined with any other library+ facilities. This must be distributed under the terms of the+ Sections above.++ b) Give prominent notice with the combined library of the fact+ that part of it is a work based on the Library, and explaining+ where to find the accompanying uncombined form of the same work.++ 8. You may not copy, modify, sublicense, link with, or distribute+the Library except as expressly provided under this License. Any+attempt otherwise to copy, modify, sublicense, link with, or+distribute the Library is void, and will automatically terminate your+rights under this License. However, parties who have received copies,+or rights, from you under this License will not have their licenses+terminated so long as such parties remain in full compliance.++ 9. You are not required to accept this License, since you have not+signed it. However, nothing else grants you permission to modify or+distribute the Library or its derivative works. These actions are+prohibited by law if you do not accept this License. Therefore, by+modifying or distributing the Library (or any work based on the+Library), you indicate your acceptance of this License to do so, and+all its terms and conditions for copying, distributing or modifying+the Library or works based on it.++ 10. Each time you redistribute the Library (or any work based on the+Library), the recipient automatically receives a license from the+original licensor to copy, distribute, link with or modify the Library+subject to these terms and conditions. You may not impose any further+restrictions on the recipients' exercise of the rights granted herein.+You are not responsible for enforcing compliance by third parties with+this License.++ 11. If, as a consequence of a court judgment or allegation of patent+infringement or for any other reason (not limited to patent issues),+conditions are imposed on you (whether by court order, agreement or+otherwise) that contradict the conditions of this License, they do not+excuse you from the conditions of this License. If you cannot+distribute so as to satisfy simultaneously your obligations under this+License and any other pertinent obligations, then as a consequence you+may not distribute the Library at all. For example, if a patent+license would not permit royalty-free redistribution of the Library by+all those who receive copies directly or indirectly through you, then+the only way you could satisfy both it and this License would be to+refrain entirely from distribution of the Library.++If any portion of this section is held invalid or unenforceable under any+particular circumstance, the balance of the section is intended to apply,+and the section as a whole is intended to apply in other circumstances.++It is not the purpose of this section to induce you to infringe any+patents or other property right claims or to contest validity of any+such claims; this section has the sole purpose of protecting the+integrity of the free software distribution system which is+implemented by public license practices. Many people have made+generous contributions to the wide range of software distributed+through that system in reliance on consistent application of that+system; it is up to the author/donor to decide if he or she is willing+to distribute software through any other system and a licensee cannot+impose that choice.++This section is intended to make thoroughly clear what is believed to+be a consequence of the rest of this License.++ 12. If the distribution and/or use of the Library is restricted in+certain countries either by patents or by copyrighted interfaces, the+original copyright holder who places the Library under this License may add+an explicit geographical distribution limitation excluding those countries,+so that distribution is permitted only in or among countries not thus+excluded. In such case, this License incorporates the limitation as if+written in the body of this License.++ 13. The Free Software Foundation may publish revised and/or new+versions of the Lesser General Public License from time to time.+Such new versions will be similar in spirit to the present version,+but may differ in detail to address new problems or concerns.++Each version is given a distinguishing version number. If the Library+specifies a version number of this License which applies to it and+"any later version", you have the option of following the terms and+conditions either of that version or of any later version published by+the Free Software Foundation. If the Library does not specify a+license version number, you may choose any version ever published by+the Free Software Foundation.++ 14. If you wish to incorporate parts of the Library into other free+programs whose distribution conditions are incompatible with these,+write to the author to ask for permission. For software which is+copyrighted by the Free Software Foundation, write to the Free+Software Foundation; we sometimes make exceptions for this. Our+decision will be guided by the two goals of preserving the free status+of all derivatives of our free software and of promoting the sharing+and reuse of software generally.++ NO WARRANTY++ 15. BECAUSE THE LIBRARY IS LICENSED FREE OF CHARGE, THERE IS NO+WARRANTY FOR THE LIBRARY, TO THE EXTENT PERMITTED BY APPLICABLE LAW.+EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR+OTHER PARTIES PROVIDE THE LIBRARY "AS IS" WITHOUT WARRANTY OF ANY+KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE+IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR+PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE+LIBRARY IS WITH YOU. SHOULD THE LIBRARY PROVE DEFECTIVE, YOU ASSUME+THE COST OF ALL NECESSARY SERVICING, REPAIR OR CORRECTION.++ 16. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN+WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY+AND/OR REDISTRIBUTE THE LIBRARY AS PERMITTED ABOVE, BE LIABLE TO YOU+FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR+CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE THE+LIBRARY (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING+RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A+FAILURE OF THE LIBRARY TO OPERATE WITH ANY OTHER SOFTWARE), EVEN IF+SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH+DAMAGES.++ END OF TERMS AND CONDITIONS++ How to Apply These Terms to Your New Libraries++ If you develop a new library, and you want it to be of the greatest+possible use to the public, we recommend making it free software that+everyone can redistribute and change. You can do so by permitting+redistribution under these terms (or, alternatively, under the terms of the+ordinary General Public License).++ To apply these terms, attach the following notices to the library. It is+safest to attach them to the start of each source file to most effectively+convey the exclusion of warranty; and each file should have at least the+"copyright" line and a pointer to where the full notice is found.++ <one line to give the library's name and a brief idea of what it does.>+ Copyright (C) <year> <name of author>++ This library is free software; you can redistribute it and/or+ modify it under the terms of the GNU Lesser General Public+ License as published by the Free Software Foundation; either+ version 2.1 of the License, or (at your option) any later version.++ This library is distributed in the hope that it will be useful,+ but WITHOUT ANY WARRANTY; without even the implied warranty of+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU+ Lesser General Public License for more details.++ You should have received a copy of the GNU Lesser General Public+ License along with this library; if not, write to the Free Software+ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA++Also add information on how to contact you by electronic and paper mail.++You should also get your employer (if you work as a programmer) or your+school, if any, to sign a "copyright disclaimer" for the library, if+necessary. Here is a sample; alter the names:++ Yoyodyne, Inc., hereby disclaims all copyright interest in the+ library `Frob' (a library for tweaking knobs) written by James Random Hacker.++ <signature of Ty Coon>, 1 April 1990+ Ty Coon, President of Vice++That's all there is to it!
+ Setup.hs view
@@ -0,0 +1,3 @@+#!/usr/bin/env runhaskell+import Distribution.Simple+main = defaultMain
+ gi-webkit.cabal view
@@ -0,0 +1,34 @@+-- Autogenerated, do not edit.+name: gi-webkit+version: 0.2.4.8+synopsis: WebKit bindings+description: Bindings for WebKit, autogenerated by haskell-gi.+homepage: https://github.com/haskell-gi/haskell-gi+license: LGPL-2.1+license-file: LICENSE+author: Will Thompson, Iñaki García Etxebarria and Jonas Platte+maintainer: Iñaki García Etxebarria (garetxe@gmail.com)+category: Bindings+build-type: Simple+cabal-version: >=1.10++library+ default-language: Haskell2010+ exposed-modules: GI.WebKit, GI.WebKitAttributes, GI.WebKitSignals+ pkgconfig-depends: webkitgtk-3.0 >= 2.4+ build-depends: base >= 4.6 && <4.9,+ haskell-gi-base >= 0.8 && < 1,+ gi-atk >= 0.2.16.8 && < 0.3,+ gi-glib >= 0.2.44.8 && < 0.3,+ gi-gobject >= 0.2.44.8 && < 0.3,+ gi-gdk >= 0.3.16.8 && < 0.4,+ gi-gdkpixbuf >= 0.2.31.8 && < 0.3,+ gi-gio >= 0.2.44.8 && < 0.3,+ gi-gtk >= 0.3.16.8 && < 0.4,+ gi-javascriptcore >= 0.2.4.8 && < 0.3,+ gi-soup >= 0.2.50.8 && < 0.3,+ gi-cairo >= 0.1.14.8 && < 0.2,+ bytestring >= 0.10,+ containers >= 0.5,+ text >= 1.0,+ transformers >= 0.3