-- 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/HTMLImageElement.chs" #-}
module Graphics.UI.Gtk.WebKit.DOM.HTMLImageElement
       (htmlImageElementSetName, htmlImageElementGetName,
        htmlImageElementSetAlign, htmlImageElementGetAlign,
        htmlImageElementSetAlt, htmlImageElementGetAlt,
        htmlImageElementSetBorder, htmlImageElementGetBorder,
        htmlImageElementSetCrossOrigin, htmlImageElementGetCrossOrigin,
        htmlImageElementSetHeight, htmlImageElementGetHeight,
        htmlImageElementSetHspace, htmlImageElementGetHspace,
        htmlImageElementSetIsMap, htmlImageElementGetIsMap,
        htmlImageElementSetLongDesc, htmlImageElementGetLongDesc,
        htmlImageElementSetSrc, htmlImageElementGetSrc,
        htmlImageElementSetUseMap, htmlImageElementGetUseMap,
        htmlImageElementSetVspace, htmlImageElementGetVspace,
        htmlImageElementSetWidth, htmlImageElementGetWidth,
        htmlImageElementGetComplete, htmlImageElementSetLowsrc,
        htmlImageElementGetLowsrc, htmlImageElementGetNaturalHeight,
        htmlImageElementGetNaturalWidth, htmlImageElementGetX,
        htmlImageElementGetY)
       where
import System.Glib.FFI
import System.Glib.UTFString
import Control.Applicative
import Graphics.UI.Gtk.WebKit.Types
{-# LINE 23 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
import System.Glib.GError
import Graphics.UI.Gtk.WebKit.DOM.EventM
 
htmlImageElementSetName ::
                        (HTMLImageElementClass self) => self -> String -> IO ()
htmlImageElementSetName self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLImageElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_set_name argPtr1 arg2)
{-# LINE 32 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
          (toHTMLImageElement self)
          valPtr
 
htmlImageElementGetName ::
                        (HTMLImageElementClass self) => self -> IO String
htmlImageElementGetName self
  = ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_name argPtr1)
{-# LINE 39 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
       (toHTMLImageElement self))
      >>=
      readUTFString
 
htmlImageElementSetAlign ::
                         (HTMLImageElementClass self) => self -> String -> IO ()
htmlImageElementSetAlign self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLImageElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_set_align argPtr1 arg2)
{-# LINE 49 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
          (toHTMLImageElement self)
          valPtr
 
htmlImageElementGetAlign ::
                         (HTMLImageElementClass self) => self -> IO String
htmlImageElementGetAlign self
  = ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_align argPtr1)
{-# LINE 56 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
       (toHTMLImageElement self))
      >>=
      readUTFString
 
htmlImageElementSetAlt ::
                       (HTMLImageElementClass self) => self -> String -> IO ()
htmlImageElementSetAlt self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLImageElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_set_alt argPtr1 arg2)
{-# LINE 66 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
          (toHTMLImageElement self)
          valPtr
 
htmlImageElementGetAlt ::
                       (HTMLImageElementClass self) => self -> IO String
htmlImageElementGetAlt self
  = ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_alt argPtr1)
{-# LINE 73 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
       (toHTMLImageElement self))
      >>=
      readUTFString
 
htmlImageElementSetBorder ::
                          (HTMLImageElementClass self) => self -> String -> IO ()
htmlImageElementSetBorder self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLImageElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_set_border argPtr1 arg2)
{-# LINE 83 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
          (toHTMLImageElement self)
          valPtr
 
htmlImageElementGetBorder ::
                          (HTMLImageElementClass self) => self -> IO String
htmlImageElementGetBorder self
  = ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_border argPtr1)
{-# LINE 90 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
       (toHTMLImageElement self))
      >>=
      readUTFString
 
htmlImageElementSetCrossOrigin ::
                               (HTMLImageElementClass self) => self -> String -> IO ()
htmlImageElementSetCrossOrigin self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLImageElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_set_cross_origin argPtr1 arg2)
{-# LINE 100 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
          (toHTMLImageElement self)
          valPtr
 
htmlImageElementGetCrossOrigin ::
                               (HTMLImageElementClass self) => self -> IO String
htmlImageElementGetCrossOrigin self
  = ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_cross_origin argPtr1)
{-# LINE 107 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
       (toHTMLImageElement self))
      >>=
      readUTFString
 
htmlImageElementSetHeight ::
                          (HTMLImageElementClass self) => self -> Int -> IO ()
htmlImageElementSetHeight self val
  = (\(HTMLImageElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_set_height argPtr1 arg2)
{-# LINE 115 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
      (toHTMLImageElement self)
      (fromIntegral val)
 
htmlImageElementGetHeight ::
                          (HTMLImageElementClass self) => self -> IO Int
htmlImageElementGetHeight self
  = fromIntegral <$>
      ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_height argPtr1)
{-# LINE 123 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
         (toHTMLImageElement self))
 
htmlImageElementSetHspace ::
                          (HTMLImageElementClass self) => self -> Int -> IO ()
htmlImageElementSetHspace self val
  = (\(HTMLImageElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_set_hspace argPtr1 arg2)
{-# LINE 129 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
      (toHTMLImageElement self)
      (fromIntegral val)
 
htmlImageElementGetHspace ::
                          (HTMLImageElementClass self) => self -> IO Int
htmlImageElementGetHspace self
  = fromIntegral <$>
      ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_hspace argPtr1)
{-# LINE 137 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
         (toHTMLImageElement self))
 
htmlImageElementSetIsMap ::
                         (HTMLImageElementClass self) => self -> Bool -> IO ()
htmlImageElementSetIsMap self val
  = (\(HTMLImageElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_set_is_map argPtr1 arg2)
{-# LINE 143 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
      (toHTMLImageElement self)
      (fromBool val)
 
htmlImageElementGetIsMap ::
                         (HTMLImageElementClass self) => self -> IO Bool
htmlImageElementGetIsMap self
  = toBool <$>
      ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_is_map argPtr1)
{-# LINE 151 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
         (toHTMLImageElement self))
 
htmlImageElementSetLongDesc ::
                            (HTMLImageElementClass self) => self -> String -> IO ()
htmlImageElementSetLongDesc self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLImageElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_set_long_desc argPtr1 arg2)
{-# LINE 159 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
          (toHTMLImageElement self)
          valPtr
 
htmlImageElementGetLongDesc ::
                            (HTMLImageElementClass self) => self -> IO String
htmlImageElementGetLongDesc self
  = ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_long_desc argPtr1)
{-# LINE 166 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
       (toHTMLImageElement self))
      >>=
      readUTFString
 
htmlImageElementSetSrc ::
                       (HTMLImageElementClass self) => self -> String -> IO ()
htmlImageElementSetSrc self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLImageElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_set_src argPtr1 arg2)
{-# LINE 176 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
          (toHTMLImageElement self)
          valPtr
 
htmlImageElementGetSrc ::
                       (HTMLImageElementClass self) => self -> IO String
htmlImageElementGetSrc self
  = ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_src argPtr1)
{-# LINE 183 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
       (toHTMLImageElement self))
      >>=
      readUTFString
 
htmlImageElementSetUseMap ::
                          (HTMLImageElementClass self) => self -> String -> IO ()
htmlImageElementSetUseMap self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLImageElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_set_use_map argPtr1 arg2)
{-# LINE 193 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
          (toHTMLImageElement self)
          valPtr
 
htmlImageElementGetUseMap ::
                          (HTMLImageElementClass self) => self -> IO String
htmlImageElementGetUseMap self
  = ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_use_map argPtr1)
{-# LINE 200 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
       (toHTMLImageElement self))
      >>=
      readUTFString
 
htmlImageElementSetVspace ::
                          (HTMLImageElementClass self) => self -> Int -> IO ()
htmlImageElementSetVspace self val
  = (\(HTMLImageElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_set_vspace argPtr1 arg2)
{-# LINE 208 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
      (toHTMLImageElement self)
      (fromIntegral val)
 
htmlImageElementGetVspace ::
                          (HTMLImageElementClass self) => self -> IO Int
htmlImageElementGetVspace self
  = fromIntegral <$>
      ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_vspace argPtr1)
{-# LINE 216 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
         (toHTMLImageElement self))
 
htmlImageElementSetWidth ::
                         (HTMLImageElementClass self) => self -> Int -> IO ()
htmlImageElementSetWidth self val
  = (\(HTMLImageElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_set_width argPtr1 arg2)
{-# LINE 222 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
      (toHTMLImageElement self)
      (fromIntegral val)
 
htmlImageElementGetWidth ::
                         (HTMLImageElementClass self) => self -> IO Int
htmlImageElementGetWidth self
  = fromIntegral <$>
      ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_width argPtr1)
{-# LINE 230 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
         (toHTMLImageElement self))
 
htmlImageElementGetComplete ::
                            (HTMLImageElementClass self) => self -> IO Bool
htmlImageElementGetComplete self
  = toBool <$>
      ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_complete argPtr1)
{-# LINE 237 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
         (toHTMLImageElement self))
 
htmlImageElementSetLowsrc ::
                          (HTMLImageElementClass self) => self -> String -> IO ()
htmlImageElementSetLowsrc self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLImageElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_set_lowsrc argPtr1 arg2)
{-# LINE 245 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
          (toHTMLImageElement self)
          valPtr
 
htmlImageElementGetLowsrc ::
                          (HTMLImageElementClass self) => self -> IO String
htmlImageElementGetLowsrc self
  = ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_lowsrc argPtr1)
{-# LINE 252 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
       (toHTMLImageElement self))
      >>=
      readUTFString
 
htmlImageElementGetNaturalHeight ::
                                 (HTMLImageElementClass self) => self -> IO Int
htmlImageElementGetNaturalHeight self
  = fromIntegral <$>
      ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_natural_height argPtr1)
{-# LINE 261 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
         (toHTMLImageElement self))
 
htmlImageElementGetNaturalWidth ::
                                (HTMLImageElementClass self) => self -> IO Int
htmlImageElementGetNaturalWidth self
  = fromIntegral <$>
      ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_natural_width argPtr1)
{-# LINE 268 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
         (toHTMLImageElement self))
 
htmlImageElementGetX ::
                     (HTMLImageElementClass self) => self -> IO Int
htmlImageElementGetX self
  = fromIntegral <$>
      ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_x argPtr1)
{-# LINE 275 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
         (toHTMLImageElement self))
 
htmlImageElementGetY ::
                     (HTMLImageElementClass self) => self -> IO Int
htmlImageElementGetY self
  = fromIntegral <$>
      ((\(HTMLImageElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_image_element_get_y argPtr1)
{-# LINE 282 "./Graphics/UI/Gtk/WebKit/DOM/HTMLImageElement.chs" #-}
         (toHTMLImageElement self))

foreign import ccall safe "webkit_dom_html_image_element_set_name"
  webkit_dom_html_image_element_set_name :: ((Ptr HTMLImageElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_image_element_get_name"
  webkit_dom_html_image_element_get_name :: ((Ptr HTMLImageElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_image_element_set_align"
  webkit_dom_html_image_element_set_align :: ((Ptr HTMLImageElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_image_element_get_align"
  webkit_dom_html_image_element_get_align :: ((Ptr HTMLImageElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_image_element_set_alt"
  webkit_dom_html_image_element_set_alt :: ((Ptr HTMLImageElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_image_element_get_alt"
  webkit_dom_html_image_element_get_alt :: ((Ptr HTMLImageElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_image_element_set_border"
  webkit_dom_html_image_element_set_border :: ((Ptr HTMLImageElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_image_element_get_border"
  webkit_dom_html_image_element_get_border :: ((Ptr HTMLImageElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_image_element_set_cross_origin"
  webkit_dom_html_image_element_set_cross_origin :: ((Ptr HTMLImageElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_image_element_get_cross_origin"
  webkit_dom_html_image_element_get_cross_origin :: ((Ptr HTMLImageElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_image_element_set_height"
  webkit_dom_html_image_element_set_height :: ((Ptr HTMLImageElement) -> (CLong -> (IO ())))

foreign import ccall safe "webkit_dom_html_image_element_get_height"
  webkit_dom_html_image_element_get_height :: ((Ptr HTMLImageElement) -> (IO CLong))

foreign import ccall safe "webkit_dom_html_image_element_set_hspace"
  webkit_dom_html_image_element_set_hspace :: ((Ptr HTMLImageElement) -> (CLong -> (IO ())))

foreign import ccall safe "webkit_dom_html_image_element_get_hspace"
  webkit_dom_html_image_element_get_hspace :: ((Ptr HTMLImageElement) -> (IO CLong))

foreign import ccall safe "webkit_dom_html_image_element_set_is_map"
  webkit_dom_html_image_element_set_is_map :: ((Ptr HTMLImageElement) -> (CInt -> (IO ())))

foreign import ccall safe "webkit_dom_html_image_element_get_is_map"
  webkit_dom_html_image_element_get_is_map :: ((Ptr HTMLImageElement) -> (IO CInt))

foreign import ccall safe "webkit_dom_html_image_element_set_long_desc"
  webkit_dom_html_image_element_set_long_desc :: ((Ptr HTMLImageElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_image_element_get_long_desc"
  webkit_dom_html_image_element_get_long_desc :: ((Ptr HTMLImageElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_image_element_set_src"
  webkit_dom_html_image_element_set_src :: ((Ptr HTMLImageElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_image_element_get_src"
  webkit_dom_html_image_element_get_src :: ((Ptr HTMLImageElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_image_element_set_use_map"
  webkit_dom_html_image_element_set_use_map :: ((Ptr HTMLImageElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_image_element_get_use_map"
  webkit_dom_html_image_element_get_use_map :: ((Ptr HTMLImageElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_image_element_set_vspace"
  webkit_dom_html_image_element_set_vspace :: ((Ptr HTMLImageElement) -> (CLong -> (IO ())))

foreign import ccall safe "webkit_dom_html_image_element_get_vspace"
  webkit_dom_html_image_element_get_vspace :: ((Ptr HTMLImageElement) -> (IO CLong))

foreign import ccall safe "webkit_dom_html_image_element_set_width"
  webkit_dom_html_image_element_set_width :: ((Ptr HTMLImageElement) -> (CLong -> (IO ())))

foreign import ccall safe "webkit_dom_html_image_element_get_width"
  webkit_dom_html_image_element_get_width :: ((Ptr HTMLImageElement) -> (IO CLong))

foreign import ccall safe "webkit_dom_html_image_element_get_complete"
  webkit_dom_html_image_element_get_complete :: ((Ptr HTMLImageElement) -> (IO CInt))

foreign import ccall safe "webkit_dom_html_image_element_set_lowsrc"
  webkit_dom_html_image_element_set_lowsrc :: ((Ptr HTMLImageElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_image_element_get_lowsrc"
  webkit_dom_html_image_element_get_lowsrc :: ((Ptr HTMLImageElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_image_element_get_natural_height"
  webkit_dom_html_image_element_get_natural_height :: ((Ptr HTMLImageElement) -> (IO CLong))

foreign import ccall safe "webkit_dom_html_image_element_get_natural_width"
  webkit_dom_html_image_element_get_natural_width :: ((Ptr HTMLImageElement) -> (IO CLong))

foreign import ccall safe "webkit_dom_html_image_element_get_x"
  webkit_dom_html_image_element_get_x :: ((Ptr HTMLImageElement) -> (IO CLong))

foreign import ccall safe "webkit_dom_html_image_element_get_y"
  webkit_dom_html_image_element_get_y :: ((Ptr HTMLImageElement) -> (IO CLong))