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


{-# LINE 1 "./Graphics/UI/Gtk/WebKit/DOM/HTMLHRElement.chs" #-}
module Graphics.UI.Gtk.WebKit.DOM.HTMLHRElement
       (htmlhrElementSetAlign, htmlhrElementGetAlign,
        htmlhrElementSetNoShade, htmlhrElementGetNoShade,
        htmlhrElementSetSize, htmlhrElementGetSize, htmlhrElementSetWidth,
        htmlhrElementGetWidth, HTMLHRElement, HTMLHRElementClass,
        castToHTMLHRElement, gTypeHTMLHRElement, toHTMLHRElement)
       where
import System.Glib.FFI
import System.Glib.UTFString
import Control.Applicative
import Graphics.UI.Gtk.WebKit.Types
{-# LINE 11 "./Graphics/UI/Gtk/WebKit/DOM/HTMLHRElement.chs" #-}
import System.Glib.GError
import Graphics.UI.Gtk.WebKit.DOM.EventM
 
htmlhrElementSetAlign ::
                      (HTMLHRElementClass self, GlibString string) =>
                        self -> string -> IO ()
htmlhrElementSetAlign self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLHRElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_htmlhr_element_set_align argPtr1 arg2)
{-# LINE 21 "./Graphics/UI/Gtk/WebKit/DOM/HTMLHRElement.chs" #-}
          (toHTMLHRElement self)
          valPtr
 
htmlhrElementGetAlign ::
                      (HTMLHRElementClass self, GlibString string) => self -> IO string
htmlhrElementGetAlign self
  = ((\(HTMLHRElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_htmlhr_element_get_align argPtr1)
{-# LINE 28 "./Graphics/UI/Gtk/WebKit/DOM/HTMLHRElement.chs" #-}
       (toHTMLHRElement self))
      >>=
      readUTFString
 
htmlhrElementSetNoShade ::
                        (HTMLHRElementClass self) => self -> Bool -> IO ()
htmlhrElementSetNoShade self val
  = (\(HTMLHRElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_htmlhr_element_set_no_shade argPtr1 arg2)
{-# LINE 36 "./Graphics/UI/Gtk/WebKit/DOM/HTMLHRElement.chs" #-}
      (toHTMLHRElement self)
      (fromBool val)
 
htmlhrElementGetNoShade ::
                        (HTMLHRElementClass self) => self -> IO Bool
htmlhrElementGetNoShade self
  = toBool <$>
      ((\(HTMLHRElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_htmlhr_element_get_no_shade argPtr1)
{-# LINE 44 "./Graphics/UI/Gtk/WebKit/DOM/HTMLHRElement.chs" #-}
         (toHTMLHRElement self))
 
htmlhrElementSetSize ::
                     (HTMLHRElementClass self, GlibString string) =>
                       self -> string -> IO ()
htmlhrElementSetSize self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLHRElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_htmlhr_element_set_size argPtr1 arg2)
{-# LINE 53 "./Graphics/UI/Gtk/WebKit/DOM/HTMLHRElement.chs" #-}
          (toHTMLHRElement self)
          valPtr
 
htmlhrElementGetSize ::
                     (HTMLHRElementClass self, GlibString string) => self -> IO string
htmlhrElementGetSize self
  = ((\(HTMLHRElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_htmlhr_element_get_size argPtr1)
{-# LINE 60 "./Graphics/UI/Gtk/WebKit/DOM/HTMLHRElement.chs" #-}
       (toHTMLHRElement self))
      >>=
      readUTFString
 
htmlhrElementSetWidth ::
                      (HTMLHRElementClass self, GlibString string) =>
                        self -> string -> IO ()
htmlhrElementSetWidth self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLHRElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_htmlhr_element_set_width argPtr1 arg2)
{-# LINE 71 "./Graphics/UI/Gtk/WebKit/DOM/HTMLHRElement.chs" #-}
          (toHTMLHRElement self)
          valPtr
 
htmlhrElementGetWidth ::
                      (HTMLHRElementClass self, GlibString string) => self -> IO string
htmlhrElementGetWidth self
  = ((\(HTMLHRElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_htmlhr_element_get_width argPtr1)
{-# LINE 78 "./Graphics/UI/Gtk/WebKit/DOM/HTMLHRElement.chs" #-}
       (toHTMLHRElement self))
      >>=
      readUTFString

foreign import ccall safe "webkit_dom_htmlhr_element_set_align"
  webkit_dom_htmlhr_element_set_align :: ((Ptr HTMLHRElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_htmlhr_element_get_align"
  webkit_dom_htmlhr_element_get_align :: ((Ptr HTMLHRElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_htmlhr_element_set_no_shade"
  webkit_dom_htmlhr_element_set_no_shade :: ((Ptr HTMLHRElement) -> (CInt -> (IO ())))

foreign import ccall safe "webkit_dom_htmlhr_element_get_no_shade"
  webkit_dom_htmlhr_element_get_no_shade :: ((Ptr HTMLHRElement) -> (IO CInt))

foreign import ccall safe "webkit_dom_htmlhr_element_set_size"
  webkit_dom_htmlhr_element_set_size :: ((Ptr HTMLHRElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_htmlhr_element_get_size"
  webkit_dom_htmlhr_element_get_size :: ((Ptr HTMLHRElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_htmlhr_element_set_width"
  webkit_dom_htmlhr_element_set_width :: ((Ptr HTMLHRElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_htmlhr_element_get_width"
  webkit_dom_htmlhr_element_get_width :: ((Ptr HTMLHRElement) -> (IO (Ptr CChar)))