module Bindings.GLib.DataTypes.PointerArrays 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
import Bindings.GLib.Fundamentals
import Bindings.GLib.DataTypes.Datasets
import Bindings.GLib.DataTypes.DoublyLinkedLists
data C'GPtrArray = C'GPtrArray{
c'GPtrArray'pdata :: Ptr C'gpointer
,
c'GPtrArray'len :: C'guint
} deriving (Eq,Show)
instance Storable C'GPtrArray where
sizeOf _ = 8
alignment = sizeOf
peek p = do
v0 <- peekByteOff p 0
v1 <- peekByteOff p 4
return $ C'GPtrArray v0 v1
poke p (C'GPtrArray v0 v1) = do
pokeByteOff p 0 v0
pokeByteOff p 4 v1
return ()
foreign import ccall "g_ptr_array_new" c'g_ptr_array_new
:: IO (Ptr C'GPtrArray)
foreign import ccall "&g_ptr_array_new" p'g_ptr_array_new
:: FunPtr (IO (Ptr C'GPtrArray))
foreign import ccall "g_ptr_array_sized_new" c'g_ptr_array_sized_new
:: C'guint -> IO (Ptr C'GPtrArray)
foreign import ccall "&g_ptr_array_sized_new" p'g_ptr_array_sized_new
:: FunPtr (C'guint -> IO (Ptr C'GPtrArray))
foreign import ccall "g_ptr_array_new_with_free_func" c'g_ptr_array_new_with_free_func
:: C'GDestroyNotify -> IO (Ptr C'GPtrArray)
foreign import ccall "&g_ptr_array_new_with_free_func" p'g_ptr_array_new_with_free_func
:: FunPtr (C'GDestroyNotify -> IO (Ptr C'GPtrArray))
foreign import ccall "g_ptr_array_set_free_func" c'g_ptr_array_set_free_func
:: Ptr C'GPtrArray -> C'GDestroyNotify -> IO ()
foreign import ccall "&g_ptr_array_set_free_func" p'g_ptr_array_set_free_func
:: FunPtr (Ptr C'GPtrArray -> C'GDestroyNotify -> IO ())
foreign import ccall "g_ptr_array_ref" c'g_ptr_array_ref
:: Ptr C'GPtrArray -> IO (Ptr C'GPtrArray)
foreign import ccall "&g_ptr_array_ref" p'g_ptr_array_ref
:: FunPtr (Ptr C'GPtrArray -> IO (Ptr C'GPtrArray))
foreign import ccall "g_ptr_array_unref" c'g_ptr_array_unref
:: Ptr C'GPtrArray -> IO ()
foreign import ccall "&g_ptr_array_unref" p'g_ptr_array_unref
:: FunPtr (Ptr C'GPtrArray -> IO ())
foreign import ccall "g_ptr_array_add" c'g_ptr_array_add
:: Ptr C'GPtrArray -> C'gpointer -> IO ()
foreign import ccall "&g_ptr_array_add" p'g_ptr_array_add
:: FunPtr (Ptr C'GPtrArray -> C'gpointer -> IO ())
foreign import ccall "g_ptr_array_remove" c'g_ptr_array_remove
:: Ptr C'GPtrArray -> C'gpointer -> IO C'gboolean
foreign import ccall "&g_ptr_array_remove" p'g_ptr_array_remove
:: FunPtr (Ptr C'GPtrArray -> C'gpointer -> IO C'gboolean)
foreign import ccall "g_ptr_array_remove_index" c'g_ptr_array_remove_index
:: Ptr C'GPtrArray -> C'guint -> IO C'gpointer
foreign import ccall "&g_ptr_array_remove_index" p'g_ptr_array_remove_index
:: FunPtr (Ptr C'GPtrArray -> C'guint -> IO C'gpointer)
foreign import ccall "g_ptr_array_remove_fast" c'g_ptr_array_remove_fast
:: Ptr C'GPtrArray -> C'gpointer -> IO C'gboolean
foreign import ccall "&g_ptr_array_remove_fast" p'g_ptr_array_remove_fast
:: FunPtr (Ptr C'GPtrArray -> C'gpointer -> IO C'gboolean)
foreign import ccall "g_ptr_array_remove_index_fast" c'g_ptr_array_remove_index_fast
:: Ptr C'GPtrArray -> C'guint -> IO C'gpointer
foreign import ccall "&g_ptr_array_remove_index_fast" p'g_ptr_array_remove_index_fast
:: FunPtr (Ptr C'GPtrArray -> C'guint -> IO C'gpointer)
foreign import ccall "g_ptr_array_remove_range" c'g_ptr_array_remove_range
:: Ptr C'GPtrArray -> C'guint -> C'guint -> IO ()
foreign import ccall "&g_ptr_array_remove_range" p'g_ptr_array_remove_range
:: FunPtr (Ptr C'GPtrArray -> C'guint -> C'guint -> IO ())
foreign import ccall "g_ptr_array_sort" c'g_ptr_array_sort
:: Ptr C'GPtrArray -> C'GCompareFunc -> IO ()
foreign import ccall "&g_ptr_array_sort" p'g_ptr_array_sort
:: FunPtr (Ptr C'GPtrArray -> C'GCompareFunc -> IO ())
foreign import ccall "g_ptr_array_sort_with_data" c'g_ptr_array_sort_with_data
:: Ptr C'GPtrArray -> C'GCompareDataFunc -> C'gpointer -> IO ()
foreign import ccall "&g_ptr_array_sort_with_data" p'g_ptr_array_sort_with_data
:: FunPtr (Ptr C'GPtrArray -> C'GCompareDataFunc -> C'gpointer -> IO ())
foreign import ccall "g_ptr_array_set_size" c'g_ptr_array_set_size
:: Ptr C'GPtrArray -> C'gint -> IO ()
foreign import ccall "&g_ptr_array_set_size" p'g_ptr_array_set_size
:: FunPtr (Ptr C'GPtrArray -> C'gint -> IO ())
foreign import ccall "inline_g_ptr_array_index" c'g_ptr_array_index
:: Ptr C'GPtrArray -> C'guint -> IO C'gpointer
foreign import ccall "g_ptr_array_free" c'g_ptr_array_free
:: Ptr C'GPtrArray -> C'gboolean -> IO (Ptr C'gpointer)
foreign import ccall "&g_ptr_array_free" p'g_ptr_array_free
:: FunPtr (Ptr C'GPtrArray -> C'gboolean -> IO (Ptr C'gpointer))
foreign import ccall "g_ptr_array_foreach" c'g_ptr_array_foreach
:: Ptr C'GPtrArray -> C'GFunc -> C'gpointer -> IO ()
foreign import ccall "&g_ptr_array_foreach" p'g_ptr_array_foreach
:: FunPtr (Ptr C'GPtrArray -> C'GFunc -> C'gpointer -> IO ())