{-# LINE 1 "src/Bindings/GObject/GTypeModule.hsc" #-}

{-# LINE 2 "src/Bindings/GObject/GTypeModule.hsc" #-}

{-# LINE 3 "src/Bindings/GObject/GTypeModule.hsc" #-}

-- | <http://library.gnome.org/devel/gobject/stable/GTypeModule.html>

module Bindings.GObject.GTypeModule 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/GObject/GTypeModule.hsc" #-}
import Bindings.GLib.Fundamentals
import Bindings.GObject.BaseObjectType
import Bindings.GObject.EnumerationAndFlagTypes
import Bindings.GObject.TypeInformation

data C'GTypeModule = C'GTypeModule{
{-# LINE 14 "src/Bindings/GObject/GTypeModule.hsc" #-}

  c'GTypeModule'name :: Ptr C'gchar
{-# LINE 15 "src/Bindings/GObject/GTypeModule.hsc" #-}

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

{-# LINE 16 "src/Bindings/GObject/GTypeModule.hsc" #-}

data C'GTypeModuleClass = C'GTypeModuleClass{
{-# LINE 18 "src/Bindings/GObject/GTypeModule.hsc" #-}

  c'GTypeModuleClass'parent_class :: C'GObjectClass
{-# LINE 19 "src/Bindings/GObject/GTypeModule.hsc" #-}
,
  c'GTypeModuleClass'load :: FunPtr (Ptr C'GTypeModule -> IO C'gboolean)
{-# LINE 20 "src/Bindings/GObject/GTypeModule.hsc" #-}
,
  c'GTypeModuleClass'unload :: FunPtr (Ptr C'GTypeModule -> IO ())
{-# LINE 21 "src/Bindings/GObject/GTypeModule.hsc" #-}

 } deriving (Eq,Show)
instance Storable C'GTypeModuleClass where
  sizeOf _ = 92
  alignment = sizeOf
  peek p = do
    v0 <- peekByteOff p 0
    v1 <- peekByteOff p 68
    v2 <- peekByteOff p 72
    return $ C'GTypeModuleClass v0 v1 v2
  poke p (C'GTypeModuleClass v0 v1 v2) = do
    pokeByteOff p 0 v0
    pokeByteOff p 68 v1
    pokeByteOff p 72 v2
    return ()

{-# LINE 22 "src/Bindings/GObject/GTypeModule.hsc" #-}

foreign import ccall "g_type_module_use" c'g_type_module_use
  :: Ptr C'GTypeModule -> IO C'gboolean
foreign import ccall "&g_type_module_use" p'g_type_module_use
  :: FunPtr (Ptr C'GTypeModule -> IO C'gboolean)

{-# LINE 24 "src/Bindings/GObject/GTypeModule.hsc" #-}
foreign import ccall "g_type_module_unuse" c'g_type_module_unuse
  :: Ptr C'GTypeModule -> IO ()
foreign import ccall "&g_type_module_unuse" p'g_type_module_unuse
  :: FunPtr (Ptr C'GTypeModule -> IO ())

{-# LINE 25 "src/Bindings/GObject/GTypeModule.hsc" #-}
foreign import ccall "g_type_module_set_name" c'g_type_module_set_name
  :: Ptr C'GTypeModule -> Ptr C'gchar -> IO ()
foreign import ccall "&g_type_module_set_name" p'g_type_module_set_name
  :: FunPtr (Ptr C'GTypeModule -> Ptr C'gchar -> IO ())

{-# LINE 26 "src/Bindings/GObject/GTypeModule.hsc" #-}
foreign import ccall "g_type_module_register_type" c'g_type_module_register_type
  :: Ptr C'GTypeModule -> C'GType -> Ptr C'gchar -> Ptr C'GTypeInfo -> C'GTypeFlags -> IO C'GType
foreign import ccall "&g_type_module_register_type" p'g_type_module_register_type
  :: FunPtr (Ptr C'GTypeModule -> C'GType -> Ptr C'gchar -> Ptr C'GTypeInfo -> C'GTypeFlags -> IO C'GType)

{-# LINE 27 "src/Bindings/GObject/GTypeModule.hsc" #-}
foreign import ccall "g_type_module_add_interface" c'g_type_module_add_interface
  :: Ptr C'GTypeModule -> C'GType -> C'GType -> Ptr C'GInterfaceInfo -> IO ()
foreign import ccall "&g_type_module_add_interface" p'g_type_module_add_interface
  :: FunPtr (Ptr C'GTypeModule -> C'GType -> C'GType -> Ptr C'GInterfaceInfo -> IO ())

{-# LINE 28 "src/Bindings/GObject/GTypeModule.hsc" #-}
foreign import ccall "g_type_module_register_enum" c'g_type_module_register_enum
  :: Ptr C'GTypeModule -> Ptr C'gchar -> Ptr C'GEnumValue -> IO C'GType
foreign import ccall "&g_type_module_register_enum" p'g_type_module_register_enum
  :: FunPtr (Ptr C'GTypeModule -> Ptr C'gchar -> Ptr C'GEnumValue -> IO C'GType)

{-# LINE 29 "src/Bindings/GObject/GTypeModule.hsc" #-}
foreign import ccall "g_type_module_register_flags" c'g_type_module_register_flags
  :: Ptr C'GTypeModule -> Ptr C'gchar -> Ptr C'GFlagsValue -> IO C'GType
foreign import ccall "&g_type_module_register_flags" p'g_type_module_register_flags
  :: FunPtr (Ptr C'GTypeModule -> Ptr C'gchar -> Ptr C'GFlagsValue -> IO C'GType)

{-# LINE 30 "src/Bindings/GObject/GTypeModule.hsc" #-}