module Graphics.UI.Gtk.WebKit.DOM.HTMLTableColElement
(htmlTableColElementSetAlign, htmlTableColElementGetAlign,
htmlTableColElementSetCh, htmlTableColElementGetCh,
htmlTableColElementSetChOff, htmlTableColElementGetChOff,
htmlTableColElementSetSpan, htmlTableColElementGetSpan,
htmlTableColElementSetVAlign, htmlTableColElementGetVAlign,
htmlTableColElementSetWidth, htmlTableColElementGetWidth)
where
import System.Glib.FFI
import System.Glib.UTFString
import Control.Applicative
import Graphics.UI.Gtk.WebKit.Types
import System.Glib.GError
import Graphics.UI.Gtk.WebKit.DOM.EventM
htmlTableColElementSetAlign ::
(HTMLTableColElementClass self) => self -> String -> IO ()
htmlTableColElementSetAlign self val
= withUTFString val $
\ valPtr ->
(\(HTMLTableColElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_col_element_set_align argPtr1 arg2)
(toHTMLTableColElement self)
valPtr
htmlTableColElementGetAlign ::
(HTMLTableColElementClass self) => self -> IO String
htmlTableColElementGetAlign self
= ((\(HTMLTableColElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_col_element_get_align argPtr1)
(toHTMLTableColElement self))
>>=
readUTFString
htmlTableColElementSetCh ::
(HTMLTableColElementClass self) => self -> String -> IO ()
htmlTableColElementSetCh self val
= withUTFString val $
\ valPtr ->
(\(HTMLTableColElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_col_element_set_ch argPtr1 arg2)
(toHTMLTableColElement self)
valPtr
htmlTableColElementGetCh ::
(HTMLTableColElementClass self) => self -> IO String
htmlTableColElementGetCh self
= ((\(HTMLTableColElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_col_element_get_ch argPtr1)
(toHTMLTableColElement self))
>>=
readUTFString
htmlTableColElementSetChOff ::
(HTMLTableColElementClass self) => self -> String -> IO ()
htmlTableColElementSetChOff self val
= withUTFString val $
\ valPtr ->
(\(HTMLTableColElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_col_element_set_ch_off argPtr1 arg2)
(toHTMLTableColElement self)
valPtr
htmlTableColElementGetChOff ::
(HTMLTableColElementClass self) => self -> IO String
htmlTableColElementGetChOff self
= ((\(HTMLTableColElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_col_element_get_ch_off argPtr1)
(toHTMLTableColElement self))
>>=
readUTFString
htmlTableColElementSetSpan ::
(HTMLTableColElementClass self) => self -> Int -> IO ()
htmlTableColElementSetSpan self val
= (\(HTMLTableColElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_col_element_set_span argPtr1 arg2)
(toHTMLTableColElement self)
(fromIntegral val)
htmlTableColElementGetSpan ::
(HTMLTableColElementClass self) => self -> IO Int
htmlTableColElementGetSpan self
= fromIntegral <$>
((\(HTMLTableColElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_col_element_get_span argPtr1)
(toHTMLTableColElement self))
htmlTableColElementSetVAlign ::
(HTMLTableColElementClass self) => self -> String -> IO ()
htmlTableColElementSetVAlign self val
= withUTFString val $
\ valPtr ->
(\(HTMLTableColElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_col_element_set_v_align argPtr1 arg2)
(toHTMLTableColElement self)
valPtr
htmlTableColElementGetVAlign ::
(HTMLTableColElementClass self) => self -> IO String
htmlTableColElementGetVAlign self
= ((\(HTMLTableColElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_col_element_get_v_align argPtr1)
(toHTMLTableColElement self))
>>=
readUTFString
htmlTableColElementSetWidth ::
(HTMLTableColElementClass self) => self -> String -> IO ()
htmlTableColElementSetWidth self val
= withUTFString val $
\ valPtr ->
(\(HTMLTableColElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_col_element_set_width argPtr1 arg2)
(toHTMLTableColElement self)
valPtr
htmlTableColElementGetWidth ::
(HTMLTableColElementClass self) => self -> IO String
htmlTableColElementGetWidth self
= ((\(HTMLTableColElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_col_element_get_width argPtr1)
(toHTMLTableColElement self))
>>=
readUTFString
foreign import ccall safe "webkit_dom_html_table_col_element_set_align"
webkit_dom_html_table_col_element_set_align :: ((Ptr HTMLTableColElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_table_col_element_get_align"
webkit_dom_html_table_col_element_get_align :: ((Ptr HTMLTableColElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_table_col_element_set_ch"
webkit_dom_html_table_col_element_set_ch :: ((Ptr HTMLTableColElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_table_col_element_get_ch"
webkit_dom_html_table_col_element_get_ch :: ((Ptr HTMLTableColElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_table_col_element_set_ch_off"
webkit_dom_html_table_col_element_set_ch_off :: ((Ptr HTMLTableColElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_table_col_element_get_ch_off"
webkit_dom_html_table_col_element_get_ch_off :: ((Ptr HTMLTableColElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_table_col_element_set_span"
webkit_dom_html_table_col_element_set_span :: ((Ptr HTMLTableColElement) -> (CLong -> (IO ())))
foreign import ccall safe "webkit_dom_html_table_col_element_get_span"
webkit_dom_html_table_col_element_get_span :: ((Ptr HTMLTableColElement) -> (IO CLong))
foreign import ccall safe "webkit_dom_html_table_col_element_set_v_align"
webkit_dom_html_table_col_element_set_v_align :: ((Ptr HTMLTableColElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_table_col_element_get_v_align"
webkit_dom_html_table_col_element_get_v_align :: ((Ptr HTMLTableColElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_table_col_element_set_width"
webkit_dom_html_table_col_element_set_width :: ((Ptr HTMLTableColElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_table_col_element_get_width"
webkit_dom_html_table_col_element_get_width :: ((Ptr HTMLTableColElement) -> (IO (Ptr CChar)))