module GI.WebKit2.Functions
(
downloadErrorQuark ,
faviconDatabaseErrorQuark ,
getMajorVersion ,
getMicroVersion ,
getMinorVersion ,
javascriptErrorQuark ,
networkErrorQuark ,
pluginErrorQuark ,
policyErrorQuark ,
printErrorQuark ,
snapshotErrorQuark ,
userMediaPermissionIsForAudioDevice ,
userMediaPermissionIsForVideoDevice ,
) where
import Prelude ()
import Data.GI.Base.ShortPrelude
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import GI.WebKit2.Types
import GI.WebKit2.Callbacks
foreign import ccall "webkit_user_media_permission_is_for_video_device" webkit_user_media_permission_is_for_video_device ::
Ptr UserMediaPermissionRequest ->
IO CInt
userMediaPermissionIsForVideoDevice ::
(MonadIO m, UserMediaPermissionRequestK a) =>
a ->
m Bool
userMediaPermissionIsForVideoDevice request = liftIO $ do
let request' = unsafeManagedPtrCastPtr request
result <- webkit_user_media_permission_is_for_video_device request'
let result' = (/= 0) result
touchManagedPtr request
return result'
foreign import ccall "webkit_user_media_permission_is_for_audio_device" webkit_user_media_permission_is_for_audio_device ::
Ptr UserMediaPermissionRequest ->
IO CInt
userMediaPermissionIsForAudioDevice ::
(MonadIO m, UserMediaPermissionRequestK a) =>
a ->
m Bool
userMediaPermissionIsForAudioDevice request = liftIO $ do
let request' = unsafeManagedPtrCastPtr request
result <- webkit_user_media_permission_is_for_audio_device request'
let result' = (/= 0) result
touchManagedPtr request
return result'
foreign import ccall "webkit_snapshot_error_quark" webkit_snapshot_error_quark ::
IO Word32
snapshotErrorQuark ::
(MonadIO m) =>
m Word32
snapshotErrorQuark = liftIO $ do
result <- webkit_snapshot_error_quark
return result
foreign import ccall "webkit_print_error_quark" webkit_print_error_quark ::
IO Word32
printErrorQuark ::
(MonadIO m) =>
m Word32
printErrorQuark = liftIO $ do
result <- webkit_print_error_quark
return result
foreign import ccall "webkit_policy_error_quark" webkit_policy_error_quark ::
IO Word32
policyErrorQuark ::
(MonadIO m) =>
m Word32
policyErrorQuark = liftIO $ do
result <- webkit_policy_error_quark
return result
foreign import ccall "webkit_plugin_error_quark" webkit_plugin_error_quark ::
IO Word32
pluginErrorQuark ::
(MonadIO m) =>
m Word32
pluginErrorQuark = liftIO $ do
result <- webkit_plugin_error_quark
return result
foreign import ccall "webkit_network_error_quark" webkit_network_error_quark ::
IO Word32
networkErrorQuark ::
(MonadIO m) =>
m Word32
networkErrorQuark = liftIO $ do
result <- webkit_network_error_quark
return result
foreign import ccall "webkit_javascript_error_quark" webkit_javascript_error_quark ::
IO Word32
javascriptErrorQuark ::
(MonadIO m) =>
m Word32
javascriptErrorQuark = liftIO $ do
result <- webkit_javascript_error_quark
return result
foreign import ccall "webkit_get_minor_version" webkit_get_minor_version ::
IO Word32
getMinorVersion ::
(MonadIO m) =>
m Word32
getMinorVersion = liftIO $ do
result <- webkit_get_minor_version
return result
foreign import ccall "webkit_get_micro_version" webkit_get_micro_version ::
IO Word32
getMicroVersion ::
(MonadIO m) =>
m Word32
getMicroVersion = liftIO $ do
result <- webkit_get_micro_version
return result
foreign import ccall "webkit_get_major_version" webkit_get_major_version ::
IO Word32
getMajorVersion ::
(MonadIO m) =>
m Word32
getMajorVersion = liftIO $ do
result <- webkit_get_major_version
return result
foreign import ccall "webkit_favicon_database_error_quark" webkit_favicon_database_error_quark ::
IO Word32
faviconDatabaseErrorQuark ::
(MonadIO m) =>
m Word32
faviconDatabaseErrorQuark = liftIO $ do
result <- webkit_favicon_database_error_quark
return result
foreign import ccall "webkit_download_error_quark" webkit_download_error_quark ::
IO Word32
downloadErrorQuark ::
(MonadIO m) =>
m Word32
downloadErrorQuark = liftIO $ do
result <- webkit_download_error_quark
return result