module Graphics.UI.Gtk.WebKit.DOM.HTMLParamElement(
setName,
getName,
setValue,
getValue,
setValueType,
getValueType,
HTMLParamElement,
castToHTMLParamElement,
gTypeHTMLParamElement,
HTMLParamElementClass,
toHTMLParamElement,
) 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
import Graphics.UI.Gtk.WebKit.DOM.Enums
setName ::
(MonadIO m, HTMLParamElementClass self, GlibString string) =>
self -> string -> m ()
setName self val
= liftIO
(withUTFString val $
\ valPtr ->
(\(HTMLParamElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_param_element_set_name argPtr1 arg2)
(toHTMLParamElement self)
valPtr)
getName ::
(MonadIO m, HTMLParamElementClass self, GlibString string) =>
self -> m string
getName self
= liftIO
(((\(HTMLParamElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_param_element_get_name argPtr1)
(toHTMLParamElement self))
>>=
readUTFString)
setValue ::
(MonadIO m, HTMLParamElementClass self, GlibString string) =>
self -> string -> m ()
setValue self val
= liftIO
(withUTFString val $
\ valPtr ->
(\(HTMLParamElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_param_element_set_value argPtr1 arg2)
(toHTMLParamElement self)
valPtr)
getValue ::
(MonadIO m, HTMLParamElementClass self, GlibString string) =>
self -> m string
getValue self
= liftIO
(((\(HTMLParamElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_param_element_get_value argPtr1)
(toHTMLParamElement self))
>>=
readUTFString)
setValueType ::
(MonadIO m, HTMLParamElementClass self, GlibString string) =>
self -> string -> m ()
setValueType self val
= liftIO
(withUTFString val $
\ valPtr ->
(\(HTMLParamElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_param_element_set_value_type argPtr1 arg2)
(toHTMLParamElement self)
valPtr)
getValueType ::
(MonadIO m, HTMLParamElementClass self, GlibString string) =>
self -> m string
getValueType self
= liftIO
(((\(HTMLParamElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_param_element_get_value_type argPtr1)
(toHTMLParamElement self))
>>=
readUTFString)
foreign import ccall safe "webkit_dom_html_param_element_set_name"
webkit_dom_html_param_element_set_name :: ((Ptr HTMLParamElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_param_element_get_name"
webkit_dom_html_param_element_get_name :: ((Ptr HTMLParamElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_param_element_set_value"
webkit_dom_html_param_element_set_value :: ((Ptr HTMLParamElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_param_element_get_value"
webkit_dom_html_param_element_get_value :: ((Ptr HTMLParamElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_param_element_set_value_type"
webkit_dom_html_param_element_set_value_type :: ((Ptr HTMLParamElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_param_element_get_value_type"
webkit_dom_html_param_element_get_value_type :: ((Ptr HTMLParamElement) -> (IO (Ptr CChar)))