{-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE ForeignFunctionInterface #-} {-# LANGUAGE JavaScriptFFI #-} -- For HasCallStack compatibility {-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-} module GHCJS.DOM.JSFFI.Generated.HTMLTableCellElement (js_getCellIndex, getCellIndex, js_setAbbr, setAbbr, js_getAbbr, getAbbr, js_setAlign, setAlign, js_getAlign, getAlign, js_setAxis, setAxis, js_getAxis, getAxis, js_setBgColor, setBgColor, js_getBgColor, getBgColor, js_setCh, setCh, js_getCh, getCh, js_setChOff, setChOff, js_getChOff, getChOff, js_setColSpan, setColSpan, js_getColSpan, getColSpan, js_setHeaders, setHeaders, js_getHeaders, getHeaders, js_setHeight, setHeight, js_getHeight, getHeight, js_setNoWrap, setNoWrap, js_getNoWrap, getNoWrap, js_setRowSpan, setRowSpan, js_getRowSpan, getRowSpan, js_setScope, setScope, js_getScope, getScope, js_setVAlign, setVAlign, js_getVAlign, getVAlign, js_setWidth, setWidth, js_getWidth, getWidth, HTMLTableCellElement(..), gTypeHTMLTableCellElement) 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[\"cellIndex\"]" js_getCellIndex :: HTMLTableCellElement -> IO Int -- | getCellIndex :: (MonadIO m) => HTMLTableCellElement -> m Int getCellIndex self = liftIO (js_getCellIndex (self)) foreign import javascript unsafe "$1[\"abbr\"] = $2;" js_setAbbr :: HTMLTableCellElement -> JSString -> IO () -- | setAbbr :: (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m () setAbbr self val = liftIO (js_setAbbr (self) (toJSString val)) foreign import javascript unsafe "$1[\"abbr\"]" js_getAbbr :: HTMLTableCellElement -> IO JSString -- | getAbbr :: (MonadIO m, FromJSString result) => HTMLTableCellElement -> m result getAbbr self = liftIO (fromJSString <$> (js_getAbbr (self))) foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign :: HTMLTableCellElement -> JSString -> IO () -- | setAlign :: (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m () setAlign self val = liftIO (js_setAlign (self) (toJSString val)) foreign import javascript unsafe "$1[\"align\"]" js_getAlign :: HTMLTableCellElement -> IO JSString -- | getAlign :: (MonadIO m, FromJSString result) => HTMLTableCellElement -> m result getAlign self = liftIO (fromJSString <$> (js_getAlign (self))) foreign import javascript unsafe "$1[\"axis\"] = $2;" js_setAxis :: HTMLTableCellElement -> JSString -> IO () -- | setAxis :: (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m () setAxis self val = liftIO (js_setAxis (self) (toJSString val)) foreign import javascript unsafe "$1[\"axis\"]" js_getAxis :: HTMLTableCellElement -> IO JSString -- | getAxis :: (MonadIO m, FromJSString result) => HTMLTableCellElement -> m result getAxis self = liftIO (fromJSString <$> (js_getAxis (self))) foreign import javascript unsafe "$1[\"bgColor\"] = $2;" js_setBgColor :: HTMLTableCellElement -> JSString -> IO () -- | setBgColor :: (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m () setBgColor self val = liftIO (js_setBgColor (self) (toJSString val)) foreign import javascript unsafe "$1[\"bgColor\"]" js_getBgColor :: HTMLTableCellElement -> IO JSString -- | getBgColor :: (MonadIO m, FromJSString result) => HTMLTableCellElement -> m result getBgColor self = liftIO (fromJSString <$> (js_getBgColor (self))) foreign import javascript unsafe "$1[\"ch\"] = $2;" js_setCh :: HTMLTableCellElement -> JSString -> IO () -- | setCh :: (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m () setCh self val = liftIO (js_setCh (self) (toJSString val)) foreign import javascript unsafe "$1[\"ch\"]" js_getCh :: HTMLTableCellElement -> IO JSString -- | getCh :: (MonadIO m, FromJSString result) => HTMLTableCellElement -> m result getCh self = liftIO (fromJSString <$> (js_getCh (self))) foreign import javascript unsafe "$1[\"chOff\"] = $2;" js_setChOff :: HTMLTableCellElement -> JSString -> IO () -- | setChOff :: (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m () setChOff self val = liftIO (js_setChOff (self) (toJSString val)) foreign import javascript unsafe "$1[\"chOff\"]" js_getChOff :: HTMLTableCellElement -> IO JSString -- | getChOff :: (MonadIO m, FromJSString result) => HTMLTableCellElement -> m result getChOff self = liftIO (fromJSString <$> (js_getChOff (self))) foreign import javascript unsafe "$1[\"colSpan\"] = $2;" js_setColSpan :: HTMLTableCellElement -> Int -> IO () -- | setColSpan :: (MonadIO m) => HTMLTableCellElement -> Int -> m () setColSpan self val = liftIO (js_setColSpan (self) val) foreign import javascript unsafe "$1[\"colSpan\"]" js_getColSpan :: HTMLTableCellElement -> IO Int -- | getColSpan :: (MonadIO m) => HTMLTableCellElement -> m Int getColSpan self = liftIO (js_getColSpan (self)) foreign import javascript unsafe "$1[\"headers\"] = $2;" js_setHeaders :: HTMLTableCellElement -> JSString -> IO () -- | setHeaders :: (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m () setHeaders self val = liftIO (js_setHeaders (self) (toJSString val)) foreign import javascript unsafe "$1[\"headers\"]" js_getHeaders :: HTMLTableCellElement -> IO JSString -- | getHeaders :: (MonadIO m, FromJSString result) => HTMLTableCellElement -> m result getHeaders self = liftIO (fromJSString <$> (js_getHeaders (self))) foreign import javascript unsafe "$1[\"height\"] = $2;" js_setHeight :: HTMLTableCellElement -> JSString -> IO () -- | setHeight :: (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m () setHeight self val = liftIO (js_setHeight (self) (toJSString val)) foreign import javascript unsafe "$1[\"height\"]" js_getHeight :: HTMLTableCellElement -> IO JSString -- | getHeight :: (MonadIO m, FromJSString result) => HTMLTableCellElement -> m result getHeight self = liftIO (fromJSString <$> (js_getHeight (self))) foreign import javascript unsafe "$1[\"noWrap\"] = $2;" js_setNoWrap :: HTMLTableCellElement -> Bool -> IO () -- | setNoWrap :: (MonadIO m) => HTMLTableCellElement -> Bool -> m () setNoWrap self val = liftIO (js_setNoWrap (self) val) foreign import javascript unsafe "($1[\"noWrap\"] ? 1 : 0)" js_getNoWrap :: HTMLTableCellElement -> IO Bool -- | getNoWrap :: (MonadIO m) => HTMLTableCellElement -> m Bool getNoWrap self = liftIO (js_getNoWrap (self)) foreign import javascript unsafe "$1[\"rowSpan\"] = $2;" js_setRowSpan :: HTMLTableCellElement -> Int -> IO () -- | setRowSpan :: (MonadIO m) => HTMLTableCellElement -> Int -> m () setRowSpan self val = liftIO (js_setRowSpan (self) val) foreign import javascript unsafe "$1[\"rowSpan\"]" js_getRowSpan :: HTMLTableCellElement -> IO Int -- | getRowSpan :: (MonadIO m) => HTMLTableCellElement -> m Int getRowSpan self = liftIO (js_getRowSpan (self)) foreign import javascript unsafe "$1[\"scope\"] = $2;" js_setScope :: HTMLTableCellElement -> JSString -> IO () -- | setScope :: (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m () setScope self val = liftIO (js_setScope (self) (toJSString val)) foreign import javascript unsafe "$1[\"scope\"]" js_getScope :: HTMLTableCellElement -> IO JSString -- | getScope :: (MonadIO m, FromJSString result) => HTMLTableCellElement -> m result getScope self = liftIO (fromJSString <$> (js_getScope (self))) foreign import javascript unsafe "$1[\"vAlign\"] = $2;" js_setVAlign :: HTMLTableCellElement -> JSString -> IO () -- | setVAlign :: (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m () setVAlign self val = liftIO (js_setVAlign (self) (toJSString val)) foreign import javascript unsafe "$1[\"vAlign\"]" js_getVAlign :: HTMLTableCellElement -> IO JSString -- | getVAlign :: (MonadIO m, FromJSString result) => HTMLTableCellElement -> m result getVAlign self = liftIO (fromJSString <$> (js_getVAlign (self))) foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth :: HTMLTableCellElement -> JSString -> IO () -- | setWidth :: (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m () setWidth self val = liftIO (js_setWidth (self) (toJSString val)) foreign import javascript unsafe "$1[\"width\"]" js_getWidth :: HTMLTableCellElement -> IO JSString -- | getWidth :: (MonadIO m, FromJSString result) => HTMLTableCellElement -> m result getWidth self = liftIO (fromJSString <$> (js_getWidth (self)))