{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-} module GHCJS.DOM.JSFFI.Generated.HTMLTableRowElement (js_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, castToHTMLTableRowElement, gTypeHTMLTableRowElement) 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 (JSRef(..), JSString, castRef) import GHCJS.Foreign (jsNull) import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..)) import GHCJS.Marshal (ToJSRef(..), FromJSRef(..)) import GHCJS.Marshal.Pure (PToJSRef(..), PFromJSRef(..)) 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[\"insertCell\"]($2)" js_insertCell :: JSRef HTMLTableRowElement -> Int -> IO (JSRef HTMLElement) -- | insertCell :: (MonadIO m) => HTMLTableRowElement -> Int -> m (Maybe HTMLElement) insertCell self index = liftIO ((js_insertCell (unHTMLTableRowElement self) index) >>= fromJSRef) foreign import javascript unsafe "$1[\"deleteCell\"]($2)" js_deleteCell :: JSRef HTMLTableRowElement -> Int -> IO () -- | deleteCell :: (MonadIO m) => HTMLTableRowElement -> Int -> m () deleteCell self index = liftIO (js_deleteCell (unHTMLTableRowElement self) index) foreign import javascript unsafe "$1[\"rowIndex\"]" js_getRowIndex :: JSRef HTMLTableRowElement -> IO Int -- | getRowIndex :: (MonadIO m) => HTMLTableRowElement -> m Int getRowIndex self = liftIO (js_getRowIndex (unHTMLTableRowElement self)) foreign import javascript unsafe "$1[\"sectionRowIndex\"]" js_getSectionRowIndex :: JSRef HTMLTableRowElement -> IO Int -- | getSectionRowIndex :: (MonadIO m) => HTMLTableRowElement -> m Int getSectionRowIndex self = liftIO (js_getSectionRowIndex (unHTMLTableRowElement self)) foreign import javascript unsafe "$1[\"cells\"]" js_getCells :: JSRef HTMLTableRowElement -> IO (JSRef HTMLCollection) -- | getCells :: (MonadIO m) => HTMLTableRowElement -> m (Maybe HTMLCollection) getCells self = liftIO ((js_getCells (unHTMLTableRowElement self)) >>= fromJSRef) foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign :: JSRef HTMLTableRowElement -> JSString -> IO () -- | setAlign :: (MonadIO m, ToJSString val) => HTMLTableRowElement -> val -> m () setAlign self val = liftIO (js_setAlign (unHTMLTableRowElement self) (toJSString val)) foreign import javascript unsafe "$1[\"align\"]" js_getAlign :: JSRef HTMLTableRowElement -> IO JSString -- | getAlign :: (MonadIO m, FromJSString result) => HTMLTableRowElement -> m result getAlign self = liftIO (fromJSString <$> (js_getAlign (unHTMLTableRowElement self))) foreign import javascript unsafe "$1[\"bgColor\"] = $2;" js_setBgColor :: JSRef HTMLTableRowElement -> JSString -> IO () -- | setBgColor :: (MonadIO m, ToJSString val) => HTMLTableRowElement -> val -> m () setBgColor self val = liftIO (js_setBgColor (unHTMLTableRowElement self) (toJSString val)) foreign import javascript unsafe "$1[\"bgColor\"]" js_getBgColor :: JSRef HTMLTableRowElement -> IO JSString -- | getBgColor :: (MonadIO m, FromJSString result) => HTMLTableRowElement -> m result getBgColor self = liftIO (fromJSString <$> (js_getBgColor (unHTMLTableRowElement self))) foreign import javascript unsafe "$1[\"ch\"] = $2;" js_setCh :: JSRef HTMLTableRowElement -> JSString -> IO () -- | setCh :: (MonadIO m, ToJSString val) => HTMLTableRowElement -> val -> m () setCh self val = liftIO (js_setCh (unHTMLTableRowElement self) (toJSString val)) foreign import javascript unsafe "$1[\"ch\"]" js_getCh :: JSRef HTMLTableRowElement -> IO JSString -- | getCh :: (MonadIO m, FromJSString result) => HTMLTableRowElement -> m result getCh self = liftIO (fromJSString <$> (js_getCh (unHTMLTableRowElement self))) foreign import javascript unsafe "$1[\"chOff\"] = $2;" js_setChOff :: JSRef HTMLTableRowElement -> JSString -> IO () -- | setChOff :: (MonadIO m, ToJSString val) => HTMLTableRowElement -> val -> m () setChOff self val = liftIO (js_setChOff (unHTMLTableRowElement self) (toJSString val)) foreign import javascript unsafe "$1[\"chOff\"]" js_getChOff :: JSRef HTMLTableRowElement -> IO JSString -- | getChOff :: (MonadIO m, FromJSString result) => HTMLTableRowElement -> m result getChOff self = liftIO (fromJSString <$> (js_getChOff (unHTMLTableRowElement self))) foreign import javascript unsafe "$1[\"vAlign\"] = $2;" js_setVAlign :: JSRef HTMLTableRowElement -> JSString -> IO () -- | setVAlign :: (MonadIO m, ToJSString val) => HTMLTableRowElement -> val -> m () setVAlign self val = liftIO (js_setVAlign (unHTMLTableRowElement self) (toJSString val)) foreign import javascript unsafe "$1[\"vAlign\"]" js_getVAlign :: JSRef HTMLTableRowElement -> IO JSString -- | getVAlign :: (MonadIO m, FromJSString result) => HTMLTableRowElement -> m result getVAlign self = liftIO (fromJSString <$> (js_getVAlign (unHTMLTableRowElement self)))