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

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

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

-- | <http://library.gnome.org/devel/glib/stable/glib-Message-Logging.html>

module Bindings.GLib.CoreApplicationSupport.MessageLogging 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.Array (peekArray,pokeArray)
import Data.Int
import Data.Word

{-# LINE 8 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}
import Bindings.GLib.Fundamentals

c'G_LOG_DOMAIN = wordPtrToPtr 0
c'G_LOG_DOMAIN :: Ptr a

{-# LINE 11 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}
c'G_LOG_FATAL_MASK = 5
c'G_LOG_FATAL_MASK :: (Num a) => a

{-# LINE 12 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}
c'G_LOG_LEVEL_USER_SHIFT = 8
c'G_LOG_LEVEL_USER_SHIFT :: (Num a) => a

{-# LINE 13 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}

type C'GLogFunc = FunPtr (Ptr C'gchar -> C'GLogLevelFlags -> Ptr C'gchar -> C'gpointer -> IO ())
foreign import ccall "wrapper" mk'GLogFunc
  :: (Ptr C'gchar -> C'GLogLevelFlags -> Ptr C'gchar -> C'gpointer -> IO ()) -> IO C'GLogFunc

{-# LINE 15 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}

type C'GLogLevelFlags = CInt

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

c'G_LOG_FLAG_RECURSION = 1
c'G_LOG_FLAG_RECURSION :: (Num a) => a

{-# LINE 19 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}
c'G_LOG_FLAG_FATAL = 2
c'G_LOG_FLAG_FATAL :: (Num a) => a

{-# LINE 20 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}
c'G_LOG_LEVEL_ERROR = 4
c'G_LOG_LEVEL_ERROR :: (Num a) => a

{-# LINE 21 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}
c'G_LOG_LEVEL_CRITICAL = 8
c'G_LOG_LEVEL_CRITICAL :: (Num a) => a

{-# LINE 22 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}
c'G_LOG_LEVEL_WARNING = 16
c'G_LOG_LEVEL_WARNING :: (Num a) => a

{-# LINE 23 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}
c'G_LOG_LEVEL_MESSAGE = 32
c'G_LOG_LEVEL_MESSAGE :: (Num a) => a

{-# LINE 24 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}
c'G_LOG_LEVEL_INFO = 64
c'G_LOG_LEVEL_INFO :: (Num a) => a

{-# LINE 25 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}
c'G_LOG_LEVEL_DEBUG = 128
c'G_LOG_LEVEL_DEBUG :: (Num a) => a

{-# LINE 26 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}
c'G_LOG_LEVEL_MASK = -4
c'G_LOG_LEVEL_MASK :: (Num a) => a

{-# LINE 27 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}

foreign import ccall "g_log_set_handler" c'g_log_set_handler
  :: Ptr C'gchar -> C'GLogLevelFlags -> C'GLogFunc -> C'gpointer -> IO C'guint
foreign import ccall "&g_log_set_handler" p'g_log_set_handler
  :: FunPtr (Ptr C'gchar -> C'GLogLevelFlags -> C'GLogFunc -> C'gpointer -> IO C'guint)

{-# LINE 29 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}
foreign import ccall "g_log_remove_handler" c'g_log_remove_handler
  :: Ptr C'gchar -> C'guint -> IO ()
foreign import ccall "&g_log_remove_handler" p'g_log_remove_handler
  :: FunPtr (Ptr C'gchar -> C'guint -> IO ())

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

{-# LINE 31 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}
foreign import ccall "g_log_set_fatal_mask" c'g_log_set_fatal_mask
  :: Ptr C'gchar -> C'GLogLevelFlags -> IO C'GLogLevelFlags
foreign import ccall "&g_log_set_fatal_mask" p'g_log_set_fatal_mask
  :: FunPtr (Ptr C'gchar -> C'GLogLevelFlags -> IO C'GLogLevelFlags)

{-# LINE 32 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}
foreign import ccall "g_log_default_handler" c'g_log_default_handler
  :: Ptr C'gchar -> C'GLogLevelFlags -> Ptr C'gchar -> C'gpointer -> IO ()
foreign import ccall "&g_log_default_handler" p'g_log_default_handler
  :: FunPtr (Ptr C'gchar -> C'GLogLevelFlags -> Ptr C'gchar -> C'gpointer -> IO ())

{-# LINE 33 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}
foreign import ccall "g_log_set_default_handler" c'g_log_set_default_handler
  :: C'GLogFunc -> C'gpointer -> IO C'GLogFunc
foreign import ccall "&g_log_set_default_handler" p'g_log_set_default_handler
  :: FunPtr (C'GLogFunc -> C'gpointer -> IO C'GLogFunc)

{-# LINE 34 "src/Bindings/GLib/CoreApplicationSupport/MessageLogging.hsc" #-}