{-# LINE 1 "CV/Bindings/Error.hsc" #-}
{-# LANGUAGE ForeignFunctionInterface #-}
{-# LINE 2 "CV/Bindings/Error.hsc" #-}
module CV.Bindings.Error where

import Foreign.C.Types
import CV.Bindings.Types

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 "CV/Bindings/Error.hsc" #-}


{-# LINE 10 "CV/Bindings/Error.hsc" #-}

{-# LINE 11 "CV/Bindings/Error.hsc" #-}

{-# LINE 12 "CV/Bindings/Error.hsc" #-}

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

{-# LINE 14 "CV/Bindings/Error.hsc" #-}
foreign import ccall "cvRedirectError" c'cvRedirectError
  :: C'CvErrorCallback -> Ptr () -> Ptr (Ptr ()) -> IO ()
foreign import ccall "&cvRedirectError" p'cvRedirectError
  :: FunPtr (C'CvErrorCallback -> Ptr () -> Ptr (Ptr ()) -> IO ())

{-# LINE 15 "CV/Bindings/Error.hsc" #-}
foreign import ccall "cvSetErrMode" c'cvSetErrMode
  :: CInt -> IO CInt
foreign import ccall "&cvSetErrMode" p'cvSetErrMode
  :: FunPtr (CInt -> IO CInt)

{-# LINE 16 "CV/Bindings/Error.hsc" #-}

c'CV_ErrModeLeaf = 0
c'CV_ErrModeLeaf :: (Num a) => a

{-# LINE 18 "CV/Bindings/Error.hsc" #-}
c'CV_ErrModeParent = 1
c'CV_ErrModeParent :: (Num a) => a

{-# LINE 19 "CV/Bindings/Error.hsc" #-}
c'CV_ErrModeSilent = 2
c'CV_ErrModeSilent :: (Num a) => a

{-# LINE 20 "CV/Bindings/Error.hsc" #-}