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


{-# LINE 1 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
module Graphics.UI.Gtk.WebKit.DOM.HTMLFrameElement
       (htmlFrameElementSetFrameBorder, htmlFrameElementGetFrameBorder,
        htmlFrameElementSetLongDesc, htmlFrameElementGetLongDesc,
        htmlFrameElementSetMarginHeight, htmlFrameElementGetMarginHeight,
        htmlFrameElementSetMarginWidth, htmlFrameElementGetMarginWidth,
        htmlFrameElementSetName, htmlFrameElementGetName,
        htmlFrameElementSetNoResize, htmlFrameElementGetNoResize,
        htmlFrameElementSetScrolling, htmlFrameElementGetScrolling,
        htmlFrameElementSetSrc, htmlFrameElementGetSrc,
        htmlFrameElementGetContentDocument,
        htmlFrameElementGetContentWindow, htmlFrameElementGetWidth,
        htmlFrameElementGetHeight, HTMLFrameElement, HTMLFrameElementClass,
        castToHTMLFrameElement, gTypeHTMLFrameElement, toHTMLFrameElement)
       where
import System.Glib.FFI
import System.Glib.UTFString
import Control.Applicative
import Graphics.UI.Gtk.WebKit.Types
{-# LINE 18 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
import System.Glib.GError
import Graphics.UI.Gtk.WebKit.DOM.EventM
 
htmlFrameElementSetFrameBorder ::
                               (HTMLFrameElementClass self) => self -> String -> IO ()
htmlFrameElementSetFrameBorder self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLFrameElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_set_frame_border argPtr1 arg2)
{-# LINE 27 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
          (toHTMLFrameElement self)
          valPtr
 
htmlFrameElementGetFrameBorder ::
                               (HTMLFrameElementClass self) => self -> IO String
htmlFrameElementGetFrameBorder self
  = ((\(HTMLFrameElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_get_frame_border argPtr1)
{-# LINE 34 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
       (toHTMLFrameElement self))
      >>=
      readUTFString
 
htmlFrameElementSetLongDesc ::
                            (HTMLFrameElementClass self) => self -> String -> IO ()
htmlFrameElementSetLongDesc self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLFrameElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_set_long_desc argPtr1 arg2)
{-# LINE 44 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
          (toHTMLFrameElement self)
          valPtr
 
htmlFrameElementGetLongDesc ::
                            (HTMLFrameElementClass self) => self -> IO String
htmlFrameElementGetLongDesc self
  = ((\(HTMLFrameElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_get_long_desc argPtr1)
{-# LINE 51 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
       (toHTMLFrameElement self))
      >>=
      readUTFString
 
htmlFrameElementSetMarginHeight ::
                                (HTMLFrameElementClass self) => self -> String -> IO ()
htmlFrameElementSetMarginHeight self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLFrameElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_set_margin_height argPtr1 arg2)
{-# LINE 61 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
          (toHTMLFrameElement self)
          valPtr
 
htmlFrameElementGetMarginHeight ::
                                (HTMLFrameElementClass self) => self -> IO String
htmlFrameElementGetMarginHeight self
  = ((\(HTMLFrameElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_get_margin_height argPtr1)
{-# LINE 68 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
       (toHTMLFrameElement self))
      >>=
      readUTFString
 
htmlFrameElementSetMarginWidth ::
                               (HTMLFrameElementClass self) => self -> String -> IO ()
htmlFrameElementSetMarginWidth self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLFrameElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_set_margin_width argPtr1 arg2)
{-# LINE 78 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
          (toHTMLFrameElement self)
          valPtr
 
htmlFrameElementGetMarginWidth ::
                               (HTMLFrameElementClass self) => self -> IO String
htmlFrameElementGetMarginWidth self
  = ((\(HTMLFrameElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_get_margin_width argPtr1)
{-# LINE 85 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
       (toHTMLFrameElement self))
      >>=
      readUTFString
 
htmlFrameElementSetName ::
                        (HTMLFrameElementClass self) => self -> String -> IO ()
htmlFrameElementSetName self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLFrameElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_set_name argPtr1 arg2)
{-# LINE 95 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
          (toHTMLFrameElement self)
          valPtr
 
htmlFrameElementGetName ::
                        (HTMLFrameElementClass self) => self -> IO String
htmlFrameElementGetName self
  = ((\(HTMLFrameElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_get_name argPtr1)
{-# LINE 102 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
       (toHTMLFrameElement self))
      >>=
      readUTFString
 
htmlFrameElementSetNoResize ::
                            (HTMLFrameElementClass self) => self -> Bool -> IO ()
htmlFrameElementSetNoResize self val
  = (\(HTMLFrameElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_set_no_resize argPtr1 arg2)
{-# LINE 110 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
      (toHTMLFrameElement self)
      (fromBool val)
 
htmlFrameElementGetNoResize ::
                            (HTMLFrameElementClass self) => self -> IO Bool
htmlFrameElementGetNoResize self
  = toBool <$>
      ((\(HTMLFrameElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_get_no_resize argPtr1)
{-# LINE 118 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
         (toHTMLFrameElement self))
 
htmlFrameElementSetScrolling ::
                             (HTMLFrameElementClass self) => self -> String -> IO ()
htmlFrameElementSetScrolling self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLFrameElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_set_scrolling argPtr1 arg2)
{-# LINE 126 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
          (toHTMLFrameElement self)
          valPtr
 
htmlFrameElementGetScrolling ::
                             (HTMLFrameElementClass self) => self -> IO String
htmlFrameElementGetScrolling self
  = ((\(HTMLFrameElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_get_scrolling argPtr1)
{-# LINE 133 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
       (toHTMLFrameElement self))
      >>=
      readUTFString
 
htmlFrameElementSetSrc ::
                       (HTMLFrameElementClass self) => self -> String -> IO ()
htmlFrameElementSetSrc self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLFrameElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_set_src argPtr1 arg2)
{-# LINE 143 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
          (toHTMLFrameElement self)
          valPtr
 
htmlFrameElementGetSrc ::
                       (HTMLFrameElementClass self) => self -> IO String
htmlFrameElementGetSrc self
  = ((\(HTMLFrameElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_get_src argPtr1)
{-# LINE 150 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
       (toHTMLFrameElement self))
      >>=
      readUTFString
 
htmlFrameElementGetContentDocument ::
                                   (HTMLFrameElementClass self) => self -> IO (Maybe Document)
htmlFrameElementGetContentDocument self
  = maybeNull (makeNewGObject mkDocument)
      ((\(HTMLFrameElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_get_content_document argPtr1)
{-# LINE 159 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
         (toHTMLFrameElement self))
 
htmlFrameElementGetContentWindow ::
                                 (HTMLFrameElementClass self) => self -> IO (Maybe DOMWindow)
htmlFrameElementGetContentWindow self
  = maybeNull (makeNewGObject mkDOMWindow)
      ((\(HTMLFrameElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_get_content_window argPtr1)
{-# LINE 166 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
         (toHTMLFrameElement self))
 
htmlFrameElementGetWidth ::
                         (HTMLFrameElementClass self) => self -> IO Int
htmlFrameElementGetWidth self
  = fromIntegral <$>
      ((\(HTMLFrameElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_get_width argPtr1)
{-# LINE 173 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
         (toHTMLFrameElement self))
 
htmlFrameElementGetHeight ::
                          (HTMLFrameElementClass self) => self -> IO Int
htmlFrameElementGetHeight self
  = fromIntegral <$>
      ((\(HTMLFrameElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_frame_element_get_height argPtr1)
{-# LINE 180 "./Graphics/UI/Gtk/WebKit/DOM/HTMLFrameElement.chs" #-}
         (toHTMLFrameElement self))

foreign import ccall safe "webkit_dom_html_frame_element_set_frame_border"
  webkit_dom_html_frame_element_set_frame_border :: ((Ptr HTMLFrameElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_frame_element_get_frame_border"
  webkit_dom_html_frame_element_get_frame_border :: ((Ptr HTMLFrameElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_frame_element_set_long_desc"
  webkit_dom_html_frame_element_set_long_desc :: ((Ptr HTMLFrameElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_frame_element_get_long_desc"
  webkit_dom_html_frame_element_get_long_desc :: ((Ptr HTMLFrameElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_frame_element_set_margin_height"
  webkit_dom_html_frame_element_set_margin_height :: ((Ptr HTMLFrameElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_frame_element_get_margin_height"
  webkit_dom_html_frame_element_get_margin_height :: ((Ptr HTMLFrameElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_frame_element_set_margin_width"
  webkit_dom_html_frame_element_set_margin_width :: ((Ptr HTMLFrameElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_frame_element_get_margin_width"
  webkit_dom_html_frame_element_get_margin_width :: ((Ptr HTMLFrameElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_frame_element_set_name"
  webkit_dom_html_frame_element_set_name :: ((Ptr HTMLFrameElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_frame_element_get_name"
  webkit_dom_html_frame_element_get_name :: ((Ptr HTMLFrameElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_frame_element_set_no_resize"
  webkit_dom_html_frame_element_set_no_resize :: ((Ptr HTMLFrameElement) -> (CInt -> (IO ())))

foreign import ccall safe "webkit_dom_html_frame_element_get_no_resize"
  webkit_dom_html_frame_element_get_no_resize :: ((Ptr HTMLFrameElement) -> (IO CInt))

foreign import ccall safe "webkit_dom_html_frame_element_set_scrolling"
  webkit_dom_html_frame_element_set_scrolling :: ((Ptr HTMLFrameElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_frame_element_get_scrolling"
  webkit_dom_html_frame_element_get_scrolling :: ((Ptr HTMLFrameElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_frame_element_set_src"
  webkit_dom_html_frame_element_set_src :: ((Ptr HTMLFrameElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_frame_element_get_src"
  webkit_dom_html_frame_element_get_src :: ((Ptr HTMLFrameElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_frame_element_get_content_document"
  webkit_dom_html_frame_element_get_content_document :: ((Ptr HTMLFrameElement) -> (IO (Ptr Document)))

foreign import ccall safe "webkit_dom_html_frame_element_get_content_window"
  webkit_dom_html_frame_element_get_content_window :: ((Ptr HTMLFrameElement) -> (IO (Ptr DOMWindow)))

foreign import ccall safe "webkit_dom_html_frame_element_get_width"
  webkit_dom_html_frame_element_get_width :: ((Ptr HTMLFrameElement) -> (IO CLong))

foreign import ccall safe "webkit_dom_html_frame_element_get_height"
  webkit_dom_html_frame_element_get_height :: ((Ptr HTMLFrameElement) -> (IO CLong))