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

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

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

-- | <http://library.gnome.org/devel/glib/stable/glib-Warnings-and-Assertions.html>

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

foreign import ccall "g_set_print_handler" c'g_set_print_handler
  :: Ptr C'GPrintFunc -> IO C'GPrintFunc
foreign import ccall "&g_set_print_handler" p'g_set_print_handler
  :: FunPtr (Ptr C'GPrintFunc -> IO C'GPrintFunc)

{-# LINE 11 "src/Bindings/GLib/CoreApplicationSupport/MessageOutputAndDebuggingFunctions.hsc" #-}

type C'GPrintFunc = FunPtr (Ptr C'gchar -> IO ())
foreign import ccall "wrapper" mk'GPrintFunc
  :: (Ptr C'gchar -> IO ()) -> IO C'GPrintFunc
foreign import ccall "dynamic" mK'GPrintFunc
  :: C'GPrintFunc -> (Ptr C'gchar -> IO ())

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

foreign import ccall "g_set_printerr_handler" c'g_set_printerr_handler
  :: C'GPrintFunc -> IO C'GPrintFunc
foreign import ccall "&g_set_printerr_handler" p'g_set_printerr_handler
  :: FunPtr (C'GPrintFunc -> IO C'GPrintFunc)

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

foreign import ccall "g_on_error_query" c'g_on_error_query
  :: Ptr C'gchar -> IO ()
foreign import ccall "&g_on_error_query" p'g_on_error_query
  :: FunPtr (Ptr C'gchar -> IO ())

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

{-# LINE 18 "src/Bindings/GLib/CoreApplicationSupport/MessageOutputAndDebuggingFunctions.hsc" #-}