-- GENERATED by C->Haskell Compiler, version 0.13.13 (gtk2hs branch) "Bin IO", 27 May 2012 (Haskell)
-- Edit the ORIGNAL .chs file instead!


{-# LINE 1 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
module Graphics.UI.Gtk.WebKit.DOM.HTMLTableCellElement(
getCellIndex,
setAbbr,
getAbbr,
setAlign,
getAlign,
setAxis,
getAxis,
setBgColor,
getBgColor,
setCh,
getCh,
setChOff,
getChOff,
setColSpan,
getColSpan,
setHeaders,
getHeaders,
setHeight,
getHeight,
setNoWrap,
getNoWrap,
setRowSpan,
getRowSpan,
setScope,
getScope,
setVAlign,
getVAlign,
setWidth,
getWidth,
HTMLTableCellElement,
castToHTMLTableCellElement,
gTypeHTMLTableCellElement,
HTMLTableCellElementClass,
toHTMLTableCellElement,
) where
import Prelude hiding (drop, error, print)
import Data.Typeable (Typeable)
import Foreign.Marshal (maybePeek, maybeWith)
import System.Glib.FFI (maybeNull, withForeignPtr, nullForeignPtr, Ptr, nullPtr, castPtr, Word, Int64, Word64, CChar(..), CInt(..), CUInt(..), CLong(..), CULong(..), CLLong(..), CULLong(..), CShort(..), CUShort(..), CFloat(..), CDouble(..), toBool, fromBool)
import System.Glib.UTFString (GlibString(..), readUTFString)
import Control.Applicative ((<$>))
import Control.Monad (void)
import Control.Monad.IO.Class (MonadIO(..))
import System.Glib.GError
import Graphics.UI.Gtk.WebKit.DOM.EventTargetClosures
import Graphics.UI.Gtk.WebKit.DOM.EventM
import Graphics.UI.Gtk.WebKit.Types
{-# LINE 48 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
import Graphics.UI.Gtk.WebKit.DOM.Enums

 
getCellIndex ::
             (MonadIO m, HTMLTableCellElementClass self) => self -> m Int
getCellIndex self
  = liftIO
      (fromIntegral <$>
         ((\(HTMLTableCellElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_get_cell_index argPtr1)
{-# LINE 57 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
            (toHTMLTableCellElement self)))
 
setAbbr ::
        (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
          self -> string -> m ()
setAbbr self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLTableCellElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_set_abbr argPtr1 arg2)
{-# LINE 67 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
             (toHTMLTableCellElement self)
             valPtr)
 
getAbbr ::
        (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
          self -> m string
getAbbr self
  = liftIO
      (((\(HTMLTableCellElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_get_abbr argPtr1)
{-# LINE 76 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
          (toHTMLTableCellElement self))
         >>=
         readUTFString)
 
setAlign ::
         (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
           self -> string -> m ()
setAlign self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLTableCellElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_set_align argPtr1 arg2)
{-# LINE 88 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
             (toHTMLTableCellElement self)
             valPtr)
 
getAlign ::
         (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
           self -> m string
getAlign self
  = liftIO
      (((\(HTMLTableCellElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_get_align argPtr1)
{-# LINE 97 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
          (toHTMLTableCellElement self))
         >>=
         readUTFString)
 
setAxis ::
        (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
          self -> string -> m ()
setAxis self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLTableCellElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_set_axis argPtr1 arg2)
{-# LINE 109 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
             (toHTMLTableCellElement self)
             valPtr)
 
getAxis ::
        (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
          self -> m string
getAxis self
  = liftIO
      (((\(HTMLTableCellElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_get_axis argPtr1)
{-# LINE 118 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
          (toHTMLTableCellElement self))
         >>=
         readUTFString)
 
setBgColor ::
           (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
             self -> string -> m ()
setBgColor self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLTableCellElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_set_bg_color argPtr1 arg2)
{-# LINE 130 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
             (toHTMLTableCellElement self)
             valPtr)
 
getBgColor ::
           (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
             self -> m string
getBgColor self
  = liftIO
      (((\(HTMLTableCellElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_get_bg_color argPtr1)
{-# LINE 139 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
          (toHTMLTableCellElement self))
         >>=
         readUTFString)
 
setCh ::
      (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
        self -> string -> m ()
setCh self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLTableCellElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_set_ch argPtr1 arg2)
{-# LINE 151 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
             (toHTMLTableCellElement self)
             valPtr)
 
getCh ::
      (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
        self -> m string
getCh self
  = liftIO
      (((\(HTMLTableCellElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_get_ch argPtr1)
{-# LINE 160 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
          (toHTMLTableCellElement self))
         >>=
         readUTFString)
 
setChOff ::
         (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
           self -> string -> m ()
setChOff self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLTableCellElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_set_ch_off argPtr1 arg2)
{-# LINE 172 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
             (toHTMLTableCellElement self)
             valPtr)
 
getChOff ::
         (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
           self -> m string
getChOff self
  = liftIO
      (((\(HTMLTableCellElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_get_ch_off argPtr1)
{-# LINE 181 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
          (toHTMLTableCellElement self))
         >>=
         readUTFString)
 
setColSpan ::
           (MonadIO m, HTMLTableCellElementClass self) => self -> Int -> m ()
setColSpan self val
  = liftIO
      ((\(HTMLTableCellElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_set_col_span argPtr1 arg2)
{-# LINE 190 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
         (toHTMLTableCellElement self)
         (fromIntegral val))
 
getColSpan ::
           (MonadIO m, HTMLTableCellElementClass self) => self -> m Int
getColSpan self
  = liftIO
      (fromIntegral <$>
         ((\(HTMLTableCellElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_get_col_span argPtr1)
{-# LINE 199 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
            (toHTMLTableCellElement self)))
 
setHeaders ::
           (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
             self -> string -> m ()
setHeaders self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLTableCellElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_set_headers argPtr1 arg2)
{-# LINE 209 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
             (toHTMLTableCellElement self)
             valPtr)
 
getHeaders ::
           (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
             self -> m string
getHeaders self
  = liftIO
      (((\(HTMLTableCellElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_get_headers argPtr1)
{-# LINE 218 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
          (toHTMLTableCellElement self))
         >>=
         readUTFString)
 
setHeight ::
          (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
            self -> string -> m ()
setHeight self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLTableCellElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_set_height argPtr1 arg2)
{-# LINE 230 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
             (toHTMLTableCellElement self)
             valPtr)
 
getHeight ::
          (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
            self -> m string
getHeight self
  = liftIO
      (((\(HTMLTableCellElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_get_height argPtr1)
{-# LINE 239 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
          (toHTMLTableCellElement self))
         >>=
         readUTFString)
 
setNoWrap ::
          (MonadIO m, HTMLTableCellElementClass self) => self -> Bool -> m ()
setNoWrap self val
  = liftIO
      ((\(HTMLTableCellElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_set_no_wrap argPtr1 arg2)
{-# LINE 248 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
         (toHTMLTableCellElement self)
         (fromBool val))
 
getNoWrap ::
          (MonadIO m, HTMLTableCellElementClass self) => self -> m Bool
getNoWrap self
  = liftIO
      (toBool <$>
         ((\(HTMLTableCellElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_get_no_wrap argPtr1)
{-# LINE 257 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
            (toHTMLTableCellElement self)))
 
setRowSpan ::
           (MonadIO m, HTMLTableCellElementClass self) => self -> Int -> m ()
setRowSpan self val
  = liftIO
      ((\(HTMLTableCellElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_set_row_span argPtr1 arg2)
{-# LINE 264 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
         (toHTMLTableCellElement self)
         (fromIntegral val))
 
getRowSpan ::
           (MonadIO m, HTMLTableCellElementClass self) => self -> m Int
getRowSpan self
  = liftIO
      (fromIntegral <$>
         ((\(HTMLTableCellElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_get_row_span argPtr1)
{-# LINE 273 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
            (toHTMLTableCellElement self)))
 
setScope ::
         (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
           self -> string -> m ()
setScope self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLTableCellElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_set_scope argPtr1 arg2)
{-# LINE 283 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
             (toHTMLTableCellElement self)
             valPtr)
 
getScope ::
         (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
           self -> m string
getScope self
  = liftIO
      (((\(HTMLTableCellElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_get_scope argPtr1)
{-# LINE 292 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
          (toHTMLTableCellElement self))
         >>=
         readUTFString)
 
setVAlign ::
          (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
            self -> string -> m ()
setVAlign self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLTableCellElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_set_v_align argPtr1 arg2)
{-# LINE 304 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
             (toHTMLTableCellElement self)
             valPtr)
 
getVAlign ::
          (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
            self -> m string
getVAlign self
  = liftIO
      (((\(HTMLTableCellElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_get_v_align argPtr1)
{-# LINE 313 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
          (toHTMLTableCellElement self))
         >>=
         readUTFString)
 
setWidth ::
         (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
           self -> string -> m ()
setWidth self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLTableCellElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_set_width argPtr1 arg2)
{-# LINE 325 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
             (toHTMLTableCellElement self)
             valPtr)
 
getWidth ::
         (MonadIO m, HTMLTableCellElementClass self, GlibString string) =>
           self -> m string
getWidth self
  = liftIO
      (((\(HTMLTableCellElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_table_cell_element_get_width argPtr1)
{-# LINE 334 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTableCellElement.chs" #-}
          (toHTMLTableCellElement self))
         >>=
         readUTFString)

foreign import ccall safe "webkit_dom_html_table_cell_element_get_cell_index"
  webkit_dom_html_table_cell_element_get_cell_index :: ((Ptr HTMLTableCellElement) -> (IO CLong))

foreign import ccall safe "webkit_dom_html_table_cell_element_set_abbr"
  webkit_dom_html_table_cell_element_set_abbr :: ((Ptr HTMLTableCellElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_table_cell_element_get_abbr"
  webkit_dom_html_table_cell_element_get_abbr :: ((Ptr HTMLTableCellElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_table_cell_element_set_align"
  webkit_dom_html_table_cell_element_set_align :: ((Ptr HTMLTableCellElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_table_cell_element_get_align"
  webkit_dom_html_table_cell_element_get_align :: ((Ptr HTMLTableCellElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_table_cell_element_set_axis"
  webkit_dom_html_table_cell_element_set_axis :: ((Ptr HTMLTableCellElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_table_cell_element_get_axis"
  webkit_dom_html_table_cell_element_get_axis :: ((Ptr HTMLTableCellElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_table_cell_element_set_bg_color"
  webkit_dom_html_table_cell_element_set_bg_color :: ((Ptr HTMLTableCellElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_table_cell_element_get_bg_color"
  webkit_dom_html_table_cell_element_get_bg_color :: ((Ptr HTMLTableCellElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_table_cell_element_set_ch"
  webkit_dom_html_table_cell_element_set_ch :: ((Ptr HTMLTableCellElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_table_cell_element_get_ch"
  webkit_dom_html_table_cell_element_get_ch :: ((Ptr HTMLTableCellElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_table_cell_element_set_ch_off"
  webkit_dom_html_table_cell_element_set_ch_off :: ((Ptr HTMLTableCellElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_table_cell_element_get_ch_off"
  webkit_dom_html_table_cell_element_get_ch_off :: ((Ptr HTMLTableCellElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_table_cell_element_set_col_span"
  webkit_dom_html_table_cell_element_set_col_span :: ((Ptr HTMLTableCellElement) -> (CLong -> (IO ())))

foreign import ccall safe "webkit_dom_html_table_cell_element_get_col_span"
  webkit_dom_html_table_cell_element_get_col_span :: ((Ptr HTMLTableCellElement) -> (IO CLong))

foreign import ccall safe "webkit_dom_html_table_cell_element_set_headers"
  webkit_dom_html_table_cell_element_set_headers :: ((Ptr HTMLTableCellElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_table_cell_element_get_headers"
  webkit_dom_html_table_cell_element_get_headers :: ((Ptr HTMLTableCellElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_table_cell_element_set_height"
  webkit_dom_html_table_cell_element_set_height :: ((Ptr HTMLTableCellElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_table_cell_element_get_height"
  webkit_dom_html_table_cell_element_get_height :: ((Ptr HTMLTableCellElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_table_cell_element_set_no_wrap"
  webkit_dom_html_table_cell_element_set_no_wrap :: ((Ptr HTMLTableCellElement) -> (CInt -> (IO ())))

foreign import ccall safe "webkit_dom_html_table_cell_element_get_no_wrap"
  webkit_dom_html_table_cell_element_get_no_wrap :: ((Ptr HTMLTableCellElement) -> (IO CInt))

foreign import ccall safe "webkit_dom_html_table_cell_element_set_row_span"
  webkit_dom_html_table_cell_element_set_row_span :: ((Ptr HTMLTableCellElement) -> (CLong -> (IO ())))

foreign import ccall safe "webkit_dom_html_table_cell_element_get_row_span"
  webkit_dom_html_table_cell_element_get_row_span :: ((Ptr HTMLTableCellElement) -> (IO CLong))

foreign import ccall safe "webkit_dom_html_table_cell_element_set_scope"
  webkit_dom_html_table_cell_element_set_scope :: ((Ptr HTMLTableCellElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_table_cell_element_get_scope"
  webkit_dom_html_table_cell_element_get_scope :: ((Ptr HTMLTableCellElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_table_cell_element_set_v_align"
  webkit_dom_html_table_cell_element_set_v_align :: ((Ptr HTMLTableCellElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_table_cell_element_get_v_align"
  webkit_dom_html_table_cell_element_get_v_align :: ((Ptr HTMLTableCellElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_table_cell_element_set_width"
  webkit_dom_html_table_cell_element_set_width :: ((Ptr HTMLTableCellElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_table_cell_element_get_width"
  webkit_dom_html_table_cell_element_get_width :: ((Ptr HTMLTableCellElement) -> (IO (Ptr CChar)))