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(..), gTypeHTMLImageElement)
where
import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)
import qualified Prelude (error)
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 (void)
import Control.Monad.IO.Class (MonadIO(..))
import Data.Int (Int64)
import Data.Word (Word, Word64)
import Data.Maybe (fromJust)
import GHCJS.DOM.Types
import Control.Applicative ((<$>))
import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)
import GHCJS.DOM.JSFFI.Generated.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))