{-# LINE 1 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}

{-# LINE 2 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}

{-# LINE 3 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}

-- | <http://library.gnome.org/devel/glib/stable/glib-Thread-Pools.html>

module Bindings.GLib.CoreApplicationSupport.ThreadPools where
import Foreign.Ptr (Ptr,FunPtr,plusPtr)
import Foreign.Ptr (wordPtrToPtr,castPtrToFunPtr)
import Foreign.Storable
import Foreign.C.Types
import Foreign.C.String (CString,CStringLen,CWString,CWStringLen)
import Foreign.Marshal.Alloc (alloca)
import Foreign.Marshal.Array (peekArray,pokeArray)
import Data.Int
import Data.Word

{-# LINE 8 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}
import Bindings.GLib.Fundamentals
import Bindings.GLib.CoreApplicationSupport.ErrorReporting
import Bindings.GLib.DataTypes.DoublyLinkedLists

data C'GThreadPool = C'GThreadPool{
{-# LINE 13 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}

  c'GThreadPool'func :: C'GFunc
{-# LINE 14 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}
,
  c'GThreadPool'user_data :: C'gpointer
{-# LINE 15 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}
,
  c'GThreadPool'exclusive :: C'gboolean
{-# LINE 16 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}

 } deriving (Eq,Show)
instance Storable C'GThreadPool where
  sizeOf _ = 12
  alignment = sizeOf
  peek p = do
    v0 <- peekByteOff p 0
    v1 <- peekByteOff p 4
    v2 <- peekByteOff p 8
    return $ C'GThreadPool v0 v1 v2
  poke p (C'GThreadPool v0 v1 v2) = do
    pokeByteOff p 0 v0
    pokeByteOff p 4 v1
    pokeByteOff p 8 v2
    return ()

{-# LINE 17 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}

foreign import ccall "g_thread_pool_new" c'g_thread_pool_new
  :: C'GFunc -> C'gpointer -> C'gint -> C'gboolean -> Ptr (Ptr C'GError) -> IO (Ptr C'GThreadPool)
foreign import ccall "&g_thread_pool_new" p'g_thread_pool_new
  :: FunPtr (C'GFunc -> C'gpointer -> C'gint -> C'gboolean -> Ptr (Ptr C'GError) -> IO (Ptr C'GThreadPool))

{-# LINE 19 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}
foreign import ccall "g_thread_pool_push" c'g_thread_pool_push
  :: Ptr C'GThreadPool -> C'gpointer -> Ptr (Ptr C'GError) -> IO ()
foreign import ccall "&g_thread_pool_push" p'g_thread_pool_push
  :: FunPtr (Ptr C'GThreadPool -> C'gpointer -> Ptr (Ptr C'GError) -> IO ())

{-# LINE 20 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}
foreign import ccall "g_thread_pool_set_max_threads" c'g_thread_pool_set_max_threads
  :: Ptr C'GThreadPool -> C'gint -> Ptr (Ptr C'GError) -> IO ()
foreign import ccall "&g_thread_pool_set_max_threads" p'g_thread_pool_set_max_threads
  :: FunPtr (Ptr C'GThreadPool -> C'gint -> Ptr (Ptr C'GError) -> IO ())

{-# LINE 21 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}
foreign import ccall "g_thread_pool_get_max_threads" c'g_thread_pool_get_max_threads
  :: Ptr C'GThreadPool -> IO C'gint
foreign import ccall "&g_thread_pool_get_max_threads" p'g_thread_pool_get_max_threads
  :: FunPtr (Ptr C'GThreadPool -> IO C'gint)

{-# LINE 22 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}
foreign import ccall "g_thread_pool_get_num_threads" c'g_thread_pool_get_num_threads
  :: Ptr C'GThreadPool -> IO C'guint
foreign import ccall "&g_thread_pool_get_num_threads" p'g_thread_pool_get_num_threads
  :: FunPtr (Ptr C'GThreadPool -> IO C'guint)

{-# LINE 23 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}
foreign import ccall "g_thread_pool_unprocessed" c'g_thread_pool_unprocessed
  :: Ptr C'GThreadPool -> IO C'guint
foreign import ccall "&g_thread_pool_unprocessed" p'g_thread_pool_unprocessed
  :: FunPtr (Ptr C'GThreadPool -> IO C'guint)

{-# LINE 24 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}
foreign import ccall "g_thread_pool_free" c'g_thread_pool_free
  :: Ptr C'GThreadPool -> C'gboolean -> C'gboolean -> IO ()
foreign import ccall "&g_thread_pool_free" p'g_thread_pool_free
  :: FunPtr (Ptr C'GThreadPool -> C'gboolean -> C'gboolean -> IO ())

{-# LINE 25 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}
foreign import ccall "g_thread_pool_set_max_unused_threads" c'g_thread_pool_set_max_unused_threads
  :: C'gint -> IO ()
foreign import ccall "&g_thread_pool_set_max_unused_threads" p'g_thread_pool_set_max_unused_threads
  :: FunPtr (C'gint -> IO ())

{-# LINE 26 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}
foreign import ccall "g_thread_pool_get_max_unused_threads" c'g_thread_pool_get_max_unused_threads
  :: IO C'gint
foreign import ccall "&g_thread_pool_get_max_unused_threads" p'g_thread_pool_get_max_unused_threads
  :: FunPtr (IO C'gint)

{-# LINE 27 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}
foreign import ccall "g_thread_pool_get_num_unused_threads" c'g_thread_pool_get_num_unused_threads
  :: IO C'guint
foreign import ccall "&g_thread_pool_get_num_unused_threads" p'g_thread_pool_get_num_unused_threads
  :: FunPtr (IO C'guint)

{-# LINE 28 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}
foreign import ccall "g_thread_pool_stop_unused_threads" c'g_thread_pool_stop_unused_threads
  :: IO ()
foreign import ccall "&g_thread_pool_stop_unused_threads" p'g_thread_pool_stop_unused_threads
  :: FunPtr (IO ())

{-# LINE 29 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}
foreign import ccall "g_thread_pool_set_sort_function" c'g_thread_pool_set_sort_function
  :: Ptr C'GThreadPool -> C'GCompareDataFunc -> C'gpointer -> IO ()
foreign import ccall "&g_thread_pool_set_sort_function" p'g_thread_pool_set_sort_function
  :: FunPtr (Ptr C'GThreadPool -> C'GCompareDataFunc -> C'gpointer -> IO ())

{-# LINE 30 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}
foreign import ccall "g_thread_pool_set_max_idle_time" c'g_thread_pool_set_max_idle_time
  :: C'guint -> IO ()
foreign import ccall "&g_thread_pool_set_max_idle_time" p'g_thread_pool_set_max_idle_time
  :: FunPtr (C'guint -> IO ())

{-# LINE 31 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}
foreign import ccall "g_thread_pool_get_max_idle_time" c'g_thread_pool_get_max_idle_time
  :: IO C'guint
foreign import ccall "&g_thread_pool_get_max_idle_time" p'g_thread_pool_get_max_idle_time
  :: FunPtr (IO C'guint)

{-# LINE 32 "src/Bindings/GLib/CoreApplicationSupport/ThreadPools.hsc" #-}