{- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 Maintainer : Iñaki García Etxebarria (garetxe@gmail.com) -} module GI.WebKit2WebExtension.Objects.DOMHTMLImageElement ( -- * Exported types DOMHTMLImageElement(..) , DOMHTMLImageElementK , toDOMHTMLImageElement , noDOMHTMLImageElement , -- * Methods -- ** dOMHTMLImageElementGetAlign dOMHTMLImageElementGetAlign , -- ** dOMHTMLImageElementGetAlt dOMHTMLImageElementGetAlt , -- ** dOMHTMLImageElementGetBorder dOMHTMLImageElementGetBorder , -- ** dOMHTMLImageElementGetComplete dOMHTMLImageElementGetComplete , -- ** dOMHTMLImageElementGetHeight dOMHTMLImageElementGetHeight , -- ** dOMHTMLImageElementGetHspace dOMHTMLImageElementGetHspace , -- ** dOMHTMLImageElementGetIsMap dOMHTMLImageElementGetIsMap , -- ** dOMHTMLImageElementGetLongDesc dOMHTMLImageElementGetLongDesc , -- ** dOMHTMLImageElementGetLowsrc dOMHTMLImageElementGetLowsrc , -- ** dOMHTMLImageElementGetName dOMHTMLImageElementGetName , -- ** dOMHTMLImageElementGetNaturalHeight dOMHTMLImageElementGetNaturalHeight , -- ** dOMHTMLImageElementGetNaturalWidth dOMHTMLImageElementGetNaturalWidth , -- ** dOMHTMLImageElementGetSrc dOMHTMLImageElementGetSrc , -- ** dOMHTMLImageElementGetUseMap dOMHTMLImageElementGetUseMap , -- ** dOMHTMLImageElementGetVspace dOMHTMLImageElementGetVspace , -- ** dOMHTMLImageElementGetWidth dOMHTMLImageElementGetWidth , -- ** dOMHTMLImageElementGetX dOMHTMLImageElementGetX , -- ** dOMHTMLImageElementGetY dOMHTMLImageElementGetY , -- ** dOMHTMLImageElementSetAlign dOMHTMLImageElementSetAlign , -- ** dOMHTMLImageElementSetAlt dOMHTMLImageElementSetAlt , -- ** dOMHTMLImageElementSetBorder dOMHTMLImageElementSetBorder , -- ** dOMHTMLImageElementSetHeight dOMHTMLImageElementSetHeight , -- ** dOMHTMLImageElementSetHspace dOMHTMLImageElementSetHspace , -- ** dOMHTMLImageElementSetIsMap dOMHTMLImageElementSetIsMap , -- ** dOMHTMLImageElementSetLongDesc dOMHTMLImageElementSetLongDesc , -- ** dOMHTMLImageElementSetLowsrc dOMHTMLImageElementSetLowsrc , -- ** dOMHTMLImageElementSetName dOMHTMLImageElementSetName , -- ** dOMHTMLImageElementSetSrc dOMHTMLImageElementSetSrc , -- ** dOMHTMLImageElementSetUseMap dOMHTMLImageElementSetUseMap , -- ** dOMHTMLImageElementSetVspace dOMHTMLImageElementSetVspace , -- ** dOMHTMLImageElementSetWidth dOMHTMLImageElementSetWidth , -- * Properties -- ** Align DOMHTMLImageElementAlignPropertyInfo , constructDOMHTMLImageElementAlign , getDOMHTMLImageElementAlign , setDOMHTMLImageElementAlign , -- ** Alt DOMHTMLImageElementAltPropertyInfo , constructDOMHTMLImageElementAlt , getDOMHTMLImageElementAlt , setDOMHTMLImageElementAlt , -- ** Border DOMHTMLImageElementBorderPropertyInfo , constructDOMHTMLImageElementBorder , getDOMHTMLImageElementBorder , setDOMHTMLImageElementBorder , -- ** Complete DOMHTMLImageElementCompletePropertyInfo , getDOMHTMLImageElementComplete , -- ** CrossOrigin DOMHTMLImageElementCrossOriginPropertyInfo, constructDOMHTMLImageElementCrossOrigin , getDOMHTMLImageElementCrossOrigin , setDOMHTMLImageElementCrossOrigin , -- ** CurrentSrc DOMHTMLImageElementCurrentSrcPropertyInfo, getDOMHTMLImageElementCurrentSrc , -- ** Height DOMHTMLImageElementHeightPropertyInfo , constructDOMHTMLImageElementHeight , getDOMHTMLImageElementHeight , setDOMHTMLImageElementHeight , -- ** Hspace DOMHTMLImageElementHspacePropertyInfo , constructDOMHTMLImageElementHspace , getDOMHTMLImageElementHspace , setDOMHTMLImageElementHspace , -- ** IsMap DOMHTMLImageElementIsMapPropertyInfo , constructDOMHTMLImageElementIsMap , getDOMHTMLImageElementIsMap , setDOMHTMLImageElementIsMap , -- ** LongDesc DOMHTMLImageElementLongDescPropertyInfo , constructDOMHTMLImageElementLongDesc , getDOMHTMLImageElementLongDesc , setDOMHTMLImageElementLongDesc , -- ** Lowsrc DOMHTMLImageElementLowsrcPropertyInfo , constructDOMHTMLImageElementLowsrc , getDOMHTMLImageElementLowsrc , setDOMHTMLImageElementLowsrc , -- ** Name DOMHTMLImageElementNamePropertyInfo , constructDOMHTMLImageElementName , getDOMHTMLImageElementName , setDOMHTMLImageElementName , -- ** NaturalHeight DOMHTMLImageElementNaturalHeightPropertyInfo, getDOMHTMLImageElementNaturalHeight , -- ** NaturalWidth DOMHTMLImageElementNaturalWidthPropertyInfo, getDOMHTMLImageElementNaturalWidth , -- ** Sizes DOMHTMLImageElementSizesPropertyInfo , constructDOMHTMLImageElementSizes , getDOMHTMLImageElementSizes , setDOMHTMLImageElementSizes , -- ** Src DOMHTMLImageElementSrcPropertyInfo , constructDOMHTMLImageElementSrc , getDOMHTMLImageElementSrc , setDOMHTMLImageElementSrc , -- ** Srcset DOMHTMLImageElementSrcsetPropertyInfo , constructDOMHTMLImageElementSrcset , getDOMHTMLImageElementSrcset , setDOMHTMLImageElementSrcset , -- ** UseMap DOMHTMLImageElementUseMapPropertyInfo , constructDOMHTMLImageElementUseMap , getDOMHTMLImageElementUseMap , setDOMHTMLImageElementUseMap , -- ** Vspace DOMHTMLImageElementVspacePropertyInfo , constructDOMHTMLImageElementVspace , getDOMHTMLImageElementVspace , setDOMHTMLImageElementVspace , -- ** Width DOMHTMLImageElementWidthPropertyInfo , constructDOMHTMLImageElementWidth , getDOMHTMLImageElementWidth , setDOMHTMLImageElementWidth , -- ** X DOMHTMLImageElementXPropertyInfo , getDOMHTMLImageElementX , -- ** Y DOMHTMLImageElementYPropertyInfo , getDOMHTMLImageElementY , ) where import Prelude () import Data.GI.Base.ShortPrelude import qualified Data.Text as T import qualified Data.ByteString.Char8 as B import qualified Data.Map as Map import GI.WebKit2WebExtension.Types import GI.WebKit2WebExtension.Callbacks import qualified GI.GObject as GObject newtype DOMHTMLImageElement = DOMHTMLImageElement (ForeignPtr DOMHTMLImageElement) foreign import ccall "webkit_dom_html_image_element_get_type" c_webkit_dom_html_image_element_get_type :: IO GType type instance ParentTypes DOMHTMLImageElement = DOMHTMLImageElementParentTypes type DOMHTMLImageElementParentTypes = '[DOMHTMLElement, DOMElement, DOMNode, DOMObject, GObject.Object, DOMEventTarget] instance GObject DOMHTMLImageElement where gobjectIsInitiallyUnowned _ = False gobjectType _ = c_webkit_dom_html_image_element_get_type class GObject o => DOMHTMLImageElementK o instance (GObject o, IsDescendantOf DOMHTMLImageElement o) => DOMHTMLImageElementK o toDOMHTMLImageElement :: DOMHTMLImageElementK o => o -> IO DOMHTMLImageElement toDOMHTMLImageElement = unsafeCastTo DOMHTMLImageElement noDOMHTMLImageElement :: Maybe DOMHTMLImageElement noDOMHTMLImageElement = Nothing -- 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 "current-src" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] getDOMHTMLImageElementCurrentSrc :: (MonadIO m, DOMHTMLImageElementK o) => o -> m T.Text getDOMHTMLImageElementCurrentSrc obj = liftIO $ getObjectPropertyString obj "current-src" data DOMHTMLImageElementCurrentSrcPropertyInfo instance AttrInfo DOMHTMLImageElementCurrentSrcPropertyInfo where type AttrAllowedOps DOMHTMLImageElementCurrentSrcPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint DOMHTMLImageElementCurrentSrcPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLImageElementCurrentSrcPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementCurrentSrcPropertyInfo = T.Text type AttrLabel DOMHTMLImageElementCurrentSrcPropertyInfo = "DOMHTMLImageElement::current-src" attrGet _ = getDOMHTMLImageElementCurrentSrc attrSet _ = undefined attrConstruct _ = undefined -- 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 "sizes" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] getDOMHTMLImageElementSizes :: (MonadIO m, DOMHTMLImageElementK o) => o -> m T.Text getDOMHTMLImageElementSizes obj = liftIO $ getObjectPropertyString obj "sizes" setDOMHTMLImageElementSizes :: (MonadIO m, DOMHTMLImageElementK o) => o -> T.Text -> m () setDOMHTMLImageElementSizes obj val = liftIO $ setObjectPropertyString obj "sizes" val constructDOMHTMLImageElementSizes :: T.Text -> IO ([Char], GValue) constructDOMHTMLImageElementSizes val = constructObjectPropertyString "sizes" val data DOMHTMLImageElementSizesPropertyInfo instance AttrInfo DOMHTMLImageElementSizesPropertyInfo where type AttrAllowedOps DOMHTMLImageElementSizesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint DOMHTMLImageElementSizesPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLImageElementSizesPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementSizesPropertyInfo = T.Text type AttrLabel DOMHTMLImageElementSizesPropertyInfo = "DOMHTMLImageElement::sizes" attrGet _ = getDOMHTMLImageElementSizes attrSet _ = setDOMHTMLImageElementSizes attrConstruct _ = constructDOMHTMLImageElementSizes -- 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 = DOMHTMLImageElementAttributeList type DOMHTMLImageElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLImageElementAlignPropertyInfo), '("alt", DOMHTMLImageElementAltPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("border", DOMHTMLImageElementBorderPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("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), '("current-src", DOMHTMLImageElementCurrentSrcPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLImageElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("hspace", DOMHTMLImageElementHspacePropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMElementInnerHtmlPropertyInfo), '("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", DOMElementOuterHtmlPropertyInfo), '("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), '("sizes", DOMHTMLImageElementSizesPropertyInfo), '("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)] :: [(Symbol, *)]) type instance SignalList DOMHTMLImageElement = DOMHTMLImageElementSignalList type DOMHTMLImageElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLImageElement::get_align -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_align" webkit_dom_html_image_element_get_align :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO CString dOMHTMLImageElementGetAlign :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m T.Text dOMHTMLImageElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_align _obj' checkUnexpectedReturnNULL "webkit_dom_html_image_element_get_align" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' -- method DOMHTMLImageElement::get_alt -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_alt" webkit_dom_html_image_element_get_alt :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO CString dOMHTMLImageElementGetAlt :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m T.Text dOMHTMLImageElementGetAlt _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_alt _obj' checkUnexpectedReturnNULL "webkit_dom_html_image_element_get_alt" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' -- method DOMHTMLImageElement::get_border -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_border" webkit_dom_html_image_element_get_border :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO CString dOMHTMLImageElementGetBorder :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m T.Text dOMHTMLImageElementGetBorder _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_border _obj' checkUnexpectedReturnNULL "webkit_dom_html_image_element_get_border" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' -- method DOMHTMLImageElement::get_complete -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_complete" webkit_dom_html_image_element_get_complete :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO CInt dOMHTMLImageElementGetComplete :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m Bool dOMHTMLImageElementGetComplete _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_complete _obj' let result' = (/= 0) result touchManagedPtr _obj return result' -- method DOMHTMLImageElement::get_height -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_height" webkit_dom_html_image_element_get_height :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO Int64 dOMHTMLImageElementGetHeight :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m Int64 dOMHTMLImageElementGetHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_height _obj' touchManagedPtr _obj return result -- method DOMHTMLImageElement::get_hspace -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_hspace" webkit_dom_html_image_element_get_hspace :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO Int64 dOMHTMLImageElementGetHspace :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m Int64 dOMHTMLImageElementGetHspace _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_hspace _obj' touchManagedPtr _obj return result -- method DOMHTMLImageElement::get_is_map -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_is_map" webkit_dom_html_image_element_get_is_map :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO CInt dOMHTMLImageElementGetIsMap :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m Bool dOMHTMLImageElementGetIsMap _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_is_map _obj' let result' = (/= 0) result touchManagedPtr _obj return result' -- method DOMHTMLImageElement::get_long_desc -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_long_desc" webkit_dom_html_image_element_get_long_desc :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO CString dOMHTMLImageElementGetLongDesc :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m T.Text dOMHTMLImageElementGetLongDesc _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_long_desc _obj' checkUnexpectedReturnNULL "webkit_dom_html_image_element_get_long_desc" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' -- method DOMHTMLImageElement::get_lowsrc -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_lowsrc" webkit_dom_html_image_element_get_lowsrc :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO CString dOMHTMLImageElementGetLowsrc :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m T.Text dOMHTMLImageElementGetLowsrc _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_lowsrc _obj' checkUnexpectedReturnNULL "webkit_dom_html_image_element_get_lowsrc" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' -- method DOMHTMLImageElement::get_name -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_name" webkit_dom_html_image_element_get_name :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO CString dOMHTMLImageElementGetName :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m T.Text dOMHTMLImageElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_name _obj' checkUnexpectedReturnNULL "webkit_dom_html_image_element_get_name" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' -- method DOMHTMLImageElement::get_natural_height -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_natural_height" webkit_dom_html_image_element_get_natural_height :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO Int64 dOMHTMLImageElementGetNaturalHeight :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m Int64 dOMHTMLImageElementGetNaturalHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_natural_height _obj' touchManagedPtr _obj return result -- method DOMHTMLImageElement::get_natural_width -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_natural_width" webkit_dom_html_image_element_get_natural_width :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO Int64 dOMHTMLImageElementGetNaturalWidth :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m Int64 dOMHTMLImageElementGetNaturalWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_natural_width _obj' touchManagedPtr _obj return result -- method DOMHTMLImageElement::get_src -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_src" webkit_dom_html_image_element_get_src :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO CString dOMHTMLImageElementGetSrc :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m T.Text dOMHTMLImageElementGetSrc _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_src _obj' checkUnexpectedReturnNULL "webkit_dom_html_image_element_get_src" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' -- method DOMHTMLImageElement::get_use_map -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_use_map" webkit_dom_html_image_element_get_use_map :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO CString dOMHTMLImageElementGetUseMap :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m T.Text dOMHTMLImageElementGetUseMap _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_use_map _obj' checkUnexpectedReturnNULL "webkit_dom_html_image_element_get_use_map" result result' <- cstringToText result freeMem result touchManagedPtr _obj return result' -- method DOMHTMLImageElement::get_vspace -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_vspace" webkit_dom_html_image_element_get_vspace :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO Int64 dOMHTMLImageElementGetVspace :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m Int64 dOMHTMLImageElementGetVspace _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_vspace _obj' touchManagedPtr _obj return result -- method DOMHTMLImageElement::get_width -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_width" webkit_dom_html_image_element_get_width :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO Int64 dOMHTMLImageElementGetWidth :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m Int64 dOMHTMLImageElementGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_width _obj' touchManagedPtr _obj return result -- method DOMHTMLImageElement::get_x -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_x" webkit_dom_html_image_element_get_x :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO Int64 dOMHTMLImageElementGetX :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m Int64 dOMHTMLImageElementGetX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_x _obj' touchManagedPtr _obj return result -- method DOMHTMLImageElement::get_y -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_get_y" webkit_dom_html_image_element_get_y :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" IO Int64 dOMHTMLImageElementGetY :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj m Int64 dOMHTMLImageElementGetY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_y _obj' touchManagedPtr _obj return result -- method DOMHTMLImageElement::set_align -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_set_align" webkit_dom_html_image_element_set_align :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" CString -> -- value : TBasicType TUTF8 IO () dOMHTMLImageElementSetAlign :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj T.Text -> -- value m () dOMHTMLImageElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value webkit_dom_html_image_element_set_align _obj' value' touchManagedPtr _obj freeMem value' return () -- method DOMHTMLImageElement::set_alt -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_set_alt" webkit_dom_html_image_element_set_alt :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" CString -> -- value : TBasicType TUTF8 IO () dOMHTMLImageElementSetAlt :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj T.Text -> -- value m () dOMHTMLImageElementSetAlt _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value webkit_dom_html_image_element_set_alt _obj' value' touchManagedPtr _obj freeMem value' return () -- method DOMHTMLImageElement::set_border -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_set_border" webkit_dom_html_image_element_set_border :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" CString -> -- value : TBasicType TUTF8 IO () dOMHTMLImageElementSetBorder :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj T.Text -> -- value m () dOMHTMLImageElementSetBorder _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value webkit_dom_html_image_element_set_border _obj' value' touchManagedPtr _obj freeMem value' return () -- method DOMHTMLImageElement::set_height -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_set_height" webkit_dom_html_image_element_set_height :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" Int64 -> -- value : TBasicType TInt64 IO () dOMHTMLImageElementSetHeight :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj Int64 -> -- value m () dOMHTMLImageElementSetHeight _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_image_element_set_height _obj' value touchManagedPtr _obj return () -- method DOMHTMLImageElement::set_hspace -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_set_hspace" webkit_dom_html_image_element_set_hspace :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" Int64 -> -- value : TBasicType TInt64 IO () dOMHTMLImageElementSetHspace :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj Int64 -> -- value m () dOMHTMLImageElementSetHspace _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_image_element_set_hspace _obj' value touchManagedPtr _obj return () -- method DOMHTMLImageElement::set_is_map -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_set_is_map" webkit_dom_html_image_element_set_is_map :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" CInt -> -- value : TBasicType TBoolean IO () dOMHTMLImageElementSetIsMap :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj Bool -> -- value m () dOMHTMLImageElementSetIsMap _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value webkit_dom_html_image_element_set_is_map _obj' value' touchManagedPtr _obj return () -- method DOMHTMLImageElement::set_long_desc -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_set_long_desc" webkit_dom_html_image_element_set_long_desc :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" CString -> -- value : TBasicType TUTF8 IO () dOMHTMLImageElementSetLongDesc :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj T.Text -> -- value m () dOMHTMLImageElementSetLongDesc _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value webkit_dom_html_image_element_set_long_desc _obj' value' touchManagedPtr _obj freeMem value' return () -- method DOMHTMLImageElement::set_lowsrc -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_set_lowsrc" webkit_dom_html_image_element_set_lowsrc :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" CString -> -- value : TBasicType TUTF8 IO () dOMHTMLImageElementSetLowsrc :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj T.Text -> -- value m () dOMHTMLImageElementSetLowsrc _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value webkit_dom_html_image_element_set_lowsrc _obj' value' touchManagedPtr _obj freeMem value' return () -- method DOMHTMLImageElement::set_name -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_set_name" webkit_dom_html_image_element_set_name :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" CString -> -- value : TBasicType TUTF8 IO () dOMHTMLImageElementSetName :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj T.Text -> -- value m () dOMHTMLImageElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value webkit_dom_html_image_element_set_name _obj' value' touchManagedPtr _obj freeMem value' return () -- method DOMHTMLImageElement::set_src -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_set_src" webkit_dom_html_image_element_set_src :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" CString -> -- value : TBasicType TUTF8 IO () dOMHTMLImageElementSetSrc :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj T.Text -> -- value m () dOMHTMLImageElementSetSrc _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value webkit_dom_html_image_element_set_src _obj' value' touchManagedPtr _obj freeMem value' return () -- method DOMHTMLImageElement::set_use_map -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_set_use_map" webkit_dom_html_image_element_set_use_map :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" CString -> -- value : TBasicType TUTF8 IO () dOMHTMLImageElementSetUseMap :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj T.Text -> -- value m () dOMHTMLImageElementSetUseMap _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value webkit_dom_html_image_element_set_use_map _obj' value' touchManagedPtr _obj freeMem value' return () -- method DOMHTMLImageElement::set_vspace -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_set_vspace" webkit_dom_html_image_element_set_vspace :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" Int64 -> -- value : TBasicType TInt64 IO () dOMHTMLImageElementSetVspace :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj Int64 -> -- value m () dOMHTMLImageElementSetVspace _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_image_element_set_vspace _obj' value touchManagedPtr _obj return () -- method DOMHTMLImageElement::set_width -- method type : OrdinaryMethod -- Args : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- Lengths : [] -- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit2WebExtension" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False foreign import ccall "webkit_dom_html_image_element_set_width" webkit_dom_html_image_element_set_width :: Ptr DOMHTMLImageElement -> -- _obj : TInterface "WebKit2WebExtension" "DOMHTMLImageElement" Int64 -> -- value : TBasicType TInt64 IO () dOMHTMLImageElementSetWidth :: (MonadIO m, DOMHTMLImageElementK a) => a -> -- _obj Int64 -> -- value m () dOMHTMLImageElementSetWidth _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_image_element_set_width _obj' value touchManagedPtr _obj return ()