-- 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/HTMLFrameSetElement.chs" #-}
module Graphics.UI.Gtk.WebKit.DOM.HTMLFrameSetElement(
setCols,
getCols,
setRows,
getRows,
beforeUnload,
hashChange,
message,
offline,
online,
popState,
resize,
storage,
unload,
orientationChange,
blur,
error,
focus,
load,
HTMLFrameSetElement,
castToHTMLFrameSetElement,
gTypeHTMLFrameSetElement,
HTMLFrameSetElementClass,
toHTMLFrameSetElement,
) 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 37 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameSetElement.chs" #-}
import Graphics.UI.Gtk.WebKit.DOM.Enums

 
setCols ::
        (MonadIO m, HTMLFrameSetElementClass self, GlibString string) =>
          self -> string -> m ()
setCols self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLFrameSetElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_set_element_set_cols argPtr1 arg2)
{-# LINE 48 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameSetElement.chs" #-}
             (toHTMLFrameSetElement self)
             valPtr)
 
getCols ::
        (MonadIO m, HTMLFrameSetElementClass self, GlibString string) =>
          self -> m string
getCols self
  = liftIO
      (((\(HTMLFrameSetElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_set_element_get_cols argPtr1)
{-# LINE 57 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameSetElement.chs" #-}
          (toHTMLFrameSetElement self))
         >>=
         readUTFString)
 
setRows ::
        (MonadIO m, HTMLFrameSetElementClass self, GlibString string) =>
          self -> string -> m ()
setRows self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLFrameSetElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_set_element_set_rows argPtr1 arg2)
{-# LINE 69 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameSetElement.chs" #-}
             (toHTMLFrameSetElement self)
             valPtr)
 
getRows ::
        (MonadIO m, HTMLFrameSetElementClass self, GlibString string) =>
          self -> m string
getRows self
  = liftIO
      (((\(HTMLFrameSetElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_set_element_get_rows argPtr1)
{-# LINE 78 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameSetElement.chs" #-}
          (toHTMLFrameSetElement self))
         >>=
         readUTFString)
 
beforeUnload ::
             (HTMLFrameSetElementClass self) => EventName self Event
beforeUnload = EventName "beforeunload"
 
hashChange ::
           (HTMLFrameSetElementClass self) => EventName self Event
hashChange = EventName "hashchange"
 
message :: (HTMLFrameSetElementClass self) => EventName self Event
message = EventName "message"
 
offline :: (HTMLFrameSetElementClass self) => EventName self Event
offline = EventName "offline"
 
online :: (HTMLFrameSetElementClass self) => EventName self Event
online = EventName "online"
 
popState :: (HTMLFrameSetElementClass self) => EventName self Event
popState = EventName "popstate"
 
resize :: (HTMLFrameSetElementClass self) => EventName self UIEvent
resize = EventName "resize"
 
storage :: (HTMLFrameSetElementClass self) => EventName self Event
storage = EventName "storage"
 
unload :: (HTMLFrameSetElementClass self) => EventName self UIEvent
unload = EventName "unload"
 
orientationChange ::
                  (HTMLFrameSetElementClass self) => EventName self Event
orientationChange = EventName "orientationchange"
 
blur :: (HTMLFrameSetElementClass self) => EventName self UIEvent
blur = EventName "blur"
 
error :: (HTMLFrameSetElementClass self) => EventName self UIEvent
error = EventName "error"
 
focus :: (HTMLFrameSetElementClass self) => EventName self UIEvent
focus = EventName "focus"
 
load :: (HTMLFrameSetElementClass self) => EventName self UIEvent
load = EventName "load"

foreign import ccall safe "webkit_dom_html_frame_set_element_set_cols"
  webkit_dom_html_frame_set_element_set_cols :: ((Ptr HTMLFrameSetElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_frame_set_element_get_cols"
  webkit_dom_html_frame_set_element_get_cols :: ((Ptr HTMLFrameSetElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_frame_set_element_set_rows"
  webkit_dom_html_frame_set_element_set_rows :: ((Ptr HTMLFrameSetElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_frame_set_element_get_rows"
  webkit_dom_html_frame_set_element_get_rows :: ((Ptr HTMLFrameSetElement) -> (IO (Ptr CChar)))