-- 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/HTMLMediaElement.chs" #-}
module Graphics.UI.Gtk.WebKit.DOM.HTMLMediaElement
       (htmlMediaElementLoad, htmlMediaElementCanPlayType,
        htmlMediaElementPlay, htmlMediaElementPause, cNETWORK_EMPTY,
        cNETWORK_IDLE, cNETWORK_LOADING, cNETWORK_NO_SOURCE, cHAVE_NOTHING,
        cHAVE_METADATA, cHAVE_CURRENT_DATA, cHAVE_FUTURE_DATA,
        cHAVE_ENOUGH_DATA, htmlMediaElementGetError,
        htmlMediaElementSetSrc, htmlMediaElementGetSrc,
        htmlMediaElementGetCurrentSrc, htmlMediaElementGetNetworkState,
        htmlMediaElementSetPreload, htmlMediaElementGetPreload,
        htmlMediaElementGetBuffered, htmlMediaElementGetReadyState,
        htmlMediaElementGetSeeking, htmlMediaElementSetCurrentTime,
        htmlMediaElementGetCurrentTime, htmlMediaElementGetInitialTime,
        htmlMediaElementGetStartTime, htmlMediaElementGetDuration,
        htmlMediaElementGetPaused, htmlMediaElementSetDefaultPlaybackRate,
        htmlMediaElementGetDefaultPlaybackRate,
        htmlMediaElementSetPlaybackRate, htmlMediaElementGetPlaybackRate,
        htmlMediaElementGetPlayed, htmlMediaElementGetSeekable,
        htmlMediaElementGetEnded, htmlMediaElementSetAutoplay,
        htmlMediaElementGetAutoplay, htmlMediaElementSetLoop,
        htmlMediaElementGetLoop, htmlMediaElementSetControls,
        htmlMediaElementGetControls, htmlMediaElementSetVolume,
        htmlMediaElementGetVolume, htmlMediaElementSetMuted,
        htmlMediaElementGetMuted, htmlMediaElementSetDefaultMuted,
        htmlMediaElementGetDefaultMuted,
        htmlMediaElementSetWebkitPreservesPitch,
        htmlMediaElementGetWebkitPreservesPitch,
        htmlMediaElementGetWebkitHasClosedCaptions,
        htmlMediaElementSetWebkitClosedCaptionsVisible,
        htmlMediaElementGetWebkitClosedCaptionsVisible,
        htmlMediaElementGetWebkitAudioDecodedByteCount,
        htmlMediaElementGetWebkitVideoDecodedByteCount,
        htmlMediaElementSetMediaGroup, htmlMediaElementGetMediaGroup)
       where
import System.Glib.FFI
import System.Glib.UTFString
import Control.Applicative
import Graphics.UI.Gtk.WebKit.Types
{-# LINE 37 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
import System.Glib.GError
import Graphics.UI.Gtk.WebKit.DOM.EventM

htmlMediaElementLoad ::
                     (HTMLMediaElementClass self) => self -> IO ()
htmlMediaElementLoad self
  = propagateGError $
      \ errorPtr_ ->
        (\(HTMLMediaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_load argPtr1 arg2)
{-# LINE 50 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
          (toHTMLMediaElement self)
          errorPtr_

htmlMediaElementCanPlayType ::
                            (HTMLMediaElementClass self) => self -> String -> IO String
htmlMediaElementCanPlayType self type'
  = (withUTFString type' $
       \ typePtr ->
         (\(HTMLMediaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_can_play_type argPtr1 arg2)
{-# LINE 60 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
           (toHTMLMediaElement self)
           typePtr)
      >>=
      readUTFString

htmlMediaElementPlay ::
                     (HTMLMediaElementClass self) => self -> IO ()
htmlMediaElementPlay self
  = (\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_play argPtr1)
{-# LINE 69 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
      (toHTMLMediaElement self)

htmlMediaElementPause ::
                      (HTMLMediaElementClass self) => self -> IO ()
htmlMediaElementPause self
  = (\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_pause argPtr1)
{-# LINE 75 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
      (toHTMLMediaElement self)
cNETWORK_EMPTY = 0
cNETWORK_IDLE = 1
cNETWORK_LOADING = 2
cNETWORK_NO_SOURCE = 3
cHAVE_NOTHING = 0
cHAVE_METADATA = 1
cHAVE_CURRENT_DATA = 2
cHAVE_FUTURE_DATA = 3
cHAVE_ENOUGH_DATA = 4

htmlMediaElementGetError ::
                         (HTMLMediaElementClass self) => self -> IO (Maybe MediaError)
htmlMediaElementGetError self
  = maybeNull (makeNewGObject mkMediaError)
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_error argPtr1)
{-# LINE 91 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementSetSrc ::
                       (HTMLMediaElementClass self) => self -> String -> IO ()
htmlMediaElementSetSrc self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLMediaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_set_src argPtr1 arg2)
{-# LINE 99 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
          (toHTMLMediaElement self)
          valPtr

htmlMediaElementGetSrc ::
                       (HTMLMediaElementClass self) => self -> IO String
htmlMediaElementGetSrc self
  = ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_src argPtr1)
{-# LINE 106 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
       (toHTMLMediaElement self))
      >>=
      readUTFString

htmlMediaElementGetCurrentSrc ::
                              (HTMLMediaElementClass self) => self -> IO String
htmlMediaElementGetCurrentSrc self
  = ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_current_src argPtr1)
{-# LINE 114 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
       (toHTMLMediaElement self))
      >>=
      readUTFString

htmlMediaElementGetNetworkState ::
                                (HTMLMediaElementClass self) => self -> IO Word
htmlMediaElementGetNetworkState self
  = fromIntegral <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_network_state argPtr1)
{-# LINE 123 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementSetPreload ::
                           (HTMLMediaElementClass self) => self -> String -> IO ()
htmlMediaElementSetPreload self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLMediaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_set_preload argPtr1 arg2)
{-# LINE 131 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
          (toHTMLMediaElement self)
          valPtr

htmlMediaElementGetPreload ::
                           (HTMLMediaElementClass self) => self -> IO String
htmlMediaElementGetPreload self
  = ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_preload argPtr1)
{-# LINE 138 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
       (toHTMLMediaElement self))
      >>=
      readUTFString

htmlMediaElementGetBuffered ::
                            (HTMLMediaElementClass self) => self -> IO (Maybe TimeRanges)
htmlMediaElementGetBuffered self
  = maybeNull (makeNewGObject mkTimeRanges)
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_buffered argPtr1)
{-# LINE 147 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementGetReadyState ::
                              (HTMLMediaElementClass self) => self -> IO Word
htmlMediaElementGetReadyState self
  = fromIntegral <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_ready_state argPtr1)
{-# LINE 154 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementGetSeeking ::
                           (HTMLMediaElementClass self) => self -> IO Bool
htmlMediaElementGetSeeking self
  = toBool <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_seeking argPtr1)
{-# LINE 161 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementSetCurrentTime ::
                               (HTMLMediaElementClass self) => self -> Float -> IO ()
htmlMediaElementSetCurrentTime self val
  = propagateGError $
      \ errorPtr_ ->
        (\(HTMLMediaElement arg1) arg2 arg3 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_set_current_time argPtr1 arg2 arg3)
{-# LINE 169 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
          (toHTMLMediaElement self)
          (realToFrac val)
          errorPtr_

htmlMediaElementGetCurrentTime ::
                               (HTMLMediaElementClass self) => self -> IO Float
htmlMediaElementGetCurrentTime self
  = realToFrac <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_current_time argPtr1)
{-# LINE 178 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementGetInitialTime ::
                               (HTMLMediaElementClass self) => self -> IO Double
htmlMediaElementGetInitialTime self
  = realToFrac <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_initial_time argPtr1)
{-# LINE 185 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementGetStartTime ::
                             (HTMLMediaElementClass self) => self -> IO Float
htmlMediaElementGetStartTime self
  = realToFrac <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_start_time argPtr1)
{-# LINE 192 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementGetDuration ::
                            (HTMLMediaElementClass self) => self -> IO Float
htmlMediaElementGetDuration self
  = realToFrac <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_duration argPtr1)
{-# LINE 199 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementGetPaused ::
                          (HTMLMediaElementClass self) => self -> IO Bool
htmlMediaElementGetPaused self
  = toBool <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_paused argPtr1)
{-# LINE 206 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementSetDefaultPlaybackRate ::
                                       (HTMLMediaElementClass self) => self -> Float -> IO ()
htmlMediaElementSetDefaultPlaybackRate self val
  = (\(HTMLMediaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_set_default_playback_rate argPtr1 arg2)
{-# LINE 213 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
      (toHTMLMediaElement self)
      (realToFrac val)

htmlMediaElementGetDefaultPlaybackRate ::
                                       (HTMLMediaElementClass self) => self -> IO Float
htmlMediaElementGetDefaultPlaybackRate self
  = realToFrac <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_default_playback_rate argPtr1)
{-# LINE 221 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementSetPlaybackRate ::
                                (HTMLMediaElementClass self) => self -> Float -> IO ()
htmlMediaElementSetPlaybackRate self val
  = (\(HTMLMediaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_set_playback_rate argPtr1 arg2)
{-# LINE 227 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
      (toHTMLMediaElement self)
      (realToFrac val)

htmlMediaElementGetPlaybackRate ::
                                (HTMLMediaElementClass self) => self -> IO Float
htmlMediaElementGetPlaybackRate self
  = realToFrac <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_playback_rate argPtr1)
{-# LINE 235 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementGetPlayed ::
                          (HTMLMediaElementClass self) => self -> IO (Maybe TimeRanges)
htmlMediaElementGetPlayed self
  = maybeNull (makeNewGObject mkTimeRanges)
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_played argPtr1)
{-# LINE 242 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementGetSeekable ::
                            (HTMLMediaElementClass self) => self -> IO (Maybe TimeRanges)
htmlMediaElementGetSeekable self
  = maybeNull (makeNewGObject mkTimeRanges)
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_seekable argPtr1)
{-# LINE 249 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementGetEnded ::
                         (HTMLMediaElementClass self) => self -> IO Bool
htmlMediaElementGetEnded self
  = toBool <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_ended argPtr1)
{-# LINE 256 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementSetAutoplay ::
                            (HTMLMediaElementClass self) => self -> Bool -> IO ()
htmlMediaElementSetAutoplay self val
  = (\(HTMLMediaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_set_autoplay argPtr1 arg2)
{-# LINE 262 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
      (toHTMLMediaElement self)
      (fromBool val)

htmlMediaElementGetAutoplay ::
                            (HTMLMediaElementClass self) => self -> IO Bool
htmlMediaElementGetAutoplay self
  = toBool <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_autoplay argPtr1)
{-# LINE 270 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementSetLoop ::
                        (HTMLMediaElementClass self) => self -> Bool -> IO ()
htmlMediaElementSetLoop self val
  = (\(HTMLMediaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_set_loop argPtr1 arg2)
{-# LINE 276 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
      (toHTMLMediaElement self)
      (fromBool val)

htmlMediaElementGetLoop ::
                        (HTMLMediaElementClass self) => self -> IO Bool
htmlMediaElementGetLoop self
  = toBool <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_loop argPtr1)
{-# LINE 284 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementSetControls ::
                            (HTMLMediaElementClass self) => self -> Bool -> IO ()
htmlMediaElementSetControls self val
  = (\(HTMLMediaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_set_controls argPtr1 arg2)
{-# LINE 290 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
      (toHTMLMediaElement self)
      (fromBool val)

htmlMediaElementGetControls ::
                            (HTMLMediaElementClass self) => self -> IO Bool
htmlMediaElementGetControls self
  = toBool <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_controls argPtr1)
{-# LINE 298 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementSetVolume ::
                          (HTMLMediaElementClass self) => self -> Float -> IO ()
htmlMediaElementSetVolume self val
  = propagateGError $
      \ errorPtr_ ->
        (\(HTMLMediaElement arg1) arg2 arg3 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_set_volume argPtr1 arg2 arg3)
{-# LINE 306 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
          (toHTMLMediaElement self)
          (realToFrac val)
          errorPtr_

htmlMediaElementGetVolume ::
                          (HTMLMediaElementClass self) => self -> IO Float
htmlMediaElementGetVolume self
  = realToFrac <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_volume argPtr1)
{-# LINE 315 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementSetMuted ::
                         (HTMLMediaElementClass self) => self -> Bool -> IO ()
htmlMediaElementSetMuted self val
  = (\(HTMLMediaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_set_muted argPtr1 arg2)
{-# LINE 321 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
      (toHTMLMediaElement self)
      (fromBool val)

htmlMediaElementGetMuted ::
                         (HTMLMediaElementClass self) => self -> IO Bool
htmlMediaElementGetMuted self
  = toBool <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_muted argPtr1)
{-# LINE 329 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementSetDefaultMuted ::
                                (HTMLMediaElementClass self) => self -> Bool -> IO ()
htmlMediaElementSetDefaultMuted self val
  = (\(HTMLMediaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_set_default_muted argPtr1 arg2)
{-# LINE 335 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
      (toHTMLMediaElement self)
      (fromBool val)

htmlMediaElementGetDefaultMuted ::
                                (HTMLMediaElementClass self) => self -> IO Bool
htmlMediaElementGetDefaultMuted self
  = toBool <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_default_muted argPtr1)
{-# LINE 343 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementSetWebkitPreservesPitch ::
                                        (HTMLMediaElementClass self) => self -> Bool -> IO ()
htmlMediaElementSetWebkitPreservesPitch self val
  = (\(HTMLMediaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_set_webkit_preserves_pitch argPtr1 arg2)
{-# LINE 350 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
      (toHTMLMediaElement self)
      (fromBool val)

htmlMediaElementGetWebkitPreservesPitch ::
                                        (HTMLMediaElementClass self) => self -> IO Bool
htmlMediaElementGetWebkitPreservesPitch self
  = toBool <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_webkit_preserves_pitch argPtr1)
{-# LINE 359 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementGetWebkitHasClosedCaptions ::
                                           (HTMLMediaElementClass self) => self -> IO Bool
htmlMediaElementGetWebkitHasClosedCaptions self
  = toBool <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_webkit_has_closed_captions argPtr1)
{-# LINE 368 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementSetWebkitClosedCaptionsVisible ::
                                               (HTMLMediaElementClass self) => self -> Bool -> IO ()
htmlMediaElementSetWebkitClosedCaptionsVisible self val
  = (\(HTMLMediaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_set_webkit_closed_captions_visible argPtr1 arg2)
{-# LINE 376 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
      (toHTMLMediaElement self)
      (fromBool val)

htmlMediaElementGetWebkitClosedCaptionsVisible ::
                                               (HTMLMediaElementClass self) => self -> IO Bool
htmlMediaElementGetWebkitClosedCaptionsVisible self
  = toBool <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_webkit_closed_captions_visible argPtr1)
{-# LINE 386 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementGetWebkitAudioDecodedByteCount ::
                                               (HTMLMediaElementClass self) => self -> IO Word
htmlMediaElementGetWebkitAudioDecodedByteCount self
  = fromIntegral <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_webkit_audio_decoded_byte_count argPtr1)
{-# LINE 395 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementGetWebkitVideoDecodedByteCount ::
                                               (HTMLMediaElementClass self) => self -> IO Word
htmlMediaElementGetWebkitVideoDecodedByteCount self
  = fromIntegral <$>
      ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_webkit_video_decoded_byte_count argPtr1)
{-# LINE 404 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
         (toHTMLMediaElement self))

htmlMediaElementSetMediaGroup ::
                              (HTMLMediaElementClass self) => self -> String -> IO ()
htmlMediaElementSetMediaGroup self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLMediaElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_set_media_group argPtr1 arg2)
{-# LINE 412 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
          (toHTMLMediaElement self)
          valPtr

htmlMediaElementGetMediaGroup ::
                              (HTMLMediaElementClass self) => self -> IO String
htmlMediaElementGetMediaGroup self
  = ((\(HTMLMediaElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_media_element_get_media_group argPtr1)
{-# LINE 419 "./Graphics/UI/Gtk/WebKit/DOM/HTMLMediaElement.chs" #-}
       (toHTMLMediaElement self))
      >>=
      readUTFString

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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