-- 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/HTMLMetaElement.chs" #-}
module Graphics.UI.Gtk.WebKit.DOM.HTMLMetaElement(
setContent,
getContent,
setHttpEquiv,
getHttpEquiv,
setName,
getName,
setScheme,
getScheme,
HTMLMetaElement,
castToHTMLMetaElement,
gTypeHTMLMetaElement,
HTMLMetaElementClass,
toHTMLMetaElement,
) 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 27 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMetaElement.chs" #-}
import Graphics.UI.Gtk.WebKit.DOM.Enums

 
setContent ::
           (MonadIO m, HTMLMetaElementClass self, GlibString string) =>
             self -> string -> m ()
setContent self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLMetaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_meta_element_set_content argPtr1 arg2)
{-# LINE 38 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMetaElement.chs" #-}
             (toHTMLMetaElement self)
             valPtr)
 
getContent ::
           (MonadIO m, HTMLMetaElementClass self, GlibString string) =>
             self -> m string
getContent self
  = liftIO
      (((\(HTMLMetaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_meta_element_get_content argPtr1)
{-# LINE 47 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMetaElement.chs" #-}
          (toHTMLMetaElement self))
         >>=
         readUTFString)
 
setHttpEquiv ::
             (MonadIO m, HTMLMetaElementClass self, GlibString string) =>
               self -> string -> m ()
setHttpEquiv self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLMetaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_meta_element_set_http_equiv argPtr1 arg2)
{-# LINE 59 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMetaElement.chs" #-}
             (toHTMLMetaElement self)
             valPtr)
 
getHttpEquiv ::
             (MonadIO m, HTMLMetaElementClass self, GlibString string) =>
               self -> m string
getHttpEquiv self
  = liftIO
      (((\(HTMLMetaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_meta_element_get_http_equiv argPtr1)
{-# LINE 68 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMetaElement.chs" #-}
          (toHTMLMetaElement self))
         >>=
         readUTFString)
 
setName ::
        (MonadIO m, HTMLMetaElementClass self, GlibString string) =>
          self -> string -> m ()
setName self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLMetaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_meta_element_set_name argPtr1 arg2)
{-# LINE 80 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMetaElement.chs" #-}
             (toHTMLMetaElement self)
             valPtr)
 
getName ::
        (MonadIO m, HTMLMetaElementClass self, GlibString string) =>
          self -> m string
getName self
  = liftIO
      (((\(HTMLMetaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_meta_element_get_name argPtr1)
{-# LINE 89 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMetaElement.chs" #-}
          (toHTMLMetaElement self))
         >>=
         readUTFString)
 
setScheme ::
          (MonadIO m, HTMLMetaElementClass self, GlibString string) =>
            self -> string -> m ()
setScheme self val
  = liftIO
      (withUTFString val $
         \ valPtr ->
           (\(HTMLMetaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_meta_element_set_scheme argPtr1 arg2)
{-# LINE 101 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMetaElement.chs" #-}
             (toHTMLMetaElement self)
             valPtr)
 
getScheme ::
          (MonadIO m, HTMLMetaElementClass self, GlibString string) =>
            self -> m string
getScheme self
  = liftIO
      (((\(HTMLMetaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_meta_element_get_scheme argPtr1)
{-# LINE 110 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMetaElement.chs" #-}
          (toHTMLMetaElement self))
         >>=
         readUTFString)

foreign import ccall safe "webkit_dom_html_meta_element_set_content"
  webkit_dom_html_meta_element_set_content :: ((Ptr HTMLMetaElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_meta_element_get_content"
  webkit_dom_html_meta_element_get_content :: ((Ptr HTMLMetaElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_meta_element_set_http_equiv"
  webkit_dom_html_meta_element_set_http_equiv :: ((Ptr HTMLMetaElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_meta_element_get_http_equiv"
  webkit_dom_html_meta_element_get_http_equiv :: ((Ptr HTMLMetaElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_meta_element_set_name"
  webkit_dom_html_meta_element_set_name :: ((Ptr HTMLMetaElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_meta_element_get_name"
  webkit_dom_html_meta_element_get_name :: ((Ptr HTMLMetaElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_meta_element_set_scheme"
  webkit_dom_html_meta_element_set_scheme :: ((Ptr HTMLMetaElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_meta_element_get_scheme"
  webkit_dom_html_meta_element_get_scheme :: ((Ptr HTMLMetaElement) -> (IO (Ptr CChar)))