-- 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/HTMLTextAreaElement.chs" #-}
module Graphics.UI.Gtk.WebKit.DOM.HTMLTextAreaElement
       (htmlTextAreaElementCheckValidity,
        htmlTextAreaElementSetCustomValidity, htmlTextAreaElementSelect,
        htmlTextAreaElementSetSelectionRange,
        htmlTextAreaElementSetAutofocus, htmlTextAreaElementGetAutofocus,
        htmlTextAreaElementSetCols, htmlTextAreaElementGetCols,
        htmlTextAreaElementSetDirName, htmlTextAreaElementGetDirName,
        htmlTextAreaElementSetDisabled, htmlTextAreaElementGetDisabled,
        htmlTextAreaElementGetForm, htmlTextAreaElementSetMaxLength,
        htmlTextAreaElementGetMaxLength, htmlTextAreaElementSetName,
        htmlTextAreaElementGetName, htmlTextAreaElementSetPlaceholder,
        htmlTextAreaElementGetPlaceholder, htmlTextAreaElementSetReadOnly,
        htmlTextAreaElementGetReadOnly, htmlTextAreaElementSetRequired,
        htmlTextAreaElementGetRequired, htmlTextAreaElementSetRows,
        htmlTextAreaElementGetRows, htmlTextAreaElementSetWrap,
        htmlTextAreaElementGetWrap, htmlTextAreaElementSetDefaultValue,
        htmlTextAreaElementGetDefaultValue, htmlTextAreaElementSetValue,
        htmlTextAreaElementGetValue, htmlTextAreaElementGetTextLength,
        htmlTextAreaElementGetWillValidate, htmlTextAreaElementGetValidity,
        htmlTextAreaElementGetValidationMessage,
        htmlTextAreaElementGetLabels, htmlTextAreaElementSetSelectionStart,
        htmlTextAreaElementGetSelectionStart,
        htmlTextAreaElementSetSelectionEnd,
        htmlTextAreaElementGetSelectionEnd,
        htmlTextAreaElementSetSelectionDirection,
        htmlTextAreaElementGetSelectionDirection, HTMLTextAreaElement,
        HTMLTextAreaElementClass, castToHTMLTextAreaElement,
        gTypeHTMLTextAreaElement, toHTMLTextAreaElement)
       where
import System.Glib.FFI
import System.Glib.UTFString
import Control.Applicative
import Graphics.UI.Gtk.WebKit.Types
{-# LINE 36 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
import System.Glib.GError
import Graphics.UI.Gtk.WebKit.DOM.EventM
 
htmlTextAreaElementCheckValidity ::
                                 (HTMLTextAreaElementClass self) => self -> IO Bool
htmlTextAreaElementCheckValidity self
  = toBool <$>
      ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_check_validity argPtr1)
{-# LINE 44 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
         (toHTMLTextAreaElement self))
 
htmlTextAreaElementSetCustomValidity ::
                                     (HTMLTextAreaElementClass self) => self -> String -> IO ()
htmlTextAreaElementSetCustomValidity self error
  = withUTFString error $
      \ errorPtr ->
        (\(HTMLTextAreaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_custom_validity argPtr1 arg2)
{-# LINE 52 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
          (toHTMLTextAreaElement self)
          errorPtr
 
htmlTextAreaElementSelect ::
                          (HTMLTextAreaElementClass self) => self -> IO ()
htmlTextAreaElementSelect self
  = (\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_select argPtr1)
{-# LINE 59 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
      (toHTMLTextAreaElement self)
 

htmlTextAreaElementSetSelectionRange ::
                                     (HTMLTextAreaElementClass self) =>
                                       self -> Int -> Int -> String -> IO ()
htmlTextAreaElementSetSelectionRange self start end direction
  = withUTFString direction $
      \ directionPtr ->
        (\(HTMLTextAreaElement arg1) arg2 arg3 arg4 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_selection_range argPtr1 arg2 arg3 arg4)
{-# LINE 89 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
          (toHTMLTextAreaElement self)
          (fromIntegral start)
          (fromIntegral end)
          directionPtr
 
htmlTextAreaElementSetAutofocus ::
                                (HTMLTextAreaElementClass self) => self -> Bool -> IO ()
htmlTextAreaElementSetAutofocus self val
  = (\(HTMLTextAreaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_autofocus argPtr1 arg2)
{-# LINE 98 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
      (toHTMLTextAreaElement self)
      (fromBool val)
 
htmlTextAreaElementGetAutofocus ::
                                (HTMLTextAreaElementClass self) => self -> IO Bool
htmlTextAreaElementGetAutofocus self
  = toBool <$>
      ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_autofocus argPtr1)
{-# LINE 106 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
         (toHTMLTextAreaElement self))
 
htmlTextAreaElementSetCols ::
                           (HTMLTextAreaElementClass self) => self -> Int -> IO ()
htmlTextAreaElementSetCols self val
  = (\(HTMLTextAreaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_cols argPtr1 arg2)
{-# LINE 112 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
      (toHTMLTextAreaElement self)
      (fromIntegral val)
 
htmlTextAreaElementGetCols ::
                           (HTMLTextAreaElementClass self) => self -> IO Int
htmlTextAreaElementGetCols self
  = fromIntegral <$>
      ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_cols argPtr1)
{-# LINE 120 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
         (toHTMLTextAreaElement self))
 
htmlTextAreaElementSetDirName ::
                              (HTMLTextAreaElementClass self) => self -> String -> IO ()
htmlTextAreaElementSetDirName self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLTextAreaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_dir_name argPtr1 arg2)
{-# LINE 128 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
          (toHTMLTextAreaElement self)
          valPtr
 
htmlTextAreaElementGetDirName ::
                              (HTMLTextAreaElementClass self) => self -> IO String
htmlTextAreaElementGetDirName self
  = ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_dir_name argPtr1)
{-# LINE 135 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
       (toHTMLTextAreaElement self))
      >>=
      readUTFString
 
htmlTextAreaElementSetDisabled ::
                               (HTMLTextAreaElementClass self) => self -> Bool -> IO ()
htmlTextAreaElementSetDisabled self val
  = (\(HTMLTextAreaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_disabled argPtr1 arg2)
{-# LINE 143 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
      (toHTMLTextAreaElement self)
      (fromBool val)
 
htmlTextAreaElementGetDisabled ::
                               (HTMLTextAreaElementClass self) => self -> IO Bool
htmlTextAreaElementGetDisabled self
  = toBool <$>
      ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_disabled argPtr1)
{-# LINE 151 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
         (toHTMLTextAreaElement self))
 
htmlTextAreaElementGetForm ::
                           (HTMLTextAreaElementClass self) =>
                             self -> IO (Maybe HTMLFormElement)
htmlTextAreaElementGetForm self
  = maybeNull (makeNewGObject mkHTMLFormElement)
      ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_form argPtr1)
{-# LINE 159 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
         (toHTMLTextAreaElement self))
 
htmlTextAreaElementSetMaxLength ::
                                (HTMLTextAreaElementClass self) => self -> Int -> IO ()
htmlTextAreaElementSetMaxLength self val
  = propagateGError $
      \ errorPtr_ ->
        (\(HTMLTextAreaElement arg1) arg2 arg3 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_max_length argPtr1 arg2 arg3)
{-# LINE 167 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
          (toHTMLTextAreaElement self)
          (fromIntegral val)
          errorPtr_
 
htmlTextAreaElementGetMaxLength ::
                                (HTMLTextAreaElementClass self) => self -> IO Int
htmlTextAreaElementGetMaxLength self
  = fromIntegral <$>
      ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_max_length argPtr1)
{-# LINE 176 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
         (toHTMLTextAreaElement self))
 
htmlTextAreaElementSetName ::
                           (HTMLTextAreaElementClass self) => self -> String -> IO ()
htmlTextAreaElementSetName self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLTextAreaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_name argPtr1 arg2)
{-# LINE 184 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
          (toHTMLTextAreaElement self)
          valPtr
 
htmlTextAreaElementGetName ::
                           (HTMLTextAreaElementClass self) => self -> IO String
htmlTextAreaElementGetName self
  = ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_name argPtr1)
{-# LINE 191 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
       (toHTMLTextAreaElement self))
      >>=
      readUTFString
 
htmlTextAreaElementSetPlaceholder ::
                                  (HTMLTextAreaElementClass self) => self -> String -> IO ()
htmlTextAreaElementSetPlaceholder self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLTextAreaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_placeholder argPtr1 arg2)
{-# LINE 201 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
          (toHTMLTextAreaElement self)
          valPtr
 
htmlTextAreaElementGetPlaceholder ::
                                  (HTMLTextAreaElementClass self) => self -> IO String
htmlTextAreaElementGetPlaceholder self
  = ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_placeholder argPtr1)
{-# LINE 208 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
       (toHTMLTextAreaElement self))
      >>=
      readUTFString
 
htmlTextAreaElementSetReadOnly ::
                               (HTMLTextAreaElementClass self) => self -> Bool -> IO ()
htmlTextAreaElementSetReadOnly self val
  = (\(HTMLTextAreaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_read_only argPtr1 arg2)
{-# LINE 216 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
      (toHTMLTextAreaElement self)
      (fromBool val)
 
htmlTextAreaElementGetReadOnly ::
                               (HTMLTextAreaElementClass self) => self -> IO Bool
htmlTextAreaElementGetReadOnly self
  = toBool <$>
      ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_read_only argPtr1)
{-# LINE 224 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
         (toHTMLTextAreaElement self))
 
htmlTextAreaElementSetRequired ::
                               (HTMLTextAreaElementClass self) => self -> Bool -> IO ()
htmlTextAreaElementSetRequired self val
  = (\(HTMLTextAreaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_required argPtr1 arg2)
{-# LINE 230 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
      (toHTMLTextAreaElement self)
      (fromBool val)
 
htmlTextAreaElementGetRequired ::
                               (HTMLTextAreaElementClass self) => self -> IO Bool
htmlTextAreaElementGetRequired self
  = toBool <$>
      ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_required argPtr1)
{-# LINE 238 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
         (toHTMLTextAreaElement self))
 
htmlTextAreaElementSetRows ::
                           (HTMLTextAreaElementClass self) => self -> Int -> IO ()
htmlTextAreaElementSetRows self val
  = (\(HTMLTextAreaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_rows argPtr1 arg2)
{-# LINE 244 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
      (toHTMLTextAreaElement self)
      (fromIntegral val)
 
htmlTextAreaElementGetRows ::
                           (HTMLTextAreaElementClass self) => self -> IO Int
htmlTextAreaElementGetRows self
  = fromIntegral <$>
      ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_rows argPtr1)
{-# LINE 252 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
         (toHTMLTextAreaElement self))
 
htmlTextAreaElementSetWrap ::
                           (HTMLTextAreaElementClass self) => self -> String -> IO ()
htmlTextAreaElementSetWrap self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLTextAreaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_wrap argPtr1 arg2)
{-# LINE 260 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
          (toHTMLTextAreaElement self)
          valPtr
 
htmlTextAreaElementGetWrap ::
                           (HTMLTextAreaElementClass self) => self -> IO String
htmlTextAreaElementGetWrap self
  = ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_wrap argPtr1)
{-# LINE 267 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
       (toHTMLTextAreaElement self))
      >>=
      readUTFString
 
htmlTextAreaElementSetDefaultValue ::
                                   (HTMLTextAreaElementClass self) => self -> String -> IO ()
htmlTextAreaElementSetDefaultValue self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLTextAreaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_default_value argPtr1 arg2)
{-# LINE 277 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
          (toHTMLTextAreaElement self)
          valPtr
 
htmlTextAreaElementGetDefaultValue ::
                                   (HTMLTextAreaElementClass self) => self -> IO String
htmlTextAreaElementGetDefaultValue self
  = ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_default_value argPtr1)
{-# LINE 284 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
       (toHTMLTextAreaElement self))
      >>=
      readUTFString
 
htmlTextAreaElementSetValue ::
                            (HTMLTextAreaElementClass self) => self -> String -> IO ()
htmlTextAreaElementSetValue self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLTextAreaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_value argPtr1 arg2)
{-# LINE 294 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
          (toHTMLTextAreaElement self)
          valPtr
 
htmlTextAreaElementGetValue ::
                            (HTMLTextAreaElementClass self) => self -> IO String
htmlTextAreaElementGetValue self
  = ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_value argPtr1)
{-# LINE 301 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
       (toHTMLTextAreaElement self))
      >>=
      readUTFString
 
htmlTextAreaElementGetTextLength ::
                                 (HTMLTextAreaElementClass self) => self -> IO Word
htmlTextAreaElementGetTextLength self
  = fromIntegral <$>
      ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_text_length argPtr1)
{-# LINE 310 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
         (toHTMLTextAreaElement self))
 
htmlTextAreaElementGetWillValidate ::
                                   (HTMLTextAreaElementClass self) => self -> IO Bool
htmlTextAreaElementGetWillValidate self
  = toBool <$>
      ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_will_validate argPtr1)
{-# LINE 317 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
         (toHTMLTextAreaElement self))
 
htmlTextAreaElementGetValidity ::
                               (HTMLTextAreaElementClass self) => self -> IO (Maybe ValidityState)
htmlTextAreaElementGetValidity self
  = maybeNull (makeNewGObject mkValidityState)
      ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_validity argPtr1)
{-# LINE 324 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
         (toHTMLTextAreaElement self))
 
htmlTextAreaElementGetValidationMessage ::
                                        (HTMLTextAreaElementClass self) => self -> IO String
htmlTextAreaElementGetValidationMessage self
  = ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_validation_message argPtr1)
{-# LINE 331 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
       (toHTMLTextAreaElement self))
      >>=
      readUTFString
 
htmlTextAreaElementGetLabels ::
                             (HTMLTextAreaElementClass self) => self -> IO (Maybe NodeList)
htmlTextAreaElementGetLabels self
  = maybeNull (makeNewGObject mkNodeList)
      ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_labels argPtr1)
{-# LINE 340 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
         (toHTMLTextAreaElement self))
 
htmlTextAreaElementSetSelectionStart ::
                                     (HTMLTextAreaElementClass self) => self -> Int -> IO ()
htmlTextAreaElementSetSelectionStart self val
  = (\(HTMLTextAreaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_selection_start argPtr1 arg2)
{-# LINE 346 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
      (toHTMLTextAreaElement self)
      (fromIntegral val)
 
htmlTextAreaElementGetSelectionStart ::
                                     (HTMLTextAreaElementClass self) => self -> IO Int
htmlTextAreaElementGetSelectionStart self
  = fromIntegral <$>
      ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_selection_start argPtr1)
{-# LINE 354 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
         (toHTMLTextAreaElement self))
 
htmlTextAreaElementSetSelectionEnd ::
                                   (HTMLTextAreaElementClass self) => self -> Int -> IO ()
htmlTextAreaElementSetSelectionEnd self val
  = (\(HTMLTextAreaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_selection_end argPtr1 arg2)
{-# LINE 360 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
      (toHTMLTextAreaElement self)
      (fromIntegral val)
 
htmlTextAreaElementGetSelectionEnd ::
                                   (HTMLTextAreaElementClass self) => self -> IO Int
htmlTextAreaElementGetSelectionEnd self
  = fromIntegral <$>
      ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_selection_end argPtr1)
{-# LINE 368 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
         (toHTMLTextAreaElement self))
 
htmlTextAreaElementSetSelectionDirection ::
                                         (HTMLTextAreaElementClass self) => self -> String -> IO ()
htmlTextAreaElementSetSelectionDirection self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLTextAreaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_set_selection_direction argPtr1 arg2)
{-# LINE 377 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
          (toHTMLTextAreaElement self)
          valPtr
 
htmlTextAreaElementGetSelectionDirection ::
                                         (HTMLTextAreaElementClass self) => self -> IO String
htmlTextAreaElementGetSelectionDirection self
  = ((\(HTMLTextAreaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_text_area_element_get_selection_direction argPtr1)
{-# LINE 386 "./Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.chs" #-}
       (toHTMLTextAreaElement self))
      >>=
      readUTFString

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_check_validity"
  webkit_dom_html_text_area_element_check_validity :: ((Ptr HTMLTextAreaElement) -> (IO CInt))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_custom_validity"
  webkit_dom_html_text_area_element_set_custom_validity :: ((Ptr HTMLTextAreaElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_select"
  webkit_dom_html_text_area_element_select :: ((Ptr HTMLTextAreaElement) -> (IO ()))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_selection_range"
  webkit_dom_html_text_area_element_set_selection_range :: ((Ptr HTMLTextAreaElement) -> (CLong -> (CLong -> ((Ptr CChar) -> (IO ())))))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_autofocus"
  webkit_dom_html_text_area_element_set_autofocus :: ((Ptr HTMLTextAreaElement) -> (CInt -> (IO ())))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_autofocus"
  webkit_dom_html_text_area_element_get_autofocus :: ((Ptr HTMLTextAreaElement) -> (IO CInt))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_cols"
  webkit_dom_html_text_area_element_set_cols :: ((Ptr HTMLTextAreaElement) -> (CLong -> (IO ())))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_cols"
  webkit_dom_html_text_area_element_get_cols :: ((Ptr HTMLTextAreaElement) -> (IO CLong))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_dir_name"
  webkit_dom_html_text_area_element_set_dir_name :: ((Ptr HTMLTextAreaElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_dir_name"
  webkit_dom_html_text_area_element_get_dir_name :: ((Ptr HTMLTextAreaElement) -> (IO (Ptr CChar)))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_disabled"
  webkit_dom_html_text_area_element_set_disabled :: ((Ptr HTMLTextAreaElement) -> (CInt -> (IO ())))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_disabled"
  webkit_dom_html_text_area_element_get_disabled :: ((Ptr HTMLTextAreaElement) -> (IO CInt))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_form"
  webkit_dom_html_text_area_element_get_form :: ((Ptr HTMLTextAreaElement) -> (IO (Ptr HTMLFormElement)))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_max_length"
  webkit_dom_html_text_area_element_set_max_length :: ((Ptr HTMLTextAreaElement) -> (CLong -> ((Ptr (Ptr ())) -> (IO ()))))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_max_length"
  webkit_dom_html_text_area_element_get_max_length :: ((Ptr HTMLTextAreaElement) -> (IO CLong))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_name"
  webkit_dom_html_text_area_element_set_name :: ((Ptr HTMLTextAreaElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_name"
  webkit_dom_html_text_area_element_get_name :: ((Ptr HTMLTextAreaElement) -> (IO (Ptr CChar)))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_placeholder"
  webkit_dom_html_text_area_element_set_placeholder :: ((Ptr HTMLTextAreaElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_placeholder"
  webkit_dom_html_text_area_element_get_placeholder :: ((Ptr HTMLTextAreaElement) -> (IO (Ptr CChar)))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_read_only"
  webkit_dom_html_text_area_element_set_read_only :: ((Ptr HTMLTextAreaElement) -> (CInt -> (IO ())))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_read_only"
  webkit_dom_html_text_area_element_get_read_only :: ((Ptr HTMLTextAreaElement) -> (IO CInt))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_required"
  webkit_dom_html_text_area_element_set_required :: ((Ptr HTMLTextAreaElement) -> (CInt -> (IO ())))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_required"
  webkit_dom_html_text_area_element_get_required :: ((Ptr HTMLTextAreaElement) -> (IO CInt))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_rows"
  webkit_dom_html_text_area_element_set_rows :: ((Ptr HTMLTextAreaElement) -> (CLong -> (IO ())))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_rows"
  webkit_dom_html_text_area_element_get_rows :: ((Ptr HTMLTextAreaElement) -> (IO CLong))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_wrap"
  webkit_dom_html_text_area_element_set_wrap :: ((Ptr HTMLTextAreaElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_wrap"
  webkit_dom_html_text_area_element_get_wrap :: ((Ptr HTMLTextAreaElement) -> (IO (Ptr CChar)))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_default_value"
  webkit_dom_html_text_area_element_set_default_value :: ((Ptr HTMLTextAreaElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_default_value"
  webkit_dom_html_text_area_element_get_default_value :: ((Ptr HTMLTextAreaElement) -> (IO (Ptr CChar)))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_value"
  webkit_dom_html_text_area_element_set_value :: ((Ptr HTMLTextAreaElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_value"
  webkit_dom_html_text_area_element_get_value :: ((Ptr HTMLTextAreaElement) -> (IO (Ptr CChar)))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_text_length"
  webkit_dom_html_text_area_element_get_text_length :: ((Ptr HTMLTextAreaElement) -> (IO CULong))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_will_validate"
  webkit_dom_html_text_area_element_get_will_validate :: ((Ptr HTMLTextAreaElement) -> (IO CInt))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_validity"
  webkit_dom_html_text_area_element_get_validity :: ((Ptr HTMLTextAreaElement) -> (IO (Ptr ValidityState)))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_validation_message"
  webkit_dom_html_text_area_element_get_validation_message :: ((Ptr HTMLTextAreaElement) -> (IO (Ptr CChar)))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_labels"
  webkit_dom_html_text_area_element_get_labels :: ((Ptr HTMLTextAreaElement) -> (IO (Ptr NodeList)))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_selection_start"
  webkit_dom_html_text_area_element_set_selection_start :: ((Ptr HTMLTextAreaElement) -> (CLong -> (IO ())))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_selection_start"
  webkit_dom_html_text_area_element_get_selection_start :: ((Ptr HTMLTextAreaElement) -> (IO CLong))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_selection_end"
  webkit_dom_html_text_area_element_set_selection_end :: ((Ptr HTMLTextAreaElement) -> (CLong -> (IO ())))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_selection_end"
  webkit_dom_html_text_area_element_get_selection_end :: ((Ptr HTMLTextAreaElement) -> (IO CLong))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_set_selection_direction"
  webkit_dom_html_text_area_element_set_selection_direction :: ((Ptr HTMLTextAreaElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/HTMLTextAreaElement.h webkit_dom_html_text_area_element_get_selection_direction"
  webkit_dom_html_text_area_element_get_selection_direction :: ((Ptr HTMLTextAreaElement) -> (IO (Ptr CChar)))