{-# LANGUAGE ForeignFunctionInterface #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE NoFieldSelectors #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_HADDOCK prune #-}
module SDL3.Sys.Bindgen.Hints.Safe (
SDL3.Sys.Bindgen.Hints.Safe.sDL_SetHintWithPriority,
SDL3.Sys.Bindgen.Hints.Safe.sDL_SetHint,
SDL3.Sys.Bindgen.Hints.Safe.sDL_ResetHint,
SDL3.Sys.Bindgen.Hints.Safe.sDL_ResetHints,
SDL3.Sys.Bindgen.Hints.Safe.sDL_GetHint,
SDL3.Sys.Bindgen.Hints.Safe.sDL_GetHintBoolean,
SDL3.Sys.Bindgen.Hints.Safe.sDL_AddHintCallback,
SDL3.Sys.Bindgen.Hints.Safe.sDL_RemoveHintCallback,
)
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.Hints
$( 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_hints.h>"
, "_Bool hs_bindgen_0d58d8e15d9ee871 ("
, " char const *arg1,"
, " char const *arg2,"
, " SDL_HintPriority arg3"
, ")"
, "{"
, " return (SDL_SetHintWithPriority)(arg1, arg2, arg3);"
, "}"
, "_Bool hs_bindgen_eab3698ef04ccc46 ("
, " char const *arg1,"
, " char const *arg2"
, ")"
, "{"
, " return (SDL_SetHint)(arg1, arg2);"
, "}"
, "_Bool hs_bindgen_f97886c40bcfbc20 ("
, " char const *arg1"
, ")"
, "{"
, " return (SDL_ResetHint)(arg1);"
, "}"
, "void hs_bindgen_fd2e64a782ded6df (void)"
, "{"
, " (SDL_ResetHints)();"
, "}"
, "char const *hs_bindgen_9ee7b58437f0684a ("
, " char const *arg1"
, ")"
, "{"
, " return (SDL_GetHint)(arg1);"
, "}"
, "_Bool hs_bindgen_5a0b364272f99749 ("
, " char const *arg1,"
, " _Bool arg2"
, ")"
, "{"
, " return (SDL_GetHintBoolean)(arg1, arg2);"
, "}"
, "_Bool hs_bindgen_d78b382b71fb1c63 ("
, " char const *arg1,"
, " SDL_HintCallback arg2,"
, " void *arg3"
, ")"
, "{"
, " return (SDL_AddHintCallback)(arg1, arg2, arg3);"
, "}"
, "void hs_bindgen_c51a1a939bae0509 ("
, " char const *arg1,"
, " SDL_HintCallback arg2,"
, " void *arg3"
, ")"
, "{"
, " (SDL_RemoveHintCallback)(arg1, arg2, arg3);"
, "}"
]
)
)
foreign import ccall safe "hs_bindgen_0d58d8e15d9ee871"
hs_bindgen_0d58d8e15d9ee871_base
:: BG.Ptr BG.Void
-> BG.Ptr BG.Void
-> BG.CUInt
-> IO BG.CBool
hs_bindgen_0d58d8e15d9ee871
:: PtrConst.PtrConst BG.CChar
-> PtrConst.PtrConst BG.CChar
-> SDL_HintPriority
-> IO BG.CBool
hs_bindgen_0d58d8e15d9ee871 :: PtrConst CChar -> PtrConst CChar -> SDL_HintPriority -> IO CBool
hs_bindgen_0d58d8e15d9ee871 =
\PtrConst CChar
x0 ->
\PtrConst CChar
x1 ->
\SDL_HintPriority
x2 ->
(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
(Ptr Void -> Ptr Void -> CUInt -> IO CBool
hs_bindgen_0d58d8e15d9ee871_base (PtrConst CChar -> FFIType (PtrConst CChar)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType PtrConst CChar
x0) (PtrConst CChar -> FFIType (PtrConst CChar)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType PtrConst CChar
x1) (SDL_HintPriority -> FFIType SDL_HintPriority
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType SDL_HintPriority
x2))
sDL_SetHintWithPriority
:: PtrConst.PtrConst BG.CChar
-> PtrConst.PtrConst BG.CChar
-> SDL_HintPriority
-> IO BG.CBool
sDL_SetHintWithPriority :: PtrConst CChar -> PtrConst CChar -> SDL_HintPriority -> IO CBool
sDL_SetHintWithPriority = PtrConst CChar -> PtrConst CChar -> SDL_HintPriority -> IO CBool
hs_bindgen_0d58d8e15d9ee871
foreign import ccall safe "hs_bindgen_eab3698ef04ccc46"
hs_bindgen_eab3698ef04ccc46_base
:: BG.Ptr BG.Void
-> BG.Ptr BG.Void
-> IO BG.CBool
hs_bindgen_eab3698ef04ccc46
:: PtrConst.PtrConst BG.CChar
-> PtrConst.PtrConst BG.CChar
-> IO BG.CBool
hs_bindgen_eab3698ef04ccc46 :: PtrConst CChar -> PtrConst CChar -> IO CBool
hs_bindgen_eab3698ef04ccc46 =
\PtrConst CChar
x0 ->
\PtrConst CChar
x1 ->
(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 (Ptr Void -> Ptr Void -> IO CBool
hs_bindgen_eab3698ef04ccc46_base (PtrConst CChar -> FFIType (PtrConst CChar)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType PtrConst CChar
x0) (PtrConst CChar -> FFIType (PtrConst CChar)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType PtrConst CChar
x1))
sDL_SetHint
:: PtrConst.PtrConst BG.CChar
-> PtrConst.PtrConst BG.CChar
-> IO BG.CBool
sDL_SetHint :: PtrConst CChar -> PtrConst CChar -> IO CBool
sDL_SetHint = PtrConst CChar -> PtrConst CChar -> IO CBool
hs_bindgen_eab3698ef04ccc46
foreign import ccall safe "hs_bindgen_f97886c40bcfbc20"
hs_bindgen_f97886c40bcfbc20_base
:: BG.Ptr BG.Void
-> IO BG.CBool
hs_bindgen_f97886c40bcfbc20
:: PtrConst.PtrConst BG.CChar
-> IO BG.CBool
hs_bindgen_f97886c40bcfbc20 :: PtrConst CChar -> IO CBool
hs_bindgen_f97886c40bcfbc20 =
\PtrConst CChar
x0 ->
(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 (Ptr Void -> IO CBool
hs_bindgen_f97886c40bcfbc20_base (PtrConst CChar -> FFIType (PtrConst CChar)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType PtrConst CChar
x0))
sDL_ResetHint
:: PtrConst.PtrConst BG.CChar
-> IO BG.CBool
sDL_ResetHint :: PtrConst CChar -> IO CBool
sDL_ResetHint = PtrConst CChar -> IO CBool
hs_bindgen_f97886c40bcfbc20
foreign import ccall safe "hs_bindgen_fd2e64a782ded6df"
hs_bindgen_fd2e64a782ded6df_base
:: IO ()
hs_bindgen_fd2e64a782ded6df :: IO ()
hs_bindgen_fd2e64a782ded6df :: IO ()
hs_bindgen_fd2e64a782ded6df =
IO ()
hs_bindgen_fd2e64a782ded6df_base
sDL_ResetHints :: IO ()
sDL_ResetHints :: IO ()
sDL_ResetHints = IO ()
hs_bindgen_fd2e64a782ded6df
foreign import ccall safe "hs_bindgen_9ee7b58437f0684a"
hs_bindgen_9ee7b58437f0684a_base
:: BG.Ptr BG.Void
-> IO (BG.Ptr BG.Void)
hs_bindgen_9ee7b58437f0684a
:: PtrConst.PtrConst BG.CChar
-> IO (PtrConst.PtrConst BG.CChar)
hs_bindgen_9ee7b58437f0684a :: PtrConst CChar -> IO (PtrConst CChar)
hs_bindgen_9ee7b58437f0684a =
\PtrConst CChar
x0 ->
(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 (Ptr Void -> IO (Ptr Void)
hs_bindgen_9ee7b58437f0684a_base (PtrConst CChar -> FFIType (PtrConst CChar)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType PtrConst CChar
x0))
sDL_GetHint
:: PtrConst.PtrConst BG.CChar
-> IO (PtrConst.PtrConst BG.CChar)
sDL_GetHint :: PtrConst CChar -> IO (PtrConst CChar)
sDL_GetHint = PtrConst CChar -> IO (PtrConst CChar)
hs_bindgen_9ee7b58437f0684a
foreign import ccall safe "hs_bindgen_5a0b364272f99749"
hs_bindgen_5a0b364272f99749_base
:: BG.Ptr BG.Void
-> BG.CBool
-> IO BG.CBool
hs_bindgen_5a0b364272f99749
:: PtrConst.PtrConst BG.CChar
-> BG.CBool
-> IO BG.CBool
hs_bindgen_5a0b364272f99749 :: PtrConst CChar -> CBool -> IO CBool
hs_bindgen_5a0b364272f99749 =
\PtrConst CChar
x0 ->
\CBool
x1 ->
(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 (Ptr Void -> CBool -> IO CBool
hs_bindgen_5a0b364272f99749_base (PtrConst CChar -> FFIType (PtrConst CChar)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType PtrConst CChar
x0) (CBool -> FFIType CBool
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType CBool
x1))
sDL_GetHintBoolean
:: PtrConst.PtrConst BG.CChar
-> BG.CBool
-> IO BG.CBool
sDL_GetHintBoolean :: PtrConst CChar -> CBool -> IO CBool
sDL_GetHintBoolean = PtrConst CChar -> CBool -> IO CBool
hs_bindgen_5a0b364272f99749
foreign import ccall safe "hs_bindgen_d78b382b71fb1c63"
hs_bindgen_d78b382b71fb1c63_base
:: BG.Ptr BG.Void
-> BG.FunPtr BG.Void
-> BG.Ptr BG.Void
-> IO BG.CBool
hs_bindgen_d78b382b71fb1c63
:: PtrConst.PtrConst BG.CChar
-> SDL_HintCallback
-> BG.Ptr BG.Void
-> IO BG.CBool
hs_bindgen_d78b382b71fb1c63 :: PtrConst CChar -> SDL_HintCallback -> Ptr Void -> IO CBool
hs_bindgen_d78b382b71fb1c63 =
\PtrConst CChar
x0 ->
\SDL_HintCallback
x1 ->
\Ptr Void
x2 ->
(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
(Ptr Void -> FunPtr Void -> Ptr Void -> IO CBool
hs_bindgen_d78b382b71fb1c63_base (PtrConst CChar -> FFIType (PtrConst CChar)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType PtrConst CChar
x0) (SDL_HintCallback -> FFIType SDL_HintCallback
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType SDL_HintCallback
x1) (Ptr Void -> FFIType (Ptr Void)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType Ptr Void
x2))
sDL_AddHintCallback
:: PtrConst.PtrConst BG.CChar
-> SDL_HintCallback
-> BG.Ptr BG.Void
-> IO BG.CBool
sDL_AddHintCallback :: PtrConst CChar -> SDL_HintCallback -> Ptr Void -> IO CBool
sDL_AddHintCallback = PtrConst CChar -> SDL_HintCallback -> Ptr Void -> IO CBool
hs_bindgen_d78b382b71fb1c63
foreign import ccall safe "hs_bindgen_c51a1a939bae0509"
hs_bindgen_c51a1a939bae0509_base
:: BG.Ptr BG.Void
-> BG.FunPtr BG.Void
-> BG.Ptr BG.Void
-> IO ()
hs_bindgen_c51a1a939bae0509
:: PtrConst.PtrConst BG.CChar
-> SDL_HintCallback
-> BG.Ptr BG.Void
-> IO ()
hs_bindgen_c51a1a939bae0509 :: PtrConst CChar -> SDL_HintCallback -> Ptr Void -> IO ()
hs_bindgen_c51a1a939bae0509 =
\PtrConst CChar
x0 ->
\SDL_HintCallback
x1 ->
\Ptr Void
x2 ->
Ptr Void -> FunPtr Void -> Ptr Void -> IO ()
hs_bindgen_c51a1a939bae0509_base (PtrConst CChar -> FFIType (PtrConst CChar)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType PtrConst CChar
x0) (SDL_HintCallback -> FFIType SDL_HintCallback
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType SDL_HintCallback
x1) (Ptr Void -> FFIType (Ptr Void)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType Ptr Void
x2)
sDL_RemoveHintCallback
:: PtrConst.PtrConst BG.CChar
-> SDL_HintCallback
-> BG.Ptr BG.Void
-> IO ()
sDL_RemoveHintCallback :: PtrConst CChar -> SDL_HintCallback -> Ptr Void -> IO ()
sDL_RemoveHintCallback = PtrConst CChar -> SDL_HintCallback -> Ptr Void -> IO ()
hs_bindgen_c51a1a939bae0509