DOMHTMLImageElement.hs

{- |
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", DOMElementChildrenPropertyInfo), '("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 ()