#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
module GHCJS.DOM.HTMLTableElement
(ghcjs_dom_html_table_element_create_t_head,
htmlTableElementCreateTHead,
ghcjs_dom_html_table_element_delete_t_head,
htmlTableElementDeleteTHead,
ghcjs_dom_html_table_element_create_t_foot,
htmlTableElementCreateTFoot,
ghcjs_dom_html_table_element_delete_t_foot,
htmlTableElementDeleteTFoot,
ghcjs_dom_html_table_element_create_t_body,
htmlTableElementCreateTBody,
ghcjs_dom_html_table_element_create_caption,
htmlTableElementCreateCaption,
ghcjs_dom_html_table_element_delete_caption,
htmlTableElementDeleteCaption,
ghcjs_dom_html_table_element_insert_row, htmlTableElementInsertRow,
ghcjs_dom_html_table_element_delete_row, htmlTableElementDeleteRow,
ghcjs_dom_html_table_element_set_caption,
htmlTableElementSetCaption,
ghcjs_dom_html_table_element_get_caption,
htmlTableElementGetCaption,
ghcjs_dom_html_table_element_set_t_head, htmlTableElementSetTHead,
ghcjs_dom_html_table_element_get_t_head, htmlTableElementGetTHead,
ghcjs_dom_html_table_element_set_t_foot, htmlTableElementSetTFoot,
ghcjs_dom_html_table_element_get_t_foot, htmlTableElementGetTFoot,
ghcjs_dom_html_table_element_get_rows, htmlTableElementGetRows,
ghcjs_dom_html_table_element_get_t_bodies,
htmlTableElementGetTBodies, ghcjs_dom_html_table_element_set_align,
htmlTableElementSetAlign, ghcjs_dom_html_table_element_get_align,
htmlTableElementGetAlign,
ghcjs_dom_html_table_element_set_bg_color,
htmlTableElementSetBgColor,
ghcjs_dom_html_table_element_get_bg_color,
htmlTableElementGetBgColor,
ghcjs_dom_html_table_element_set_border, htmlTableElementSetBorder,
ghcjs_dom_html_table_element_get_border, htmlTableElementGetBorder,
ghcjs_dom_html_table_element_set_cell_padding,
htmlTableElementSetCellPadding,
ghcjs_dom_html_table_element_get_cell_padding,
htmlTableElementGetCellPadding,
ghcjs_dom_html_table_element_set_cell_spacing,
htmlTableElementSetCellSpacing,
ghcjs_dom_html_table_element_get_cell_spacing,
htmlTableElementGetCellSpacing,
ghcjs_dom_html_table_element_set_frame, htmlTableElementSetFrame,
ghcjs_dom_html_table_element_get_frame, htmlTableElementGetFrame,
ghcjs_dom_html_table_element_set_rules, htmlTableElementSetRules,
ghcjs_dom_html_table_element_get_rules, htmlTableElementGetRules,
ghcjs_dom_html_table_element_set_summary,
htmlTableElementSetSummary,
ghcjs_dom_html_table_element_get_summary,
htmlTableElementGetSummary, ghcjs_dom_html_table_element_set_width,
htmlTableElementSetWidth, ghcjs_dom_html_table_element_get_width,
htmlTableElementGetWidth, HTMLTableElement, IsHTMLTableElement,
castToHTMLTableElement, gTypeHTMLTableElement, toHTMLTableElement)
where
import GHCJS.Types
import GHCJS.Foreign
import GHCJS.Marshal
import Data.Int
import Data.Word
import GHCJS.DOM.Types
import Control.Applicative ((<$>))
import GHCJS.DOM.EventM
foreign import javascript unsafe "$1[\"createTHead\"]()"
ghcjs_dom_html_table_element_create_t_head ::
JSRef HTMLTableElement -> IO (JSRef HTMLElement)
htmlTableElementCreateTHead ::
(IsHTMLTableElement self) => self -> IO (Maybe HTMLElement)
htmlTableElementCreateTHead self
= fmap HTMLElement . maybeJSNull <$>
(ghcjs_dom_html_table_element_create_t_head
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"deleteTHead\"]()"
ghcjs_dom_html_table_element_delete_t_head ::
JSRef HTMLTableElement -> IO ()
htmlTableElementDeleteTHead ::
(IsHTMLTableElement self) => self -> IO ()
htmlTableElementDeleteTHead self
= ghcjs_dom_html_table_element_delete_t_head
(unHTMLTableElement (toHTMLTableElement self))
foreign import javascript unsafe "$1[\"createTFoot\"]()"
ghcjs_dom_html_table_element_create_t_foot ::
JSRef HTMLTableElement -> IO (JSRef HTMLElement)
htmlTableElementCreateTFoot ::
(IsHTMLTableElement self) => self -> IO (Maybe HTMLElement)
htmlTableElementCreateTFoot self
= fmap HTMLElement . maybeJSNull <$>
(ghcjs_dom_html_table_element_create_t_foot
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"deleteTFoot\"]()"
ghcjs_dom_html_table_element_delete_t_foot ::
JSRef HTMLTableElement -> IO ()
htmlTableElementDeleteTFoot ::
(IsHTMLTableElement self) => self -> IO ()
htmlTableElementDeleteTFoot self
= ghcjs_dom_html_table_element_delete_t_foot
(unHTMLTableElement (toHTMLTableElement self))
foreign import javascript unsafe "$1[\"createTBody\"]()"
ghcjs_dom_html_table_element_create_t_body ::
JSRef HTMLTableElement -> IO (JSRef HTMLElement)
htmlTableElementCreateTBody ::
(IsHTMLTableElement self) => self -> IO (Maybe HTMLElement)
htmlTableElementCreateTBody self
= fmap HTMLElement . maybeJSNull <$>
(ghcjs_dom_html_table_element_create_t_body
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"createCaption\"]()"
ghcjs_dom_html_table_element_create_caption ::
JSRef HTMLTableElement -> IO (JSRef HTMLElement)
htmlTableElementCreateCaption ::
(IsHTMLTableElement self) => self -> IO (Maybe HTMLElement)
htmlTableElementCreateCaption self
= fmap HTMLElement . maybeJSNull <$>
(ghcjs_dom_html_table_element_create_caption
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"deleteCaption\"]()"
ghcjs_dom_html_table_element_delete_caption ::
JSRef HTMLTableElement -> IO ()
htmlTableElementDeleteCaption ::
(IsHTMLTableElement self) => self -> IO ()
htmlTableElementDeleteCaption self
= ghcjs_dom_html_table_element_delete_caption
(unHTMLTableElement (toHTMLTableElement self))
foreign import javascript unsafe "$1[\"insertRow\"]($2)"
ghcjs_dom_html_table_element_insert_row ::
JSRef HTMLTableElement -> Int -> IO (JSRef HTMLElement)
htmlTableElementInsertRow ::
(IsHTMLTableElement self) => self -> Int -> IO (Maybe HTMLElement)
htmlTableElementInsertRow self index
= fmap HTMLElement . maybeJSNull <$>
(ghcjs_dom_html_table_element_insert_row
(unHTMLTableElement (toHTMLTableElement self))
index)
foreign import javascript unsafe "$1[\"deleteRow\"]($2)"
ghcjs_dom_html_table_element_delete_row ::
JSRef HTMLTableElement -> Int -> IO ()
htmlTableElementDeleteRow ::
(IsHTMLTableElement self) => self -> Int -> IO ()
htmlTableElementDeleteRow self index
= ghcjs_dom_html_table_element_delete_row
(unHTMLTableElement (toHTMLTableElement self))
index
foreign import javascript unsafe "$1[\"caption\"] = $2;"
ghcjs_dom_html_table_element_set_caption ::
JSRef HTMLTableElement -> JSRef HTMLTableCaptionElement -> IO ()
htmlTableElementSetCaption ::
(IsHTMLTableElement self, IsHTMLTableCaptionElement val) =>
self -> Maybe val -> IO ()
htmlTableElementSetCaption self val
= ghcjs_dom_html_table_element_set_caption
(unHTMLTableElement (toHTMLTableElement self))
(maybe jsNull
(unHTMLTableCaptionElement . toHTMLTableCaptionElement)
val)
foreign import javascript unsafe "$1[\"caption\"]"
ghcjs_dom_html_table_element_get_caption ::
JSRef HTMLTableElement -> IO (JSRef HTMLTableCaptionElement)
htmlTableElementGetCaption ::
(IsHTMLTableElement self) =>
self -> IO (Maybe HTMLTableCaptionElement)
htmlTableElementGetCaption self
= fmap HTMLTableCaptionElement . maybeJSNull <$>
(ghcjs_dom_html_table_element_get_caption
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"tHead\"] = $2;"
ghcjs_dom_html_table_element_set_t_head ::
JSRef HTMLTableElement -> JSRef HTMLTableSectionElement -> IO ()
htmlTableElementSetTHead ::
(IsHTMLTableElement self, IsHTMLTableSectionElement val) =>
self -> Maybe val -> IO ()
htmlTableElementSetTHead self val
= ghcjs_dom_html_table_element_set_t_head
(unHTMLTableElement (toHTMLTableElement self))
(maybe jsNull
(unHTMLTableSectionElement . toHTMLTableSectionElement)
val)
foreign import javascript unsafe "$1[\"tHead\"]"
ghcjs_dom_html_table_element_get_t_head ::
JSRef HTMLTableElement -> IO (JSRef HTMLTableSectionElement)
htmlTableElementGetTHead ::
(IsHTMLTableElement self) =>
self -> IO (Maybe HTMLTableSectionElement)
htmlTableElementGetTHead self
= fmap HTMLTableSectionElement . maybeJSNull <$>
(ghcjs_dom_html_table_element_get_t_head
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"tFoot\"] = $2;"
ghcjs_dom_html_table_element_set_t_foot ::
JSRef HTMLTableElement -> JSRef HTMLTableSectionElement -> IO ()
htmlTableElementSetTFoot ::
(IsHTMLTableElement self, IsHTMLTableSectionElement val) =>
self -> Maybe val -> IO ()
htmlTableElementSetTFoot self val
= ghcjs_dom_html_table_element_set_t_foot
(unHTMLTableElement (toHTMLTableElement self))
(maybe jsNull
(unHTMLTableSectionElement . toHTMLTableSectionElement)
val)
foreign import javascript unsafe "$1[\"tFoot\"]"
ghcjs_dom_html_table_element_get_t_foot ::
JSRef HTMLTableElement -> IO (JSRef HTMLTableSectionElement)
htmlTableElementGetTFoot ::
(IsHTMLTableElement self) =>
self -> IO (Maybe HTMLTableSectionElement)
htmlTableElementGetTFoot self
= fmap HTMLTableSectionElement . maybeJSNull <$>
(ghcjs_dom_html_table_element_get_t_foot
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"rows\"]"
ghcjs_dom_html_table_element_get_rows ::
JSRef HTMLTableElement -> IO (JSRef HTMLCollection)
htmlTableElementGetRows ::
(IsHTMLTableElement self) => self -> IO (Maybe HTMLCollection)
htmlTableElementGetRows self
= fmap HTMLCollection . maybeJSNull <$>
(ghcjs_dom_html_table_element_get_rows
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"tBodies\"]"
ghcjs_dom_html_table_element_get_t_bodies ::
JSRef HTMLTableElement -> IO (JSRef HTMLCollection)
htmlTableElementGetTBodies ::
(IsHTMLTableElement self) => self -> IO (Maybe HTMLCollection)
htmlTableElementGetTBodies self
= fmap HTMLCollection . maybeJSNull <$>
(ghcjs_dom_html_table_element_get_t_bodies
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"align\"] = $2;"
ghcjs_dom_html_table_element_set_align ::
JSRef HTMLTableElement -> JSString -> IO ()
htmlTableElementSetAlign ::
(IsHTMLTableElement self, ToJSString val) => self -> val -> IO ()
htmlTableElementSetAlign self val
= ghcjs_dom_html_table_element_set_align
(unHTMLTableElement (toHTMLTableElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"align\"]"
ghcjs_dom_html_table_element_get_align ::
JSRef HTMLTableElement -> IO JSString
htmlTableElementGetAlign ::
(IsHTMLTableElement self, FromJSString result) => self -> IO result
htmlTableElementGetAlign self
= fromJSString <$>
(ghcjs_dom_html_table_element_get_align
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"bgColor\"] = $2;"
ghcjs_dom_html_table_element_set_bg_color ::
JSRef HTMLTableElement -> JSString -> IO ()
htmlTableElementSetBgColor ::
(IsHTMLTableElement self, ToJSString val) => self -> val -> IO ()
htmlTableElementSetBgColor self val
= ghcjs_dom_html_table_element_set_bg_color
(unHTMLTableElement (toHTMLTableElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"bgColor\"]"
ghcjs_dom_html_table_element_get_bg_color ::
JSRef HTMLTableElement -> IO JSString
htmlTableElementGetBgColor ::
(IsHTMLTableElement self, FromJSString result) => self -> IO result
htmlTableElementGetBgColor self
= fromJSString <$>
(ghcjs_dom_html_table_element_get_bg_color
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"border\"] = $2;"
ghcjs_dom_html_table_element_set_border ::
JSRef HTMLTableElement -> JSString -> IO ()
htmlTableElementSetBorder ::
(IsHTMLTableElement self, ToJSString val) => self -> val -> IO ()
htmlTableElementSetBorder self val
= ghcjs_dom_html_table_element_set_border
(unHTMLTableElement (toHTMLTableElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"border\"]"
ghcjs_dom_html_table_element_get_border ::
JSRef HTMLTableElement -> IO JSString
htmlTableElementGetBorder ::
(IsHTMLTableElement self, FromJSString result) => self -> IO result
htmlTableElementGetBorder self
= fromJSString <$>
(ghcjs_dom_html_table_element_get_border
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"cellPadding\"] = $2;"
ghcjs_dom_html_table_element_set_cell_padding ::
JSRef HTMLTableElement -> JSString -> IO ()
htmlTableElementSetCellPadding ::
(IsHTMLTableElement self, ToJSString val) => self -> val -> IO ()
htmlTableElementSetCellPadding self val
= ghcjs_dom_html_table_element_set_cell_padding
(unHTMLTableElement (toHTMLTableElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"cellPadding\"]"
ghcjs_dom_html_table_element_get_cell_padding ::
JSRef HTMLTableElement -> IO JSString
htmlTableElementGetCellPadding ::
(IsHTMLTableElement self, FromJSString result) => self -> IO result
htmlTableElementGetCellPadding self
= fromJSString <$>
(ghcjs_dom_html_table_element_get_cell_padding
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"cellSpacing\"] = $2;"
ghcjs_dom_html_table_element_set_cell_spacing ::
JSRef HTMLTableElement -> JSString -> IO ()
htmlTableElementSetCellSpacing ::
(IsHTMLTableElement self, ToJSString val) => self -> val -> IO ()
htmlTableElementSetCellSpacing self val
= ghcjs_dom_html_table_element_set_cell_spacing
(unHTMLTableElement (toHTMLTableElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"cellSpacing\"]"
ghcjs_dom_html_table_element_get_cell_spacing ::
JSRef HTMLTableElement -> IO JSString
htmlTableElementGetCellSpacing ::
(IsHTMLTableElement self, FromJSString result) => self -> IO result
htmlTableElementGetCellSpacing self
= fromJSString <$>
(ghcjs_dom_html_table_element_get_cell_spacing
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"frame\"] = $2;"
ghcjs_dom_html_table_element_set_frame ::
JSRef HTMLTableElement -> JSString -> IO ()
htmlTableElementSetFrame ::
(IsHTMLTableElement self, ToJSString val) => self -> val -> IO ()
htmlTableElementSetFrame self val
= ghcjs_dom_html_table_element_set_frame
(unHTMLTableElement (toHTMLTableElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"frame\"]"
ghcjs_dom_html_table_element_get_frame ::
JSRef HTMLTableElement -> IO JSString
htmlTableElementGetFrame ::
(IsHTMLTableElement self, FromJSString result) => self -> IO result
htmlTableElementGetFrame self
= fromJSString <$>
(ghcjs_dom_html_table_element_get_frame
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"rules\"] = $2;"
ghcjs_dom_html_table_element_set_rules ::
JSRef HTMLTableElement -> JSString -> IO ()
htmlTableElementSetRules ::
(IsHTMLTableElement self, ToJSString val) => self -> val -> IO ()
htmlTableElementSetRules self val
= ghcjs_dom_html_table_element_set_rules
(unHTMLTableElement (toHTMLTableElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"rules\"]"
ghcjs_dom_html_table_element_get_rules ::
JSRef HTMLTableElement -> IO JSString
htmlTableElementGetRules ::
(IsHTMLTableElement self, FromJSString result) => self -> IO result
htmlTableElementGetRules self
= fromJSString <$>
(ghcjs_dom_html_table_element_get_rules
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"summary\"] = $2;"
ghcjs_dom_html_table_element_set_summary ::
JSRef HTMLTableElement -> JSString -> IO ()
htmlTableElementSetSummary ::
(IsHTMLTableElement self, ToJSString val) => self -> val -> IO ()
htmlTableElementSetSummary self val
= ghcjs_dom_html_table_element_set_summary
(unHTMLTableElement (toHTMLTableElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"summary\"]"
ghcjs_dom_html_table_element_get_summary ::
JSRef HTMLTableElement -> IO JSString
htmlTableElementGetSummary ::
(IsHTMLTableElement self, FromJSString result) => self -> IO result
htmlTableElementGetSummary self
= fromJSString <$>
(ghcjs_dom_html_table_element_get_summary
(unHTMLTableElement (toHTMLTableElement self)))
foreign import javascript unsafe "$1[\"width\"] = $2;"
ghcjs_dom_html_table_element_set_width ::
JSRef HTMLTableElement -> JSString -> IO ()
htmlTableElementSetWidth ::
(IsHTMLTableElement self, ToJSString val) => self -> val -> IO ()
htmlTableElementSetWidth self val
= ghcjs_dom_html_table_element_set_width
(unHTMLTableElement (toHTMLTableElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"width\"]"
ghcjs_dom_html_table_element_get_width ::
JSRef HTMLTableElement -> IO JSString
htmlTableElementGetWidth ::
(IsHTMLTableElement self, FromJSString result) => self -> IO result
htmlTableElementGetWidth self
= fromJSString <$>
(ghcjs_dom_html_table_element_get_width
(unHTMLTableElement (toHTMLTableElement self)))
#else
module GHCJS.DOM.HTMLTableElement (
module Graphics.UI.Gtk.WebKit.DOM.HTMLTableElement
) where
import Graphics.UI.Gtk.WebKit.DOM.HTMLTableElement
#endif