{-# LANGUAGE ForeignFunctionInterface #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE NoFieldSelectors #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_HADDOCK prune #-}

module SDL3.Sys.Bindgen.Error.Unsafe (
  SDL3.Sys.Bindgen.Error.Unsafe.sDL_OutOfMemory,
  SDL3.Sys.Bindgen.Error.Unsafe.sDL_GetError,
  SDL3.Sys.Bindgen.Error.Unsafe.sDL_ClearError,
)
where

import Prelude (IO, fmap)

import HsBindgen.Runtime.PtrConst qualified as PtrConst
import HsBindgen.Runtime.Support qualified as BG
import HsBindgen.Runtime.Support.CAPI qualified

$( HsBindgen.Runtime.Support.CAPI.addCSource
     ( HsBindgen.Runtime.Support.CAPI.unlines
         [ "#define SDL_MAIN_HANDLED"
         , "#define SDL_SLOW_MEMCPY"
         , "#define SDL_SLOW_MEMMOVE"
         , "#define SDL_SLOW_MEMSET"
         , "#include <SDL3/SDL_error.h>"
         , "_Bool hs_bindgen_bdcf7fcfe4f61e9a (void)"
         , "{"
         , "  return (SDL_OutOfMemory)();"
         , "}"
         , "char const *hs_bindgen_f0d75ef957ae5815 (void)"
         , "{"
         , "  return (SDL_GetError)();"
         , "}"
         , "_Bool hs_bindgen_c7e60181e6f1a240 (void)"
         , "{"
         , "  return (SDL_ClearError)();"
         , "}"
         ]
     )
 )

-- __unique:__ @sdl3bindgensys_SDL3.Sys.Bindgen.Error_Unsafe_SDL_OutOfMemory@
foreign import ccall unsafe "hs_bindgen_bdcf7fcfe4f61e9a"
  hs_bindgen_bdcf7fcfe4f61e9a_base
    :: IO BG.CBool

-- __unique:__ @sdl3bindgensys_SDL3.Sys.Bindgen.Error_Unsafe_SDL_OutOfMemory@
hs_bindgen_bdcf7fcfe4f61e9a :: IO BG.CBool
hs_bindgen_bdcf7fcfe4f61e9a :: IO CBool
hs_bindgen_bdcf7fcfe4f61e9a =
  (CBool -> CBool) -> IO CBool -> IO CBool
forall a b. (a -> b) -> IO a -> IO b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap CBool -> CBool
FFIType CBool -> CBool
forall a. HasFFIType a => FFIType a -> a
BG.fromFFIType IO CBool
hs_bindgen_bdcf7fcfe4f61e9a_base

-- | Set an error indicating that memory allocation failed.
--
--     This function does not do any memory allocation.
--
--     [Returns]: false.
--
--     [Thread safety]: It is safe to call this function from any thread.
--
--     @since 3.2.0
--
--     [C declaration]: @SDL_OutOfMemory@, defined at @SDL3\/SDL_error.h 121:34@
sDL_OutOfMemory :: IO BG.CBool
sDL_OutOfMemory :: IO CBool
sDL_OutOfMemory = IO CBool
hs_bindgen_bdcf7fcfe4f61e9a

-- __unique:__ @sdl3bindgensys_SDL3.Sys.Bindgen.Error_Unsafe_SDL_GetError@
foreign import ccall unsafe "hs_bindgen_f0d75ef957ae5815"
  hs_bindgen_f0d75ef957ae5815_base
    :: IO (BG.Ptr BG.Void)

-- __unique:__ @sdl3bindgensys_SDL3.Sys.Bindgen.Error_Unsafe_SDL_GetError@
hs_bindgen_f0d75ef957ae5815 :: IO (PtrConst.PtrConst BG.CChar)
hs_bindgen_f0d75ef957ae5815 :: IO (PtrConst CChar)
hs_bindgen_f0d75ef957ae5815 =
  (Ptr Void -> PtrConst CChar)
-> IO (Ptr Void) -> IO (PtrConst CChar)
forall a b. (a -> b) -> IO a -> IO b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap Ptr Void -> PtrConst CChar
FFIType (PtrConst CChar) -> PtrConst CChar
forall a. HasFFIType a => FFIType a -> a
BG.fromFFIType IO (Ptr Void)
hs_bindgen_f0d75ef957ae5815_base

-- | Retrieve a message about the last error that occurred on the current thread.
--
--     It is possible for multiple errors to occur before calling @SDL_GetError()@. Only the last error is returned.
--
--     The message is only applicable when an SDL function has signaled an error. You must check the return values of SDL function calls to determine when to appropriately call @SDL_GetError()@. You should /not/ use the results of @SDL_GetError()@ to decide if an error has occurred! Sometimes SDL will set an error string even when reporting success.
--
--     SDL will /not/ clear the error string for successful API calls. You /must/ check return values for failure cases before you can assume the error string applies.
--
--     Error strings are set per-thread, so an error set in a different thread will not interfere with the current thread\'s operation.
--
--     The returned value is a thread-local string which will remain valid until the current thread\'s error string is changed. The caller should make a copy if the value is needed after the next SDL API call.
--
--     [Returns]: a message with information about the specific error that occurred, or an empty string if there hasn\'t been an error message set since the last call to @SDL_ClearError()@.
--
--     [Thread safety]: It is safe to call this function from any thread.
--
--     @since 3.2.0
--
--     [See also]: 'sDL_ClearError', @SDL_SetError@
--
--     [C declaration]: @SDL_GetError@, defined at @SDL3\/SDL_error.h 158:42@
sDL_GetError :: IO (PtrConst.PtrConst BG.CChar)
sDL_GetError :: IO (PtrConst CChar)
sDL_GetError = IO (PtrConst CChar)
hs_bindgen_f0d75ef957ae5815

-- __unique:__ @sdl3bindgensys_SDL3.Sys.Bindgen.Error_Unsafe_SDL_ClearError@
foreign import ccall unsafe "hs_bindgen_c7e60181e6f1a240"
  hs_bindgen_c7e60181e6f1a240_base
    :: IO BG.CBool

-- __unique:__ @sdl3bindgensys_SDL3.Sys.Bindgen.Error_Unsafe_SDL_ClearError@
hs_bindgen_c7e60181e6f1a240 :: IO BG.CBool
hs_bindgen_c7e60181e6f1a240 :: IO CBool
hs_bindgen_c7e60181e6f1a240 =
  (CBool -> CBool) -> IO CBool -> IO CBool
forall a b. (a -> b) -> IO a -> IO b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap CBool -> CBool
FFIType CBool -> CBool
forall a. HasFFIType a => FFIType a -> a
BG.fromFFIType IO CBool
hs_bindgen_c7e60181e6f1a240_base

-- | Clear any previous error message for this thread.
--
--     [Returns]: true.
--
--     [Thread safety]: It is safe to call this function from any thread.
--
--     @since 3.2.0
--
--     [See also]: 'sDL_GetError', @SDL_SetError@
--
--     [C declaration]: @SDL_ClearError@, defined at @SDL3\/SDL_error.h 172:34@
sDL_ClearError :: IO BG.CBool
sDL_ClearError :: IO CBool
sDL_ClearError = IO CBool
hs_bindgen_c7e60181e6f1a240