module GHCJS.DOM.JSFFI.Generated.HTMLTableElement
(js_createTHead, createTHead, createTHead_, createTHeadUnsafe,
createTHeadUnchecked, js_deleteTHead, deleteTHead, js_createTFoot,
createTFoot, createTFoot_, createTFootUnsafe, createTFootUnchecked,
js_deleteTFoot, deleteTFoot, js_createTBody, createTBody,
createTBody_, createTBodyUnsafe, createTBodyUnchecked,
js_createCaption, createCaption, createCaption_,
createCaptionUnsafe, createCaptionUnchecked, js_deleteCaption,
deleteCaption, js_insertRow, insertRow, insertRow_,
insertRowUnsafe, insertRowUnchecked, js_deleteRow, deleteRow,
js_setCaption, setCaption, js_getCaption, getCaption,
getCaptionUnsafe, getCaptionUnchecked, js_setTHead, setTHead,
js_getTHead, getTHead, getTHeadUnsafe, getTHeadUnchecked,
js_setTFoot, setTFoot, js_getTFoot, getTFoot, getTFootUnsafe,
getTFootUnchecked, js_getRows, getRows, getRowsUnsafe,
getRowsUnchecked, js_getTBodies, getTBodies, getTBodiesUnsafe,
getTBodiesUnchecked, js_setAlign, setAlign, js_getAlign, getAlign,
js_setBgColor, setBgColor, js_getBgColor, getBgColor, js_setBorder,
setBorder, js_getBorder, getBorder, js_setCellPadding,
setCellPadding, js_getCellPadding, getCellPadding,
js_setCellSpacing, setCellSpacing, js_getCellSpacing,
getCellSpacing, js_setFrame, setFrame, js_getFrame, getFrame,
js_setRules, setRules, js_getRules, getRules, js_setSummary,
setSummary, js_getSummary, getSummary, js_setWidth, setWidth,
js_getWidth, getWidth, HTMLTableElement(..), gTypeHTMLTableElement)
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[\"createTHead\"]()"
js_createTHead :: HTMLTableElement -> IO (Nullable HTMLElement)
createTHead ::
(MonadIO m) => HTMLTableElement -> m (Maybe HTMLElement)
createTHead self
= liftIO (nullableToMaybe <$> (js_createTHead (self)))
createTHead_ :: (MonadIO m) => HTMLTableElement -> m ()
createTHead_ self = liftIO (void (js_createTHead (self)))
createTHeadUnsafe ::
(MonadIO m, HasCallStack) => HTMLTableElement -> m HTMLElement
createTHeadUnsafe self
= liftIO
((nullableToMaybe <$> (js_createTHead (self))) >>=
maybe (Prelude.error "Nothing to return") return)
createTHeadUnchecked ::
(MonadIO m) => HTMLTableElement -> m HTMLElement
createTHeadUnchecked self
= liftIO (fromJust . nullableToMaybe <$> (js_createTHead (self)))
foreign import javascript unsafe "$1[\"deleteTHead\"]()"
js_deleteTHead :: HTMLTableElement -> IO ()
deleteTHead :: (MonadIO m) => HTMLTableElement -> m ()
deleteTHead self = liftIO (js_deleteTHead (self))
foreign import javascript unsafe "$1[\"createTFoot\"]()"
js_createTFoot :: HTMLTableElement -> IO (Nullable HTMLElement)
createTFoot ::
(MonadIO m) => HTMLTableElement -> m (Maybe HTMLElement)
createTFoot self
= liftIO (nullableToMaybe <$> (js_createTFoot (self)))
createTFoot_ :: (MonadIO m) => HTMLTableElement -> m ()
createTFoot_ self = liftIO (void (js_createTFoot (self)))
createTFootUnsafe ::
(MonadIO m, HasCallStack) => HTMLTableElement -> m HTMLElement
createTFootUnsafe self
= liftIO
((nullableToMaybe <$> (js_createTFoot (self))) >>=
maybe (Prelude.error "Nothing to return") return)
createTFootUnchecked ::
(MonadIO m) => HTMLTableElement -> m HTMLElement
createTFootUnchecked self
= liftIO (fromJust . nullableToMaybe <$> (js_createTFoot (self)))
foreign import javascript unsafe "$1[\"deleteTFoot\"]()"
js_deleteTFoot :: HTMLTableElement -> IO ()
deleteTFoot :: (MonadIO m) => HTMLTableElement -> m ()
deleteTFoot self = liftIO (js_deleteTFoot (self))
foreign import javascript unsafe "$1[\"createTBody\"]()"
js_createTBody :: HTMLTableElement -> IO (Nullable HTMLElement)
createTBody ::
(MonadIO m) => HTMLTableElement -> m (Maybe HTMLElement)
createTBody self
= liftIO (nullableToMaybe <$> (js_createTBody (self)))
createTBody_ :: (MonadIO m) => HTMLTableElement -> m ()
createTBody_ self = liftIO (void (js_createTBody (self)))
createTBodyUnsafe ::
(MonadIO m, HasCallStack) => HTMLTableElement -> m HTMLElement
createTBodyUnsafe self
= liftIO
((nullableToMaybe <$> (js_createTBody (self))) >>=
maybe (Prelude.error "Nothing to return") return)
createTBodyUnchecked ::
(MonadIO m) => HTMLTableElement -> m HTMLElement
createTBodyUnchecked self
= liftIO (fromJust . nullableToMaybe <$> (js_createTBody (self)))
foreign import javascript unsafe "$1[\"createCaption\"]()"
js_createCaption :: HTMLTableElement -> IO (Nullable HTMLElement)
createCaption ::
(MonadIO m) => HTMLTableElement -> m (Maybe HTMLElement)
createCaption self
= liftIO (nullableToMaybe <$> (js_createCaption (self)))
createCaption_ :: (MonadIO m) => HTMLTableElement -> m ()
createCaption_ self = liftIO (void (js_createCaption (self)))
createCaptionUnsafe ::
(MonadIO m, HasCallStack) => HTMLTableElement -> m HTMLElement
createCaptionUnsafe self
= liftIO
((nullableToMaybe <$> (js_createCaption (self))) >>=
maybe (Prelude.error "Nothing to return") return)
createCaptionUnchecked ::
(MonadIO m) => HTMLTableElement -> m HTMLElement
createCaptionUnchecked self
= liftIO (fromJust . nullableToMaybe <$> (js_createCaption (self)))
foreign import javascript unsafe "$1[\"deleteCaption\"]()"
js_deleteCaption :: HTMLTableElement -> IO ()
deleteCaption :: (MonadIO m) => HTMLTableElement -> m ()
deleteCaption self = liftIO (js_deleteCaption (self))
foreign import javascript unsafe "$1[\"insertRow\"]($2)"
js_insertRow ::
HTMLTableElement -> Int -> IO (Nullable HTMLElement)
insertRow ::
(MonadIO m) => HTMLTableElement -> Int -> m (Maybe HTMLElement)
insertRow self index
= liftIO (nullableToMaybe <$> (js_insertRow (self) index))
insertRow_ :: (MonadIO m) => HTMLTableElement -> Int -> m ()
insertRow_ self index = liftIO (void (js_insertRow (self) index))
insertRowUnsafe ::
(MonadIO m, HasCallStack) =>
HTMLTableElement -> Int -> m HTMLElement
insertRowUnsafe self index
= liftIO
((nullableToMaybe <$> (js_insertRow (self) index)) >>=
maybe (Prelude.error "Nothing to return") return)
insertRowUnchecked ::
(MonadIO m) => HTMLTableElement -> Int -> m HTMLElement
insertRowUnchecked self index
= liftIO
(fromJust . nullableToMaybe <$> (js_insertRow (self) index))
foreign import javascript unsafe "$1[\"deleteRow\"]($2)"
js_deleteRow :: HTMLTableElement -> Int -> IO ()
deleteRow :: (MonadIO m) => HTMLTableElement -> Int -> m ()
deleteRow self index = liftIO (js_deleteRow (self) index)
foreign import javascript unsafe "$1[\"caption\"] = $2;"
js_setCaption ::
HTMLTableElement -> Nullable HTMLTableCaptionElement -> IO ()
setCaption ::
(MonadIO m) =>
HTMLTableElement -> Maybe HTMLTableCaptionElement -> m ()
setCaption self val
= liftIO (js_setCaption (self) (maybeToNullable val))
foreign import javascript unsafe "$1[\"caption\"]" js_getCaption ::
HTMLTableElement -> IO (Nullable HTMLTableCaptionElement)
getCaption ::
(MonadIO m) =>
HTMLTableElement -> m (Maybe HTMLTableCaptionElement)
getCaption self
= liftIO (nullableToMaybe <$> (js_getCaption (self)))
getCaptionUnsafe ::
(MonadIO m, HasCallStack) =>
HTMLTableElement -> m HTMLTableCaptionElement
getCaptionUnsafe self
= liftIO
((nullableToMaybe <$> (js_getCaption (self))) >>=
maybe (Prelude.error "Nothing to return") return)
getCaptionUnchecked ::
(MonadIO m) => HTMLTableElement -> m HTMLTableCaptionElement
getCaptionUnchecked self
= liftIO (fromJust . nullableToMaybe <$> (js_getCaption (self)))
foreign import javascript unsafe "$1[\"tHead\"] = $2;" js_setTHead
:: HTMLTableElement -> Nullable HTMLTableSectionElement -> IO ()
setTHead ::
(MonadIO m) =>
HTMLTableElement -> Maybe HTMLTableSectionElement -> m ()
setTHead self val
= liftIO (js_setTHead (self) (maybeToNullable val))
foreign import javascript unsafe "$1[\"tHead\"]" js_getTHead ::
HTMLTableElement -> IO (Nullable HTMLTableSectionElement)
getTHead ::
(MonadIO m) =>
HTMLTableElement -> m (Maybe HTMLTableSectionElement)
getTHead self = liftIO (nullableToMaybe <$> (js_getTHead (self)))
getTHeadUnsafe ::
(MonadIO m, HasCallStack) =>
HTMLTableElement -> m HTMLTableSectionElement
getTHeadUnsafe self
= liftIO
((nullableToMaybe <$> (js_getTHead (self))) >>=
maybe (Prelude.error "Nothing to return") return)
getTHeadUnchecked ::
(MonadIO m) => HTMLTableElement -> m HTMLTableSectionElement
getTHeadUnchecked self
= liftIO (fromJust . nullableToMaybe <$> (js_getTHead (self)))
foreign import javascript unsafe "$1[\"tFoot\"] = $2;" js_setTFoot
:: HTMLTableElement -> Nullable HTMLTableSectionElement -> IO ()
setTFoot ::
(MonadIO m) =>
HTMLTableElement -> Maybe HTMLTableSectionElement -> m ()
setTFoot self val
= liftIO (js_setTFoot (self) (maybeToNullable val))
foreign import javascript unsafe "$1[\"tFoot\"]" js_getTFoot ::
HTMLTableElement -> IO (Nullable HTMLTableSectionElement)
getTFoot ::
(MonadIO m) =>
HTMLTableElement -> m (Maybe HTMLTableSectionElement)
getTFoot self = liftIO (nullableToMaybe <$> (js_getTFoot (self)))
getTFootUnsafe ::
(MonadIO m, HasCallStack) =>
HTMLTableElement -> m HTMLTableSectionElement
getTFootUnsafe self
= liftIO
((nullableToMaybe <$> (js_getTFoot (self))) >>=
maybe (Prelude.error "Nothing to return") return)
getTFootUnchecked ::
(MonadIO m) => HTMLTableElement -> m HTMLTableSectionElement
getTFootUnchecked self
= liftIO (fromJust . nullableToMaybe <$> (js_getTFoot (self)))
foreign import javascript unsafe "$1[\"rows\"]" js_getRows ::
HTMLTableElement -> IO (Nullable HTMLCollection)
getRows ::
(MonadIO m) => HTMLTableElement -> m (Maybe HTMLCollection)
getRows self = liftIO (nullableToMaybe <$> (js_getRows (self)))
getRowsUnsafe ::
(MonadIO m, HasCallStack) => HTMLTableElement -> m HTMLCollection
getRowsUnsafe self
= liftIO
((nullableToMaybe <$> (js_getRows (self))) >>=
maybe (Prelude.error "Nothing to return") return)
getRowsUnchecked ::
(MonadIO m) => HTMLTableElement -> m HTMLCollection
getRowsUnchecked self
= liftIO (fromJust . nullableToMaybe <$> (js_getRows (self)))
foreign import javascript unsafe "$1[\"tBodies\"]" js_getTBodies ::
HTMLTableElement -> IO (Nullable HTMLCollection)
getTBodies ::
(MonadIO m) => HTMLTableElement -> m (Maybe HTMLCollection)
getTBodies self
= liftIO (nullableToMaybe <$> (js_getTBodies (self)))
getTBodiesUnsafe ::
(MonadIO m, HasCallStack) => HTMLTableElement -> m HTMLCollection
getTBodiesUnsafe self
= liftIO
((nullableToMaybe <$> (js_getTBodies (self))) >>=
maybe (Prelude.error "Nothing to return") return)
getTBodiesUnchecked ::
(MonadIO m) => HTMLTableElement -> m HTMLCollection
getTBodiesUnchecked self
= liftIO (fromJust . nullableToMaybe <$> (js_getTBodies (self)))
foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign
:: HTMLTableElement -> JSString -> IO ()
setAlign ::
(MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()
setAlign self val = liftIO (js_setAlign (self) (toJSString val))
foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::
HTMLTableElement -> IO JSString
getAlign ::
(MonadIO m, FromJSString result) => HTMLTableElement -> m result
getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))
foreign import javascript unsafe "$1[\"bgColor\"] = $2;"
js_setBgColor :: HTMLTableElement -> JSString -> IO ()
setBgColor ::
(MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()
setBgColor self val
= liftIO (js_setBgColor (self) (toJSString val))
foreign import javascript unsafe "$1[\"bgColor\"]" js_getBgColor ::
HTMLTableElement -> IO JSString
getBgColor ::
(MonadIO m, FromJSString result) => HTMLTableElement -> m result
getBgColor self = liftIO (fromJSString <$> (js_getBgColor (self)))
foreign import javascript unsafe "$1[\"border\"] = $2;"
js_setBorder :: HTMLTableElement -> JSString -> IO ()
setBorder ::
(MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()
setBorder self val = liftIO (js_setBorder (self) (toJSString val))
foreign import javascript unsafe "$1[\"border\"]" js_getBorder ::
HTMLTableElement -> IO JSString
getBorder ::
(MonadIO m, FromJSString result) => HTMLTableElement -> m result
getBorder self = liftIO (fromJSString <$> (js_getBorder (self)))
foreign import javascript unsafe "$1[\"cellPadding\"] = $2;"
js_setCellPadding :: HTMLTableElement -> JSString -> IO ()
setCellPadding ::
(MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()
setCellPadding self val
= liftIO (js_setCellPadding (self) (toJSString val))
foreign import javascript unsafe "$1[\"cellPadding\"]"
js_getCellPadding :: HTMLTableElement -> IO JSString
getCellPadding ::
(MonadIO m, FromJSString result) => HTMLTableElement -> m result
getCellPadding self
= liftIO (fromJSString <$> (js_getCellPadding (self)))
foreign import javascript unsafe "$1[\"cellSpacing\"] = $2;"
js_setCellSpacing :: HTMLTableElement -> JSString -> IO ()
setCellSpacing ::
(MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()
setCellSpacing self val
= liftIO (js_setCellSpacing (self) (toJSString val))
foreign import javascript unsafe "$1[\"cellSpacing\"]"
js_getCellSpacing :: HTMLTableElement -> IO JSString
getCellSpacing ::
(MonadIO m, FromJSString result) => HTMLTableElement -> m result
getCellSpacing self
= liftIO (fromJSString <$> (js_getCellSpacing (self)))
foreign import javascript unsafe "$1[\"frame\"] = $2;" js_setFrame
:: HTMLTableElement -> JSString -> IO ()
setFrame ::
(MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()
setFrame self val = liftIO (js_setFrame (self) (toJSString val))
foreign import javascript unsafe "$1[\"frame\"]" js_getFrame ::
HTMLTableElement -> IO JSString
getFrame ::
(MonadIO m, FromJSString result) => HTMLTableElement -> m result
getFrame self = liftIO (fromJSString <$> (js_getFrame (self)))
foreign import javascript unsafe "$1[\"rules\"] = $2;" js_setRules
:: HTMLTableElement -> JSString -> IO ()
setRules ::
(MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()
setRules self val = liftIO (js_setRules (self) (toJSString val))
foreign import javascript unsafe "$1[\"rules\"]" js_getRules ::
HTMLTableElement -> IO JSString
getRules ::
(MonadIO m, FromJSString result) => HTMLTableElement -> m result
getRules self = liftIO (fromJSString <$> (js_getRules (self)))
foreign import javascript unsafe "$1[\"summary\"] = $2;"
js_setSummary :: HTMLTableElement -> JSString -> IO ()
setSummary ::
(MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()
setSummary self val
= liftIO (js_setSummary (self) (toJSString val))
foreign import javascript unsafe "$1[\"summary\"]" js_getSummary ::
HTMLTableElement -> IO JSString
getSummary ::
(MonadIO m, FromJSString result) => HTMLTableElement -> m result
getSummary self = liftIO (fromJSString <$> (js_getSummary (self)))
foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth
:: HTMLTableElement -> JSString -> IO ()
setWidth ::
(MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()
setWidth self val = liftIO (js_setWidth (self) (toJSString val))
foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::
HTMLTableElement -> IO JSString
getWidth ::
(MonadIO m, FromJSString result) => HTMLTableElement -> m result
getWidth self = liftIO (fromJSString <$> (js_getWidth (self)))