{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-} module GHCJS.DOM.JSFFI.Generated.HTMLImageElement (js_setName, setName, js_getName, getName, js_setAlign, setAlign, js_getAlign, getAlign, js_setAlt, setAlt, js_getAlt, getAlt, js_setBorder, setBorder, js_getBorder, getBorder, js_setCrossOrigin, setCrossOrigin, js_getCrossOrigin, getCrossOrigin, js_setHeight, setHeight, js_getHeight, getHeight, js_setHspace, setHspace, js_getHspace, getHspace, js_setIsMap, setIsMap, js_getIsMap, getIsMap, js_setLongDesc, setLongDesc, js_getLongDesc, getLongDesc, js_setSrc, setSrc, js_getSrc, getSrc, js_setSrcset, setSrcset, js_getSrcset, getSrcset, js_setSizes, setSizes, js_getSizes, getSizes, js_getCurrentSrc, getCurrentSrc, js_setUseMap, setUseMap, js_getUseMap, getUseMap, js_setVspace, setVspace, js_getVspace, getVspace, js_setWidth, setWidth, js_getWidth, getWidth, js_getComplete, getComplete, js_setLowsrc, setLowsrc, js_getLowsrc, getLowsrc, js_getNaturalHeight, getNaturalHeight, js_getNaturalWidth, getNaturalWidth, js_getX, getX, js_getY, getY, HTMLImageElement, castToHTMLImageElement, gTypeHTMLImageElement) where import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord) import Data.Typeable (Typeable) import GHCJS.Types (JSVal(..), JSString) import GHCJS.Foreign (jsNull) import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..)) import GHCJS.Marshal (ToJSVal(..), FromJSVal(..)) import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..)) import Control.Monad.IO.Class (MonadIO(..)) import Data.Int (Int64) import Data.Word (Word, Word64) import GHCJS.DOM.Types import Control.Applicative ((<$>)) import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName) import GHCJS.DOM.Enums foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName :: HTMLImageElement -> JSString -> IO () -- | setName :: (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m () setName self val = liftIO (js_setName (self) (toJSString val)) foreign import javascript unsafe "$1[\"name\"]" js_getName :: HTMLImageElement -> IO JSString -- | getName :: (MonadIO m, FromJSString result) => HTMLImageElement -> m result getName self = liftIO (fromJSString <$> (js_getName (self))) foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign :: HTMLImageElement -> JSString -> IO () -- | setAlign :: (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m () setAlign self val = liftIO (js_setAlign (self) (toJSString val)) foreign import javascript unsafe "$1[\"align\"]" js_getAlign :: HTMLImageElement -> IO JSString -- | getAlign :: (MonadIO m, FromJSString result) => HTMLImageElement -> m result getAlign self = liftIO (fromJSString <$> (js_getAlign (self))) foreign import javascript unsafe "$1[\"alt\"] = $2;" js_setAlt :: HTMLImageElement -> JSString -> IO () -- | setAlt :: (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m () setAlt self val = liftIO (js_setAlt (self) (toJSString val)) foreign import javascript unsafe "$1[\"alt\"]" js_getAlt :: HTMLImageElement -> IO JSString -- | getAlt :: (MonadIO m, FromJSString result) => HTMLImageElement -> m result getAlt self = liftIO (fromJSString <$> (js_getAlt (self))) foreign import javascript unsafe "$1[\"border\"] = $2;" js_setBorder :: HTMLImageElement -> JSString -> IO () -- | setBorder :: (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m () setBorder self val = liftIO (js_setBorder (self) (toJSString val)) foreign import javascript unsafe "$1[\"border\"]" js_getBorder :: HTMLImageElement -> IO JSString -- | getBorder :: (MonadIO m, FromJSString result) => HTMLImageElement -> m result getBorder self = liftIO (fromJSString <$> (js_getBorder (self))) foreign import javascript unsafe "$1[\"crossOrigin\"] = $2;" js_setCrossOrigin :: HTMLImageElement -> JSString -> IO () -- | setCrossOrigin :: (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m () setCrossOrigin self val = liftIO (js_setCrossOrigin (self) (toJSString val)) foreign import javascript unsafe "$1[\"crossOrigin\"]" js_getCrossOrigin :: HTMLImageElement -> IO JSString -- | getCrossOrigin :: (MonadIO m, FromJSString result) => HTMLImageElement -> m result getCrossOrigin self = liftIO (fromJSString <$> (js_getCrossOrigin (self))) foreign import javascript unsafe "$1[\"height\"] = $2;" js_setHeight :: HTMLImageElement -> Int -> IO () -- | setHeight :: (MonadIO m) => HTMLImageElement -> Int -> m () setHeight self val = liftIO (js_setHeight (self) val) foreign import javascript unsafe "$1[\"height\"]" js_getHeight :: HTMLImageElement -> IO Int -- | getHeight :: (MonadIO m) => HTMLImageElement -> m Int getHeight self = liftIO (js_getHeight (self)) foreign import javascript unsafe "$1[\"hspace\"] = $2;" js_setHspace :: HTMLImageElement -> Int -> IO () -- | setHspace :: (MonadIO m) => HTMLImageElement -> Int -> m () setHspace self val = liftIO (js_setHspace (self) val) foreign import javascript unsafe "$1[\"hspace\"]" js_getHspace :: HTMLImageElement -> IO Int -- | getHspace :: (MonadIO m) => HTMLImageElement -> m Int getHspace self = liftIO (js_getHspace (self)) foreign import javascript unsafe "$1[\"isMap\"] = $2;" js_setIsMap :: HTMLImageElement -> Bool -> IO () -- | setIsMap :: (MonadIO m) => HTMLImageElement -> Bool -> m () setIsMap self val = liftIO (js_setIsMap (self) val) foreign import javascript unsafe "($1[\"isMap\"] ? 1 : 0)" js_getIsMap :: HTMLImageElement -> IO Bool -- | getIsMap :: (MonadIO m) => HTMLImageElement -> m Bool getIsMap self = liftIO (js_getIsMap (self)) foreign import javascript unsafe "$1[\"longDesc\"] = $2;" js_setLongDesc :: HTMLImageElement -> JSString -> IO () -- | setLongDesc :: (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m () setLongDesc self val = liftIO (js_setLongDesc (self) (toJSString val)) foreign import javascript unsafe "$1[\"longDesc\"]" js_getLongDesc :: HTMLImageElement -> IO JSString -- | getLongDesc :: (MonadIO m, FromJSString result) => HTMLImageElement -> m result getLongDesc self = liftIO (fromJSString <$> (js_getLongDesc (self))) foreign import javascript unsafe "$1[\"src\"] = $2;" js_setSrc :: HTMLImageElement -> JSString -> IO () -- | setSrc :: (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m () setSrc self val = liftIO (js_setSrc (self) (toJSString val)) foreign import javascript unsafe "$1[\"src\"]" js_getSrc :: HTMLImageElement -> IO JSString -- | getSrc :: (MonadIO m, FromJSString result) => HTMLImageElement -> m result getSrc self = liftIO (fromJSString <$> (js_getSrc (self))) foreign import javascript unsafe "$1[\"srcset\"] = $2;" js_setSrcset :: HTMLImageElement -> JSString -> IO () -- | setSrcset :: (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m () setSrcset self val = liftIO (js_setSrcset (self) (toJSString val)) foreign import javascript unsafe "$1[\"srcset\"]" js_getSrcset :: HTMLImageElement -> IO JSString -- | getSrcset :: (MonadIO m, FromJSString result) => HTMLImageElement -> m result getSrcset self = liftIO (fromJSString <$> (js_getSrcset (self))) foreign import javascript unsafe "$1[\"sizes\"] = $2;" js_setSizes :: HTMLImageElement -> JSString -> IO () -- | setSizes :: (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m () setSizes self val = liftIO (js_setSizes (self) (toJSString val)) foreign import javascript unsafe "$1[\"sizes\"]" js_getSizes :: HTMLImageElement -> IO JSString -- | getSizes :: (MonadIO m, FromJSString result) => HTMLImageElement -> m result getSizes self = liftIO (fromJSString <$> (js_getSizes (self))) foreign import javascript unsafe "$1[\"currentSrc\"]" js_getCurrentSrc :: HTMLImageElement -> IO JSString -- | getCurrentSrc :: (MonadIO m, FromJSString result) => HTMLImageElement -> m result getCurrentSrc self = liftIO (fromJSString <$> (js_getCurrentSrc (self))) foreign import javascript unsafe "$1[\"useMap\"] = $2;" js_setUseMap :: HTMLImageElement -> JSString -> IO () -- | setUseMap :: (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m () setUseMap self val = liftIO (js_setUseMap (self) (toJSString val)) foreign import javascript unsafe "$1[\"useMap\"]" js_getUseMap :: HTMLImageElement -> IO JSString -- | getUseMap :: (MonadIO m, FromJSString result) => HTMLImageElement -> m result getUseMap self = liftIO (fromJSString <$> (js_getUseMap (self))) foreign import javascript unsafe "$1[\"vspace\"] = $2;" js_setVspace :: HTMLImageElement -> Int -> IO () -- | setVspace :: (MonadIO m) => HTMLImageElement -> Int -> m () setVspace self val = liftIO (js_setVspace (self) val) foreign import javascript unsafe "$1[\"vspace\"]" js_getVspace :: HTMLImageElement -> IO Int -- | getVspace :: (MonadIO m) => HTMLImageElement -> m Int getVspace self = liftIO (js_getVspace (self)) foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth :: HTMLImageElement -> Int -> IO () -- | setWidth :: (MonadIO m) => HTMLImageElement -> Int -> m () setWidth self val = liftIO (js_setWidth (self) val) foreign import javascript unsafe "$1[\"width\"]" js_getWidth :: HTMLImageElement -> IO Int -- | getWidth :: (MonadIO m) => HTMLImageElement -> m Int getWidth self = liftIO (js_getWidth (self)) foreign import javascript unsafe "($1[\"complete\"] ? 1 : 0)" js_getComplete :: HTMLImageElement -> IO Bool -- | getComplete :: (MonadIO m) => HTMLImageElement -> m Bool getComplete self = liftIO (js_getComplete (self)) foreign import javascript unsafe "$1[\"lowsrc\"] = $2;" js_setLowsrc :: HTMLImageElement -> JSString -> IO () -- | setLowsrc :: (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m () setLowsrc self val = liftIO (js_setLowsrc (self) (toJSString val)) foreign import javascript unsafe "$1[\"lowsrc\"]" js_getLowsrc :: HTMLImageElement -> IO JSString -- | getLowsrc :: (MonadIO m, FromJSString result) => HTMLImageElement -> m result getLowsrc self = liftIO (fromJSString <$> (js_getLowsrc (self))) foreign import javascript unsafe "$1[\"naturalHeight\"]" js_getNaturalHeight :: HTMLImageElement -> IO Int -- | getNaturalHeight :: (MonadIO m) => HTMLImageElement -> m Int getNaturalHeight self = liftIO (js_getNaturalHeight (self)) foreign import javascript unsafe "$1[\"naturalWidth\"]" js_getNaturalWidth :: HTMLImageElement -> IO Int -- | getNaturalWidth :: (MonadIO m) => HTMLImageElement -> m Int getNaturalWidth self = liftIO (js_getNaturalWidth (self)) foreign import javascript unsafe "$1[\"x\"]" js_getX :: HTMLImageElement -> IO Int -- | getX :: (MonadIO m) => HTMLImageElement -> m Int getX self = liftIO (js_getX (self)) foreign import javascript unsafe "$1[\"y\"]" js_getY :: HTMLImageElement -> IO Int -- | getY :: (MonadIO m) => HTMLImageElement -> m Int getY self = liftIO (js_getY (self))