hs-bindgen-1.0.0.0: test-artefacts/fixtures/binding-specs/fun_arg/macro/function/Example/Unsafe.hs
{-# LANGUAGE ForeignFunctionInterface #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE TemplateHaskell #-}
{-# OPTIONS_HADDOCK prune #-}
module Example.Unsafe
( Example.Unsafe.foo
, Example.Unsafe.fooA
, Example.Unsafe.fooB
, Example.Unsafe.fooC
, Example.Unsafe.fooD
, Example.Unsafe.fooE
, Example.Unsafe.bar
, Example.Unsafe.barA
, Example.Unsafe.barB
, Example.Unsafe.barC
, Example.Unsafe.barD
, Example.Unsafe.barE
)
where
import qualified HsBindgen.Runtime.Support as BG
import qualified HsBindgen.Runtime.Support.CAPI
import qualified M
import Example
import Prelude (IO)
$(HsBindgen.Runtime.Support.CAPI.addCSource (HsBindgen.Runtime.Support.CAPI.unlines
[ "#include <binding-specs/fun_arg/macro/function.h>"
, "void hs_bindgen_fbc2ec26cd297034 ("
, " MyFunction *arg1"
, ")"
, "{"
, " (foo)(arg1);"
, "}"
, "void hs_bindgen_cf67e2fc00fd28d8 ("
, " A *arg1"
, ")"
, "{"
, " (fooA)(arg1);"
, "}"
, "void hs_bindgen_269a46f9680e33ed ("
, " B *arg1"
, ")"
, "{"
, " (fooB)(arg1);"
, "}"
, "void hs_bindgen_f9bc9d37a12171dd ("
, " C *arg1"
, ")"
, "{"
, " (fooC)(arg1);"
, "}"
, "void hs_bindgen_ca21c7e4aaa33a81 ("
, " D *arg1"
, ")"
, "{"
, " (fooD)(arg1);"
, "}"
, "void hs_bindgen_e71a09bea0aef335 ("
, " E *arg1"
, ")"
, "{"
, " (fooE)(arg1);"
, "}"
, "void hs_bindgen_0fdddb4fac9b77d1 ("
, " signed int (*arg1) ("
, " signed int arg1"
, ")"
, ")"
, "{"
, " (bar)(arg1);"
, "}"
, "void hs_bindgen_bd59a5d308c55504 ("
, " A *arg1"
, ")"
, "{"
, " (barA)(arg1);"
, "}"
, "void hs_bindgen_b016bfc7a4cc0734 ("
, " B *arg1"
, ")"
, "{"
, " (barB)(arg1);"
, "}"
, "void hs_bindgen_5e40e29a3ba3186e ("
, " C *arg1"
, ")"
, "{"
, " (barC)(arg1);"
, "}"
, "void hs_bindgen_cb058763607fee19 ("
, " D *arg1"
, ")"
, "{"
, " (barD)(arg1);"
, "}"
, "void hs_bindgen_2f3d5b8e2b6dd66f ("
, " E *arg1"
, ")"
, "{"
, " (barE)(arg1);"
, "}"
]))
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_foo@
foreign import ccall unsafe "hs_bindgen_fbc2ec26cd297034" hs_bindgen_fbc2ec26cd297034_base ::
BG.FunPtr BG.Void
-> IO ()
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_foo@
hs_bindgen_fbc2ec26cd297034 ::
BG.FunPtr MyFunction
-> IO ()
hs_bindgen_fbc2ec26cd297034 =
\x0 ->
hs_bindgen_fbc2ec26cd297034_base (BG.toFFIType x0)
{-| __C declaration:__ @foo@
__defined at:__ @binding-specs\/fun_arg\/macro\/function.h 6:6@
__exported by:__ @binding-specs\/fun_arg\/macro\/function.h@
-}
foo ::
BG.FunPtr MyFunction
-- ^ __C declaration:__ @x@
-> IO ()
foo = hs_bindgen_fbc2ec26cd297034
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_fooA@
foreign import ccall unsafe "hs_bindgen_cf67e2fc00fd28d8" hs_bindgen_cf67e2fc00fd28d8_base ::
BG.FunPtr BG.Void
-> IO ()
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_fooA@
hs_bindgen_cf67e2fc00fd28d8 ::
BG.FunPtr A
-> IO ()
hs_bindgen_cf67e2fc00fd28d8 =
\x0 ->
hs_bindgen_cf67e2fc00fd28d8_base (BG.toFFIType x0)
{-| __C declaration:__ @fooA@
__defined at:__ @binding-specs\/fun_arg\/macro\/function.h 12:6@
__exported by:__ @binding-specs\/fun_arg\/macro\/function.h@
-}
fooA ::
BG.FunPtr A
-- ^ __C declaration:__ @x@
-> IO ()
fooA = hs_bindgen_cf67e2fc00fd28d8
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_fooB@
foreign import ccall unsafe "hs_bindgen_269a46f9680e33ed" hs_bindgen_269a46f9680e33ed_base ::
BG.FunPtr BG.Void
-> IO ()
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_fooB@
hs_bindgen_269a46f9680e33ed ::
BG.FunPtr B
-> IO ()
hs_bindgen_269a46f9680e33ed =
\x0 ->
hs_bindgen_269a46f9680e33ed_base (BG.toFFIType x0)
{-| __C declaration:__ @fooB@
__defined at:__ @binding-specs\/fun_arg\/macro\/function.h 13:6@
__exported by:__ @binding-specs\/fun_arg\/macro\/function.h@
-}
fooB ::
BG.FunPtr B
-- ^ __C declaration:__ @x@
-> IO ()
fooB = hs_bindgen_269a46f9680e33ed
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_fooC@
foreign import ccall unsafe "hs_bindgen_f9bc9d37a12171dd" hs_bindgen_f9bc9d37a12171dd_base ::
BG.FunPtr BG.Void
-> IO ()
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_fooC@
hs_bindgen_f9bc9d37a12171dd ::
BG.FunPtr M.C
-> IO ()
hs_bindgen_f9bc9d37a12171dd =
\x0 ->
hs_bindgen_f9bc9d37a12171dd_base (BG.toFFIType x0)
{-| __C declaration:__ @fooC@
__defined at:__ @binding-specs\/fun_arg\/macro\/function.h 33:6@
__exported by:__ @binding-specs\/fun_arg\/macro\/function.h@
-}
fooC ::
BG.FunPtr M.C
-- ^ __C declaration:__ @x@
-> IO ()
fooC = hs_bindgen_f9bc9d37a12171dd
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_fooD@
foreign import ccall unsafe "hs_bindgen_ca21c7e4aaa33a81" hs_bindgen_ca21c7e4aaa33a81_base ::
BG.FunPtr BG.Void
-> IO ()
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_fooD@
hs_bindgen_ca21c7e4aaa33a81 ::
BG.FunPtr M.D
-> IO ()
hs_bindgen_ca21c7e4aaa33a81 =
\x0 ->
hs_bindgen_ca21c7e4aaa33a81_base (BG.toFFIType x0)
{-| __C declaration:__ @fooD@
__defined at:__ @binding-specs\/fun_arg\/macro\/function.h 34:6@
__exported by:__ @binding-specs\/fun_arg\/macro\/function.h@
-}
fooD ::
BG.FunPtr M.D
-- ^ __C declaration:__ @x@
-> IO ()
fooD = hs_bindgen_ca21c7e4aaa33a81
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_fooE@
foreign import ccall unsafe "hs_bindgen_e71a09bea0aef335" hs_bindgen_e71a09bea0aef335_base ::
BG.FunPtr BG.Void
-> IO ()
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_fooE@
hs_bindgen_e71a09bea0aef335 ::
BG.FunPtr E
-> IO ()
hs_bindgen_e71a09bea0aef335 =
\x0 ->
hs_bindgen_e71a09bea0aef335_base (BG.toFFIType x0)
{-| __C declaration:__ @fooE@
__defined at:__ @binding-specs\/fun_arg\/macro\/function.h 35:6@
__exported by:__ @binding-specs\/fun_arg\/macro\/function.h@
-}
fooE ::
BG.FunPtr E
-- ^ __C declaration:__ @x@
-> IO ()
fooE = hs_bindgen_e71a09bea0aef335
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_bar@
foreign import ccall unsafe "hs_bindgen_0fdddb4fac9b77d1" hs_bindgen_0fdddb4fac9b77d1_base ::
BG.FunPtr BG.Void
-> IO ()
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_bar@
hs_bindgen_0fdddb4fac9b77d1 ::
BG.FunPtr (BG.CInt -> IO BG.CInt)
-> IO ()
hs_bindgen_0fdddb4fac9b77d1 =
\x0 ->
hs_bindgen_0fdddb4fac9b77d1_base (BG.toFFIType x0)
{-| __C declaration:__ @bar@
__defined at:__ @binding-specs\/fun_arg\/macro\/function.h 40:6@
__exported by:__ @binding-specs\/fun_arg\/macro\/function.h@
-}
bar ::
BG.FunPtr (BG.CInt -> IO BG.CInt)
-- ^ __C declaration:__ @x@
-> IO ()
bar = hs_bindgen_0fdddb4fac9b77d1
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_barA@
foreign import ccall unsafe "hs_bindgen_bd59a5d308c55504" hs_bindgen_bd59a5d308c55504_base ::
BG.FunPtr BG.Void
-> IO ()
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_barA@
hs_bindgen_bd59a5d308c55504 ::
BG.FunPtr A
-> IO ()
hs_bindgen_bd59a5d308c55504 =
\x0 ->
hs_bindgen_bd59a5d308c55504_base (BG.toFFIType x0)
{-| __C declaration:__ @barA@
__defined at:__ @binding-specs\/fun_arg\/macro\/function.h 42:6@
__exported by:__ @binding-specs\/fun_arg\/macro\/function.h@
-}
barA ::
BG.FunPtr A
-- ^ __C declaration:__ @x@
-> IO ()
barA = hs_bindgen_bd59a5d308c55504
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_barB@
foreign import ccall unsafe "hs_bindgen_b016bfc7a4cc0734" hs_bindgen_b016bfc7a4cc0734_base ::
BG.FunPtr BG.Void
-> IO ()
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_barB@
hs_bindgen_b016bfc7a4cc0734 ::
BG.FunPtr B
-> IO ()
hs_bindgen_b016bfc7a4cc0734 =
\x0 ->
hs_bindgen_b016bfc7a4cc0734_base (BG.toFFIType x0)
{-| __C declaration:__ @barB@
__defined at:__ @binding-specs\/fun_arg\/macro\/function.h 43:6@
__exported by:__ @binding-specs\/fun_arg\/macro\/function.h@
-}
barB ::
BG.FunPtr B
-- ^ __C declaration:__ @x@
-> IO ()
barB = hs_bindgen_b016bfc7a4cc0734
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_barC@
foreign import ccall unsafe "hs_bindgen_5e40e29a3ba3186e" hs_bindgen_5e40e29a3ba3186e_base ::
BG.FunPtr BG.Void
-> IO ()
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_barC@
hs_bindgen_5e40e29a3ba3186e ::
BG.FunPtr M.C
-> IO ()
hs_bindgen_5e40e29a3ba3186e =
\x0 ->
hs_bindgen_5e40e29a3ba3186e_base (BG.toFFIType x0)
{-| __C declaration:__ @barC@
__defined at:__ @binding-specs\/fun_arg\/macro\/function.h 45:6@
__exported by:__ @binding-specs\/fun_arg\/macro\/function.h@
-}
barC ::
BG.FunPtr M.C
-- ^ __C declaration:__ @x@
-> IO ()
barC = hs_bindgen_5e40e29a3ba3186e
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_barD@
foreign import ccall unsafe "hs_bindgen_cb058763607fee19" hs_bindgen_cb058763607fee19_base ::
BG.FunPtr BG.Void
-> IO ()
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_barD@
hs_bindgen_cb058763607fee19 ::
BG.FunPtr M.D
-> IO ()
hs_bindgen_cb058763607fee19 =
\x0 ->
hs_bindgen_cb058763607fee19_base (BG.toFFIType x0)
{-| __C declaration:__ @barD@
__defined at:__ @binding-specs\/fun_arg\/macro\/function.h 46:6@
__exported by:__ @binding-specs\/fun_arg\/macro\/function.h@
-}
barD ::
BG.FunPtr M.D
-- ^ __C declaration:__ @x@
-> IO ()
barD = hs_bindgen_cb058763607fee19
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_barE@
foreign import ccall unsafe "hs_bindgen_2f3d5b8e2b6dd66f" hs_bindgen_2f3d5b8e2b6dd66f_base ::
BG.FunPtr BG.Void
-> IO ()
-- __unique:__ @test_bindingspecsfun_argmacrofu_Example_Unsafe_barE@
hs_bindgen_2f3d5b8e2b6dd66f ::
BG.FunPtr E
-> IO ()
hs_bindgen_2f3d5b8e2b6dd66f =
\x0 ->
hs_bindgen_2f3d5b8e2b6dd66f_base (BG.toFFIType x0)
{-| __C declaration:__ @barE@
__defined at:__ @binding-specs\/fun_arg\/macro\/function.h 47:6@
__exported by:__ @binding-specs\/fun_arg\/macro\/function.h@
-}
barE ::
BG.FunPtr E
-- ^ __C declaration:__ @x@
-> IO ()
barE = hs_bindgen_2f3d5b8e2b6dd66f