{-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE ForeignFunctionInterface #-} {-# LANGUAGE JavaScriptFFI #-} -- For HasCallStack compatibility {-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-} module GHCJS.DOM.JSFFI.Generated.HTMLTableRowElement (js_insertCell, insertCell, insertCell_, js_deleteCell, deleteCell, js_getRowIndex, getRowIndex, js_getSectionRowIndex, getSectionRowIndex, js_getCells, getCells, js_setAlign, setAlign, js_getAlign, getAlign, js_setBgColor, setBgColor, js_getBgColor, getBgColor, js_setCh, setCh, js_getCh, getCh, js_setChOff, setChOff, js_getChOff, getChOff, js_setVAlign, setVAlign, js_getVAlign, getVAlign, HTMLTableRowElement(..), gTypeHTMLTableRowElement) 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, jsUndefined) 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 Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>)) import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums foreign import javascript safe "$1[\"insertCell\"]($2)" js_insertCell :: HTMLTableRowElement -> Optional Int -> IO HTMLElement -- | insertCell :: (MonadIO m) => HTMLTableRowElement -> Maybe Int -> m HTMLElement insertCell self index = liftIO (js_insertCell self (maybeToOptional index)) -- | insertCell_ :: (MonadIO m) => HTMLTableRowElement -> Maybe Int -> m () insertCell_ self index = liftIO (void (js_insertCell self (maybeToOptional index))) foreign import javascript safe "$1[\"deleteCell\"]($2)" js_deleteCell :: HTMLTableRowElement -> Int -> IO () -- | deleteCell :: (MonadIO m) => HTMLTableRowElement -> Int -> m () deleteCell self index = liftIO (js_deleteCell self index) foreign import javascript unsafe "$1[\"rowIndex\"]" js_getRowIndex :: HTMLTableRowElement -> IO Int -- | getRowIndex :: (MonadIO m) => HTMLTableRowElement -> m Int getRowIndex self = liftIO (js_getRowIndex self) foreign import javascript unsafe "$1[\"sectionRowIndex\"]" js_getSectionRowIndex :: HTMLTableRowElement -> IO Int -- | getSectionRowIndex :: (MonadIO m) => HTMLTableRowElement -> m Int getSectionRowIndex self = liftIO (js_getSectionRowIndex self) foreign import javascript unsafe "$1[\"cells\"]" js_getCells :: HTMLTableRowElement -> IO HTMLCollection -- | getCells :: (MonadIO m) => HTMLTableRowElement -> m HTMLCollection getCells self = liftIO (js_getCells self) foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign :: HTMLTableRowElement -> JSString -> IO () -- | setAlign :: (MonadIO m, ToJSString val) => HTMLTableRowElement -> val -> m () setAlign self val = liftIO (js_setAlign self (toJSString val)) foreign import javascript unsafe "$1[\"align\"]" js_getAlign :: HTMLTableRowElement -> IO JSString -- | getAlign :: (MonadIO m, FromJSString result) => HTMLTableRowElement -> m result getAlign self = liftIO (fromJSString <$> (js_getAlign self)) foreign import javascript unsafe "$1[\"bgColor\"] = $2;" js_setBgColor :: HTMLTableRowElement -> JSString -> IO () -- | setBgColor :: (MonadIO m, ToJSString val) => HTMLTableRowElement -> val -> m () setBgColor self val = liftIO (js_setBgColor self (toJSString val)) foreign import javascript unsafe "$1[\"bgColor\"]" js_getBgColor :: HTMLTableRowElement -> IO JSString -- | getBgColor :: (MonadIO m, FromJSString result) => HTMLTableRowElement -> m result getBgColor self = liftIO (fromJSString <$> (js_getBgColor self)) foreign import javascript unsafe "$1[\"ch\"] = $2;" js_setCh :: HTMLTableRowElement -> JSString -> IO () -- | setCh :: (MonadIO m, ToJSString val) => HTMLTableRowElement -> val -> m () setCh self val = liftIO (js_setCh self (toJSString val)) foreign import javascript unsafe "$1[\"ch\"]" js_getCh :: HTMLTableRowElement -> IO JSString -- | getCh :: (MonadIO m, FromJSString result) => HTMLTableRowElement -> m result getCh self = liftIO (fromJSString <$> (js_getCh self)) foreign import javascript unsafe "$1[\"chOff\"] = $2;" js_setChOff :: HTMLTableRowElement -> JSString -> IO () -- | setChOff :: (MonadIO m, ToJSString val) => HTMLTableRowElement -> val -> m () setChOff self val = liftIO (js_setChOff self (toJSString val)) foreign import javascript unsafe "$1[\"chOff\"]" js_getChOff :: HTMLTableRowElement -> IO JSString -- | getChOff :: (MonadIO m, FromJSString result) => HTMLTableRowElement -> m result getChOff self = liftIO (fromJSString <$> (js_getChOff self)) foreign import javascript unsafe "$1[\"vAlign\"] = $2;" js_setVAlign :: HTMLTableRowElement -> JSString -> IO () -- | setVAlign :: (MonadIO m, ToJSString val) => HTMLTableRowElement -> val -> m () setVAlign self val = liftIO (js_setVAlign self (toJSString val)) foreign import javascript unsafe "$1[\"vAlign\"]" js_getVAlign :: HTMLTableRowElement -> IO JSString -- | getVAlign :: (MonadIO m, FromJSString result) => HTMLTableRowElement -> m result getVAlign self = liftIO (fromJSString <$> (js_getVAlign self))