{-# LANGUAGE ForeignFunctionInterface #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE NoFieldSelectors #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_HADDOCK prune #-}
module SDL3.Sys.Bindgen.Dialog.Safe (
SDL3.Sys.Bindgen.Dialog.Safe.sDL_ShowOpenFileDialog,
SDL3.Sys.Bindgen.Dialog.Safe.sDL_ShowSaveFileDialog,
SDL3.Sys.Bindgen.Dialog.Safe.sDL_ShowOpenFolderDialog,
SDL3.Sys.Bindgen.Dialog.Safe.sDL_ShowFileDialogWithProperties,
)
where
import Prelude (IO)
import HsBindgen.Runtime.LibC qualified
import HsBindgen.Runtime.PtrConst qualified as PtrConst
import HsBindgen.Runtime.Support qualified as BG
import HsBindgen.Runtime.Support.CAPI qualified
import SDL3.Sys.Bindgen.Dialog
import SDL3.Sys.Bindgen.Properties qualified
import SDL3.Sys.Bindgen.Video 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_dialog.h>"
, "void hs_bindgen_bb279e07edff0c05 ("
, " SDL_DialogFileCallback arg1,"
, " void *arg2,"
, " SDL_Window *arg3,"
, " SDL_DialogFileFilter const *arg4,"
, " signed int arg5,"
, " char const *arg6,"
, " _Bool arg7"
, ")"
, "{"
, " (SDL_ShowOpenFileDialog)(arg1, arg2, arg3, arg4, arg5, arg6, arg7);"
, "}"
, "void hs_bindgen_5f9b8c9a23decdee ("
, " SDL_DialogFileCallback arg1,"
, " void *arg2,"
, " SDL_Window *arg3,"
, " SDL_DialogFileFilter const *arg4,"
, " signed int arg5,"
, " char const *arg6"
, ")"
, "{"
, " (SDL_ShowSaveFileDialog)(arg1, arg2, arg3, arg4, arg5, arg6);"
, "}"
, "void hs_bindgen_ed60a60f5fbee19e ("
, " SDL_DialogFileCallback arg1,"
, " void *arg2,"
, " SDL_Window *arg3,"
, " char const *arg4,"
, " _Bool arg5"
, ")"
, "{"
, " (SDL_ShowOpenFolderDialog)(arg1, arg2, arg3, arg4, arg5);"
, "}"
, "void hs_bindgen_af795bc446bca49d ("
, " SDL_FileDialogType arg1,"
, " SDL_DialogFileCallback arg2,"
, " void *arg3,"
, " SDL_PropertiesID arg4"
, ")"
, "{"
, " (SDL_ShowFileDialogWithProperties)(arg1, arg2, arg3, arg4);"
, "}"
]
)
)
foreign import ccall safe "hs_bindgen_bb279e07edff0c05"
hs_bindgen_bb279e07edff0c05_base
:: BG.FunPtr BG.Void
-> BG.Ptr BG.Void
-> BG.Ptr BG.Void
-> BG.Ptr BG.Void
-> BG.CInt
-> BG.Ptr BG.Void
-> BG.CBool
-> IO ()
hs_bindgen_bb279e07edff0c05
:: SDL_DialogFileCallback
-> BG.Ptr BG.Void
-> BG.Ptr SDL3.Sys.Bindgen.Video.SDL_Window
-> PtrConst.PtrConst SDL_DialogFileFilter
-> BG.CInt
-> PtrConst.PtrConst BG.CChar
-> BG.CBool
-> IO ()
hs_bindgen_bb279e07edff0c05 :: SDL_DialogFileCallback
-> Ptr Void
-> Ptr SDL_Window
-> PtrConst SDL_DialogFileFilter
-> CInt
-> PtrConst CChar
-> CBool
-> IO ()
hs_bindgen_bb279e07edff0c05 =
\SDL_DialogFileCallback
x0 ->
\Ptr Void
x1 ->
\Ptr SDL_Window
x2 ->
\PtrConst SDL_DialogFileFilter
x3 ->
\CInt
x4 ->
\PtrConst CChar
x5 ->
\CBool
x6 ->
FunPtr Void
-> Ptr Void
-> Ptr Void
-> Ptr Void
-> CInt
-> Ptr Void
-> CBool
-> IO ()
hs_bindgen_bb279e07edff0c05_base
(SDL_DialogFileCallback -> FFIType SDL_DialogFileCallback
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType SDL_DialogFileCallback
x0)
(Ptr Void -> FFIType (Ptr Void)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType Ptr Void
x1)
(Ptr SDL_Window -> FFIType (Ptr SDL_Window)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType Ptr SDL_Window
x2)
(PtrConst SDL_DialogFileFilter
-> FFIType (PtrConst SDL_DialogFileFilter)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType PtrConst SDL_DialogFileFilter
x3)
(CInt -> FFIType CInt
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType CInt
x4)
(PtrConst CChar -> FFIType (PtrConst CChar)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType PtrConst CChar
x5)
(CBool -> FFIType CBool
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType CBool
x6)
sDL_ShowOpenFileDialog
:: SDL_DialogFileCallback
-> BG.Ptr BG.Void
-> BG.Ptr SDL3.Sys.Bindgen.Video.SDL_Window
-> PtrConst.PtrConst SDL_DialogFileFilter
-> BG.CInt
-> PtrConst.PtrConst BG.CChar
-> BG.CBool
-> IO ()
sDL_ShowOpenFileDialog :: SDL_DialogFileCallback
-> Ptr Void
-> Ptr SDL_Window
-> PtrConst SDL_DialogFileFilter
-> CInt
-> PtrConst CChar
-> CBool
-> IO ()
sDL_ShowOpenFileDialog = SDL_DialogFileCallback
-> Ptr Void
-> Ptr SDL_Window
-> PtrConst SDL_DialogFileFilter
-> CInt
-> PtrConst CChar
-> CBool
-> IO ()
hs_bindgen_bb279e07edff0c05
foreign import ccall safe "hs_bindgen_5f9b8c9a23decdee"
hs_bindgen_5f9b8c9a23decdee_base
:: BG.FunPtr BG.Void
-> BG.Ptr BG.Void
-> BG.Ptr BG.Void
-> BG.Ptr BG.Void
-> BG.CInt
-> BG.Ptr BG.Void
-> IO ()
hs_bindgen_5f9b8c9a23decdee
:: SDL_DialogFileCallback
-> BG.Ptr BG.Void
-> BG.Ptr SDL3.Sys.Bindgen.Video.SDL_Window
-> PtrConst.PtrConst SDL_DialogFileFilter
-> BG.CInt
-> PtrConst.PtrConst BG.CChar
-> IO ()
hs_bindgen_5f9b8c9a23decdee :: SDL_DialogFileCallback
-> Ptr Void
-> Ptr SDL_Window
-> PtrConst SDL_DialogFileFilter
-> CInt
-> PtrConst CChar
-> IO ()
hs_bindgen_5f9b8c9a23decdee =
\SDL_DialogFileCallback
x0 ->
\Ptr Void
x1 ->
\Ptr SDL_Window
x2 ->
\PtrConst SDL_DialogFileFilter
x3 ->
\CInt
x4 ->
\PtrConst CChar
x5 ->
FunPtr Void
-> Ptr Void -> Ptr Void -> Ptr Void -> CInt -> Ptr Void -> IO ()
hs_bindgen_5f9b8c9a23decdee_base
(SDL_DialogFileCallback -> FFIType SDL_DialogFileCallback
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType SDL_DialogFileCallback
x0)
(Ptr Void -> FFIType (Ptr Void)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType Ptr Void
x1)
(Ptr SDL_Window -> FFIType (Ptr SDL_Window)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType Ptr SDL_Window
x2)
(PtrConst SDL_DialogFileFilter
-> FFIType (PtrConst SDL_DialogFileFilter)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType PtrConst SDL_DialogFileFilter
x3)
(CInt -> FFIType CInt
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType CInt
x4)
(PtrConst CChar -> FFIType (PtrConst CChar)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType PtrConst CChar
x5)
sDL_ShowSaveFileDialog
:: SDL_DialogFileCallback
-> BG.Ptr BG.Void
-> BG.Ptr SDL3.Sys.Bindgen.Video.SDL_Window
-> PtrConst.PtrConst SDL_DialogFileFilter
-> BG.CInt
-> PtrConst.PtrConst BG.CChar
-> IO ()
sDL_ShowSaveFileDialog :: SDL_DialogFileCallback
-> Ptr Void
-> Ptr SDL_Window
-> PtrConst SDL_DialogFileFilter
-> CInt
-> PtrConst CChar
-> IO ()
sDL_ShowSaveFileDialog = SDL_DialogFileCallback
-> Ptr Void
-> Ptr SDL_Window
-> PtrConst SDL_DialogFileFilter
-> CInt
-> PtrConst CChar
-> IO ()
hs_bindgen_5f9b8c9a23decdee
foreign import ccall safe "hs_bindgen_ed60a60f5fbee19e"
hs_bindgen_ed60a60f5fbee19e_base
:: BG.FunPtr BG.Void
-> BG.Ptr BG.Void
-> BG.Ptr BG.Void
-> BG.Ptr BG.Void
-> BG.CBool
-> IO ()
hs_bindgen_ed60a60f5fbee19e
:: SDL_DialogFileCallback
-> BG.Ptr BG.Void
-> BG.Ptr SDL3.Sys.Bindgen.Video.SDL_Window
-> PtrConst.PtrConst BG.CChar
-> BG.CBool
-> IO ()
hs_bindgen_ed60a60f5fbee19e :: SDL_DialogFileCallback
-> Ptr Void -> Ptr SDL_Window -> PtrConst CChar -> CBool -> IO ()
hs_bindgen_ed60a60f5fbee19e =
\SDL_DialogFileCallback
x0 ->
\Ptr Void
x1 ->
\Ptr SDL_Window
x2 ->
\PtrConst CChar
x3 ->
\CBool
x4 ->
FunPtr Void -> Ptr Void -> Ptr Void -> Ptr Void -> CBool -> IO ()
hs_bindgen_ed60a60f5fbee19e_base
(SDL_DialogFileCallback -> FFIType SDL_DialogFileCallback
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType SDL_DialogFileCallback
x0)
(Ptr Void -> FFIType (Ptr Void)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType Ptr Void
x1)
(Ptr SDL_Window -> FFIType (Ptr SDL_Window)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType Ptr SDL_Window
x2)
(PtrConst CChar -> FFIType (PtrConst CChar)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType PtrConst CChar
x3)
(CBool -> FFIType CBool
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType CBool
x4)
sDL_ShowOpenFolderDialog
:: SDL_DialogFileCallback
-> BG.Ptr BG.Void
-> BG.Ptr SDL3.Sys.Bindgen.Video.SDL_Window
-> PtrConst.PtrConst BG.CChar
-> BG.CBool
-> IO ()
sDL_ShowOpenFolderDialog :: SDL_DialogFileCallback
-> Ptr Void -> Ptr SDL_Window -> PtrConst CChar -> CBool -> IO ()
sDL_ShowOpenFolderDialog =
SDL_DialogFileCallback
-> Ptr Void -> Ptr SDL_Window -> PtrConst CChar -> CBool -> IO ()
hs_bindgen_ed60a60f5fbee19e
foreign import ccall safe "hs_bindgen_af795bc446bca49d"
hs_bindgen_af795bc446bca49d_base
:: BG.CUInt
-> BG.FunPtr BG.Void
-> BG.Ptr BG.Void
-> HsBindgen.Runtime.LibC.Word32
-> IO ()
hs_bindgen_af795bc446bca49d
:: SDL_FileDialogType
-> SDL_DialogFileCallback
-> BG.Ptr BG.Void
-> SDL3.Sys.Bindgen.Properties.SDL_PropertiesID
-> IO ()
hs_bindgen_af795bc446bca49d :: SDL_FileDialogType
-> SDL_DialogFileCallback -> Ptr Void -> SDL_PropertiesID -> IO ()
hs_bindgen_af795bc446bca49d =
\SDL_FileDialogType
x0 ->
\SDL_DialogFileCallback
x1 ->
\Ptr Void
x2 ->
\SDL_PropertiesID
x3 ->
CUInt -> FunPtr Void -> Ptr Void -> Word32 -> IO ()
hs_bindgen_af795bc446bca49d_base
(SDL_FileDialogType -> FFIType SDL_FileDialogType
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType SDL_FileDialogType
x0)
(SDL_DialogFileCallback -> FFIType SDL_DialogFileCallback
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType SDL_DialogFileCallback
x1)
(Ptr Void -> FFIType (Ptr Void)
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType Ptr Void
x2)
(SDL_PropertiesID -> FFIType SDL_PropertiesID
forall a. HasFFIType a => a -> FFIType a
BG.toFFIType SDL_PropertiesID
x3)
sDL_ShowFileDialogWithProperties
:: SDL_FileDialogType
-> SDL_DialogFileCallback
-> BG.Ptr BG.Void
-> SDL3.Sys.Bindgen.Properties.SDL_PropertiesID
-> IO ()
sDL_ShowFileDialogWithProperties :: SDL_FileDialogType
-> SDL_DialogFileCallback -> Ptr Void -> SDL_PropertiesID -> IO ()
sDL_ShowFileDialogWithProperties =
SDL_FileDialogType
-> SDL_DialogFileCallback -> Ptr Void -> SDL_PropertiesID -> IO ()
hs_bindgen_af795bc446bca49d