webkitgtk3-0.12.5: Graphics/UI/Gtk/WebKit/DOM/DOMStringList.chs

module Graphics.UI.Gtk.WebKit.DOM.DOMStringList
       (domStringListItem, domStringListContains, domStringListGetLength)
       where
import System.Glib.FFI
import System.Glib.UTFString
import Control.Applicative
{#import Graphics.UI.Gtk.WebKit.Types#}
import System.Glib.GError
import Graphics.UI.Gtk.WebKit.DOM.EventM
 
domStringListItem ::
                  (DOMStringListClass self) => self -> Word -> IO String
domStringListItem self index
  = ({# call webkit_dom_dom_string_list_item #}
       (toDOMStringList self)
       (fromIntegral index))
      >>=
      readUTFString
 
domStringListContains ::
                      (DOMStringListClass self) => self -> String -> IO Bool
domStringListContains self string
  = toBool <$>
      (withUTFString string $
         \ stringPtr ->
           {# call webkit_dom_dom_string_list_contains #}
             (toDOMStringList self)
             stringPtr)
 
domStringListGetLength ::
                       (DOMStringListClass self) => self -> IO Word
domStringListGetLength self
  = fromIntegral <$>
      ({# call webkit_dom_dom_string_list_get_length #}
         (toDOMStringList self))