{-# LANGUAGE ForeignFunctionInterface #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE NoFieldSelectors #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_HADDOCK prune #-}
module SDL3.Sys.Bindgen.Assert.FunPtr (
SDL3.Sys.Bindgen.Assert.FunPtr.sDL_ReportAssertion,
SDL3.Sys.Bindgen.Assert.FunPtr.sDL_SetAssertionHandler,
SDL3.Sys.Bindgen.Assert.FunPtr.sDL_GetDefaultAssertionHandler,
SDL3.Sys.Bindgen.Assert.FunPtr.sDL_GetAssertionHandler,
SDL3.Sys.Bindgen.Assert.FunPtr.sDL_GetAssertionReport,
SDL3.Sys.Bindgen.Assert.FunPtr.sDL_ResetAssertionReport,
)
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
import SDL3.Sys.Bindgen.Assert
$( 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_assert.h>"
, "/* sdl3bindgensys_SDL3.Sys.Bindgen.Assert_get_SDL_ReportAssertion */"
, "__attribute__ ((const))"
, "SDL_AssertState (*hs_bindgen_3242a9f392e3cbbb (void)) ("
, " SDL_AssertData *arg1,"
, " char const *arg2,"
, " char const *arg3,"
, " signed int arg4"
, ")"
, "{"
, " return &SDL_ReportAssertion;"
, "}"
, "/* sdl3bindgensys_SDL3.Sys.Bindgen.Assert_get_SDL_SetAssertionHandler */"
, "__attribute__ ((const))"
, "void (*hs_bindgen_d3c978a8cd9d0fb4 (void)) ("
, " SDL_AssertionHandler arg1,"
, " void *arg2"
, ")"
, "{"
, " return &SDL_SetAssertionHandler;"
, "}"
, "/* sdl3bindgensys_SDL3.Sys.Bindgen.Assert_get_SDL_GetDefaultAssertionHandler */"
, "__attribute__ ((const))"
, "SDL_AssertionHandler (*hs_bindgen_9ee5171cfc759fff (void)) (void)"
, "{"
, " return &SDL_GetDefaultAssertionHandler;"
, "}"
, "/* sdl3bindgensys_SDL3.Sys.Bindgen.Assert_get_SDL_GetAssertionHandler */"
, "__attribute__ ((const))"
, "SDL_AssertionHandler (*hs_bindgen_d86a645db34b2ab2 (void)) ("
, " void **arg1"
, ")"
, "{"
, " return &SDL_GetAssertionHandler;"
, "}"
, "/* sdl3bindgensys_SDL3.Sys.Bindgen.Assert_get_SDL_GetAssertionReport */"
, "__attribute__ ((const))"
, "SDL_AssertData const *(*hs_bindgen_81f7661412c040b9 (void)) (void)"
, "{"
, " return &SDL_GetAssertionReport;"
, "}"
, "/* sdl3bindgensys_SDL3.Sys.Bindgen.Assert_get_SDL_ResetAssertionReport */"
, "__attribute__ ((const))"
, "void (*hs_bindgen_d418f82b830fadaf (void)) (void)"
, "{"
, " return &SDL_ResetAssertionReport;"
, "}"
]
)
)
foreign import ccall unsafe "hs_bindgen_3242a9f392e3cbbb"
hs_bindgen_3242a9f392e3cbbb_base
:: IO (BG.FunPtr BG.Void)
hs_bindgen_3242a9f392e3cbbb
:: IO
( BG.FunPtr
( BG.Ptr SDL_AssertData
-> PtrConst.PtrConst BG.CChar
-> PtrConst.PtrConst BG.CChar
-> BG.CInt
-> IO SDL_AssertState
)
)
hs_bindgen_3242a9f392e3cbbb :: IO
(FunPtr
(Ptr SDL_AssertData
-> PtrConst CChar -> PtrConst CChar -> CInt -> IO SDL_AssertState))
hs_bindgen_3242a9f392e3cbbb =
(FunPtr Void
-> FunPtr
(Ptr SDL_AssertData
-> PtrConst CChar -> PtrConst CChar -> CInt -> IO SDL_AssertState))
-> IO (FunPtr Void)
-> IO
(FunPtr
(Ptr SDL_AssertData
-> PtrConst CChar -> PtrConst CChar -> CInt -> IO SDL_AssertState))
forall a b. (a -> b) -> IO a -> IO b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap FunPtr Void
-> FunPtr
(Ptr SDL_AssertData
-> PtrConst CChar -> PtrConst CChar -> CInt -> IO SDL_AssertState)
FFIType
(FunPtr
(Ptr SDL_AssertData
-> PtrConst CChar -> PtrConst CChar -> CInt -> IO SDL_AssertState))
-> FunPtr
(Ptr SDL_AssertData
-> PtrConst CChar -> PtrConst CChar -> CInt -> IO SDL_AssertState)
forall a. HasFFIType a => FFIType a -> a
BG.fromFFIType IO (FunPtr Void)
hs_bindgen_3242a9f392e3cbbb_base
{-# NOINLINE sDL_ReportAssertion #-}
sDL_ReportAssertion
:: BG.FunPtr
( BG.Ptr SDL_AssertData
-> PtrConst.PtrConst BG.CChar
-> PtrConst.PtrConst BG.CChar
-> BG.CInt
-> IO SDL_AssertState
)
sDL_ReportAssertion :: FunPtr
(Ptr SDL_AssertData
-> PtrConst CChar -> PtrConst CChar -> CInt -> IO SDL_AssertState)
sDL_ReportAssertion =
IO
(FunPtr
(Ptr SDL_AssertData
-> PtrConst CChar -> PtrConst CChar -> CInt -> IO SDL_AssertState))
-> FunPtr
(Ptr SDL_AssertData
-> PtrConst CChar -> PtrConst CChar -> CInt -> IO SDL_AssertState)
forall a. IO a -> a
BG.unsafePerformIO IO
(FunPtr
(Ptr SDL_AssertData
-> PtrConst CChar -> PtrConst CChar -> CInt -> IO SDL_AssertState))
hs_bindgen_3242a9f392e3cbbb
foreign import ccall unsafe "hs_bindgen_d3c978a8cd9d0fb4"
hs_bindgen_d3c978a8cd9d0fb4_base
:: IO (BG.FunPtr BG.Void)
hs_bindgen_d3c978a8cd9d0fb4 :: IO (BG.FunPtr (SDL_AssertionHandler -> BG.Ptr BG.Void -> IO ()))
hs_bindgen_d3c978a8cd9d0fb4 :: IO (FunPtr (SDL_AssertionHandler -> Ptr Void -> IO ()))
hs_bindgen_d3c978a8cd9d0fb4 =
(FunPtr Void -> FunPtr (SDL_AssertionHandler -> Ptr Void -> IO ()))
-> IO (FunPtr Void)
-> IO (FunPtr (SDL_AssertionHandler -> Ptr Void -> IO ()))
forall a b. (a -> b) -> IO a -> IO b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap FunPtr Void -> FunPtr (SDL_AssertionHandler -> Ptr Void -> IO ())
FFIType (FunPtr (SDL_AssertionHandler -> Ptr Void -> IO ()))
-> FunPtr (SDL_AssertionHandler -> Ptr Void -> IO ())
forall a. HasFFIType a => FFIType a -> a
BG.fromFFIType IO (FunPtr Void)
hs_bindgen_d3c978a8cd9d0fb4_base
{-# NOINLINE sDL_SetAssertionHandler #-}
sDL_SetAssertionHandler :: BG.FunPtr (SDL_AssertionHandler -> BG.Ptr BG.Void -> IO ())
sDL_SetAssertionHandler :: FunPtr (SDL_AssertionHandler -> Ptr Void -> IO ())
sDL_SetAssertionHandler =
IO (FunPtr (SDL_AssertionHandler -> Ptr Void -> IO ()))
-> FunPtr (SDL_AssertionHandler -> Ptr Void -> IO ())
forall a. IO a -> a
BG.unsafePerformIO IO (FunPtr (SDL_AssertionHandler -> Ptr Void -> IO ()))
hs_bindgen_d3c978a8cd9d0fb4
foreign import ccall unsafe "hs_bindgen_9ee5171cfc759fff"
hs_bindgen_9ee5171cfc759fff_base
:: IO (BG.FunPtr BG.Void)
hs_bindgen_9ee5171cfc759fff :: IO (BG.FunPtr (IO SDL_AssertionHandler))
hs_bindgen_9ee5171cfc759fff :: IO (FunPtr (IO SDL_AssertionHandler))
hs_bindgen_9ee5171cfc759fff =
(FunPtr Void -> FunPtr (IO SDL_AssertionHandler))
-> IO (FunPtr Void) -> IO (FunPtr (IO SDL_AssertionHandler))
forall a b. (a -> b) -> IO a -> IO b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap FunPtr Void -> FunPtr (IO SDL_AssertionHandler)
FFIType (FunPtr (IO SDL_AssertionHandler))
-> FunPtr (IO SDL_AssertionHandler)
forall a. HasFFIType a => FFIType a -> a
BG.fromFFIType IO (FunPtr Void)
hs_bindgen_9ee5171cfc759fff_base
{-# NOINLINE sDL_GetDefaultAssertionHandler #-}
sDL_GetDefaultAssertionHandler :: BG.FunPtr (IO SDL_AssertionHandler)
sDL_GetDefaultAssertionHandler :: FunPtr (IO SDL_AssertionHandler)
sDL_GetDefaultAssertionHandler =
IO (FunPtr (IO SDL_AssertionHandler))
-> FunPtr (IO SDL_AssertionHandler)
forall a. IO a -> a
BG.unsafePerformIO IO (FunPtr (IO SDL_AssertionHandler))
hs_bindgen_9ee5171cfc759fff
foreign import ccall unsafe "hs_bindgen_d86a645db34b2ab2"
hs_bindgen_d86a645db34b2ab2_base
:: IO (BG.FunPtr BG.Void)
hs_bindgen_d86a645db34b2ab2 :: IO (BG.FunPtr (BG.Ptr (BG.Ptr BG.Void) -> IO SDL_AssertionHandler))
hs_bindgen_d86a645db34b2ab2 :: IO (FunPtr (Ptr (Ptr Void) -> IO SDL_AssertionHandler))
hs_bindgen_d86a645db34b2ab2 =
(FunPtr Void -> FunPtr (Ptr (Ptr Void) -> IO SDL_AssertionHandler))
-> IO (FunPtr Void)
-> IO (FunPtr (Ptr (Ptr Void) -> IO SDL_AssertionHandler))
forall a b. (a -> b) -> IO a -> IO b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap FunPtr Void -> FunPtr (Ptr (Ptr Void) -> IO SDL_AssertionHandler)
FFIType (FunPtr (Ptr (Ptr Void) -> IO SDL_AssertionHandler))
-> FunPtr (Ptr (Ptr Void) -> IO SDL_AssertionHandler)
forall a. HasFFIType a => FFIType a -> a
BG.fromFFIType IO (FunPtr Void)
hs_bindgen_d86a645db34b2ab2_base
{-# NOINLINE sDL_GetAssertionHandler #-}
sDL_GetAssertionHandler :: BG.FunPtr (BG.Ptr (BG.Ptr BG.Void) -> IO SDL_AssertionHandler)
sDL_GetAssertionHandler :: FunPtr (Ptr (Ptr Void) -> IO SDL_AssertionHandler)
sDL_GetAssertionHandler =
IO (FunPtr (Ptr (Ptr Void) -> IO SDL_AssertionHandler))
-> FunPtr (Ptr (Ptr Void) -> IO SDL_AssertionHandler)
forall a. IO a -> a
BG.unsafePerformIO IO (FunPtr (Ptr (Ptr Void) -> IO SDL_AssertionHandler))
hs_bindgen_d86a645db34b2ab2
foreign import ccall unsafe "hs_bindgen_81f7661412c040b9"
hs_bindgen_81f7661412c040b9_base
:: IO (BG.FunPtr BG.Void)
hs_bindgen_81f7661412c040b9 :: IO (BG.FunPtr (IO (PtrConst.PtrConst SDL_AssertData)))
hs_bindgen_81f7661412c040b9 :: IO (FunPtr (IO (PtrConst SDL_AssertData)))
hs_bindgen_81f7661412c040b9 =
(FunPtr Void -> FunPtr (IO (PtrConst SDL_AssertData)))
-> IO (FunPtr Void) -> IO (FunPtr (IO (PtrConst SDL_AssertData)))
forall a b. (a -> b) -> IO a -> IO b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap FunPtr Void -> FunPtr (IO (PtrConst SDL_AssertData))
FFIType (FunPtr (IO (PtrConst SDL_AssertData)))
-> FunPtr (IO (PtrConst SDL_AssertData))
forall a. HasFFIType a => FFIType a -> a
BG.fromFFIType IO (FunPtr Void)
hs_bindgen_81f7661412c040b9_base
{-# NOINLINE sDL_GetAssertionReport #-}
sDL_GetAssertionReport :: BG.FunPtr (IO (PtrConst.PtrConst SDL_AssertData))
sDL_GetAssertionReport :: FunPtr (IO (PtrConst SDL_AssertData))
sDL_GetAssertionReport =
IO (FunPtr (IO (PtrConst SDL_AssertData)))
-> FunPtr (IO (PtrConst SDL_AssertData))
forall a. IO a -> a
BG.unsafePerformIO IO (FunPtr (IO (PtrConst SDL_AssertData)))
hs_bindgen_81f7661412c040b9
foreign import ccall unsafe "hs_bindgen_d418f82b830fadaf"
hs_bindgen_d418f82b830fadaf_base
:: IO (BG.FunPtr BG.Void)
hs_bindgen_d418f82b830fadaf :: IO (BG.FunPtr (IO ()))
hs_bindgen_d418f82b830fadaf :: IO (FunPtr (IO ()))
hs_bindgen_d418f82b830fadaf =
(FunPtr Void -> FunPtr (IO ()))
-> IO (FunPtr Void) -> IO (FunPtr (IO ()))
forall a b. (a -> b) -> IO a -> IO b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap FunPtr Void -> FunPtr (IO ())
FFIType (FunPtr (IO ())) -> FunPtr (IO ())
forall a. HasFFIType a => FFIType a -> a
BG.fromFFIType IO (FunPtr Void)
hs_bindgen_d418f82b830fadaf_base
{-# NOINLINE sDL_ResetAssertionReport #-}
sDL_ResetAssertionReport :: BG.FunPtr (IO ())
sDL_ResetAssertionReport :: FunPtr (IO ())
sDL_ResetAssertionReport =
IO (FunPtr (IO ())) -> FunPtr (IO ())
forall a. IO a -> a
BG.unsafePerformIO IO (FunPtr (IO ()))
hs_bindgen_d418f82b830fadaf