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

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

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

-- | <http://library.gnome.org/devel/glib/stable/glib-Error-Reporting.html>

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

data C'GError = C'GError{
{-# LINE 12 "src/Bindings/GLib/CoreApplicationSupport/ErrorReporting.hsc" #-}

  c'GError'domain :: C'GQuark
{-# LINE 13 "src/Bindings/GLib/CoreApplicationSupport/ErrorReporting.hsc" #-}
,
  c'GError'code :: C'gint
{-# LINE 14 "src/Bindings/GLib/CoreApplicationSupport/ErrorReporting.hsc" #-}
,
  c'GError'message :: Ptr C'gchar
{-# LINE 15 "src/Bindings/GLib/CoreApplicationSupport/ErrorReporting.hsc" #-}

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

{-# LINE 16 "src/Bindings/GLib/CoreApplicationSupport/ErrorReporting.hsc" #-}

foreign import ccall "g_error_new_literal" c'g_error_new_literal
  :: C'GQuark -> C'gint -> Ptr C'gchar -> IO (Ptr C'GError)
foreign import ccall "&g_error_new_literal" p'g_error_new_literal
  :: FunPtr (C'GQuark -> C'gint -> Ptr C'gchar -> IO (Ptr C'GError))

{-# LINE 18 "src/Bindings/GLib/CoreApplicationSupport/ErrorReporting.hsc" #-}
foreign import ccall "g_error_free" c'g_error_free
  :: Ptr C'GError -> IO ()
foreign import ccall "&g_error_free" p'g_error_free
  :: FunPtr (Ptr C'GError -> IO ())

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

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

{-# LINE 21 "src/Bindings/GLib/CoreApplicationSupport/ErrorReporting.hsc" #-}
foreign import ccall "g_set_error_literal" c'g_set_error_literal
  :: Ptr (Ptr C'GError) -> C'GQuark -> C'gint -> Ptr C'gchar -> IO ()
foreign import ccall "&g_set_error_literal" p'g_set_error_literal
  :: FunPtr (Ptr (Ptr C'GError) -> C'GQuark -> C'gint -> Ptr C'gchar -> IO ())

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

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

{-# LINE 24 "src/Bindings/GLib/CoreApplicationSupport/ErrorReporting.hsc" #-}