{-# LINE 1 "src/Bindings/GLib/DataTypes/TrashStacks.hsc" #-}

{-# LINE 2 "src/Bindings/GLib/DataTypes/TrashStacks.hsc" #-}

{-# LINE 3 "src/Bindings/GLib/DataTypes/TrashStacks.hsc" #-}

-- | <http://library.gnome.org/devel/glib/stable/glib-Trash-Stacks.html>

module Bindings.GLib.DataTypes.TrashStacks 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/DataTypes/TrashStacks.hsc" #-}
import Bindings.GLib.Fundamentals

data C'GTrashStack = C'GTrashStack{
{-# LINE 11 "src/Bindings/GLib/DataTypes/TrashStacks.hsc" #-}

  c'GTrashStack'next :: Ptr C'GTrashStack
{-# LINE 12 "src/Bindings/GLib/DataTypes/TrashStacks.hsc" #-}

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

{-# LINE 13 "src/Bindings/GLib/DataTypes/TrashStacks.hsc" #-}

foreign import ccall "g_trash_stack_push" c'g_trash_stack_push
  :: Ptr (Ptr C'GTrashStack) -> C'gpointer -> IO ()
foreign import ccall "&g_trash_stack_push" p'g_trash_stack_push
  :: FunPtr (Ptr (Ptr C'GTrashStack) -> C'gpointer -> IO ())

{-# LINE 15 "src/Bindings/GLib/DataTypes/TrashStacks.hsc" #-}
foreign import ccall "g_trash_stack_pop" c'g_trash_stack_pop
  :: Ptr (Ptr C'GTrashStack) -> IO C'gpointer
foreign import ccall "&g_trash_stack_pop" p'g_trash_stack_pop
  :: FunPtr (Ptr (Ptr C'GTrashStack) -> IO C'gpointer)

{-# LINE 16 "src/Bindings/GLib/DataTypes/TrashStacks.hsc" #-}
foreign import ccall "g_trash_stack_peek" c'g_trash_stack_peek
  :: Ptr (Ptr C'GTrashStack) -> IO C'gpointer
foreign import ccall "&g_trash_stack_peek" p'g_trash_stack_peek
  :: FunPtr (Ptr (Ptr C'GTrashStack) -> IO C'gpointer)

{-# LINE 17 "src/Bindings/GLib/DataTypes/TrashStacks.hsc" #-}
foreign import ccall "g_trash_stack_height" c'g_trash_stack_height
  :: Ptr (Ptr C'GTrashStack) -> IO C'guint
foreign import ccall "&g_trash_stack_height" p'g_trash_stack_height
  :: FunPtr (Ptr (Ptr C'GTrashStack) -> IO C'guint)

{-# LINE 18 "src/Bindings/GLib/DataTypes/TrashStacks.hsc" #-}