hs-bindgen-1.0.0.0: test-artefacts/fixtures/macros/macro_in_fundecl.2.raw/Example/FunPtr.hs
{-# LANGUAGE DataKinds #-}
{-# LANGUAGE ForeignFunctionInterface #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE TemplateHaskell #-}
{-# OPTIONS_HADDOCK prune #-}
module Example.FunPtr
( Example.FunPtr.quux
, Example.FunPtr.wam
, Example.FunPtr.foo1
, Example.FunPtr.foo2
, Example.FunPtr.foo3
, Example.FunPtr.bar1
, Example.FunPtr.bar2
, Example.FunPtr.bar3
, Example.FunPtr.bar4
, Example.FunPtr.baz1
, Example.FunPtr.baz2
, Example.FunPtr.baz3
, Example.FunPtr.no_args_no_void
)
where
import qualified HsBindgen.Runtime.ConstantArray as CA
import qualified HsBindgen.Runtime.Support as BG
import qualified HsBindgen.Runtime.Support.CAPI
import Prelude (IO, fmap)
$(HsBindgen.Runtime.Support.CAPI.addCSource (HsBindgen.Runtime.Support.CAPI.unlines
[ "#include <macros/macro_in_fundecl.h>"
, "/* test_macrosmacro_in_fundecl_2_raw_Example_get_quux */"
, "__attribute__ ((const))"
, "char (*hs_bindgen_74169d8db55aee29 (void)) ("
, " float arg1,"
, " char arg2"
, ")"
, "{"
, " return &quux;"
, "}"
, "/* test_macrosmacro_in_fundecl_2_raw_Example_get_wam */"
, "__attribute__ ((const))"
, "char *(*hs_bindgen_5181a3906e0dbcd0 (void)) ("
, " float arg1,"
, " char *arg2"
, ")"
, "{"
, " return &wam;"
, "}"
, "/* test_macrosmacro_in_fundecl_2_raw_Example_get_foo1 */"
, "__attribute__ ((const))"
, "char *(*hs_bindgen_a36f322a391d1892 (void)) ("
, " float arg1,"
, " signed int (*arg2) ("
, " signed int arg1"
, ")"
, ")"
, "{"
, " return &foo1;"
, "}"
, "/* test_macrosmacro_in_fundecl_2_raw_Example_get_foo2 */"
, "__attribute__ ((const))"
, "char *(*hs_bindgen_d4a2d20bdafd587c (void)) ("
, " float arg1,"
, " signed int (*arg2) ("
, " signed int arg1"
, ")"
, ")"
, "{"
, " return &foo2;"
, "}"
, "/* test_macrosmacro_in_fundecl_2_raw_Example_get_foo3 */"
, "__attribute__ ((const))"
, "char *(*hs_bindgen_e12635d17ba76dbe (void)) ("
, " float arg1,"
, " signed int (*arg2) ("
, " signed int arg1"
, ")"
, ")"
, "{"
, " return &foo3;"
, "}"
, "/* test_macrosmacro_in_fundecl_2_raw_Example_get_bar1 */"
, "__attribute__ ((const))"
, "signed int (*(*hs_bindgen_0d4abdd006893d05 (void)) ("
, " signed long arg1"
, ")) ("
, " signed short arg1"
, ")"
, "{"
, " return &bar1;"
, "}"
, "/* test_macrosmacro_in_fundecl_2_raw_Example_get_bar2 */"
, "__attribute__ ((const))"
, "signed int (*(*hs_bindgen_48eea819ab113ebd (void)) ("
, " signed long arg1"
, ")) ("
, " signed short arg1"
, ")"
, "{"
, " return &bar2;"
, "}"
, "/* test_macrosmacro_in_fundecl_2_raw_Example_get_bar3 */"
, "__attribute__ ((const))"
, "signed int (*(*hs_bindgen_14e5e584697348b2 (void)) ("
, " signed long arg1"
, ")) ("
, " signed short arg1"
, ")"
, "{"
, " return &bar3;"
, "}"
, "/* test_macrosmacro_in_fundecl_2_raw_Example_get_bar4 */"
, "__attribute__ ((const))"
, "signed int (*(*hs_bindgen_84c4ab01f92c9531 (void)) ("
, " signed long arg1"
, ")) ("
, " signed short arg1"
, ")"
, "{"
, " return &bar4;"
, "}"
, "/* test_macrosmacro_in_fundecl_2_raw_Example_get_baz1 */"
, "__attribute__ ((const))"
, "signed int (*(*hs_bindgen_735e74a32eb70545 (void)) ("
, " signed int const arg1"
, "))[2][3]"
, "{"
, " return &baz1;"
, "}"
, "/* test_macrosmacro_in_fundecl_2_raw_Example_get_baz2 */"
, "__attribute__ ((const))"
, "signed int (*(*hs_bindgen_e99b238adefb8ed5 (void)) ("
, " signed int const arg1"
, "))[2][3]"
, "{"
, " return &baz2;"
, "}"
, "/* test_macrosmacro_in_fundecl_2_raw_Example_get_baz3 */"
, "__attribute__ ((const))"
, "signed int (*(*hs_bindgen_b00b767b92358e5e (void)) ("
, " signed int const arg1"
, "))[2][3]"
, "{"
, " return &baz3;"
, "}"
, "/* test_macrosmacro_in_fundecl_2_raw_Example_get_no_args_no_void */"
, "__attribute__ ((const))"
, "signed int (*hs_bindgen_d6825192c2bff8ef (void)) (void)"
, "{"
, " return &no_args_no_void;"
, "}"
]))
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_quux@
foreign import ccall unsafe "hs_bindgen_74169d8db55aee29" hs_bindgen_74169d8db55aee29_base ::
IO (BG.FunPtr BG.Void)
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_quux@
hs_bindgen_74169d8db55aee29 :: IO (BG.FunPtr (BG.CFloat -> BG.CChar -> IO BG.CChar))
hs_bindgen_74169d8db55aee29 =
fmap BG.fromFFIType hs_bindgen_74169d8db55aee29_base
{-# NOINLINE quux #-}
{-| __C declaration:__ @quux@
__defined at:__ @macros\/macro_in_fundecl.h 12:6@
__exported by:__ @macros\/macro_in_fundecl.h@
-}
quux :: BG.FunPtr (BG.CFloat -> BG.CChar -> IO BG.CChar)
quux = BG.unsafePerformIO hs_bindgen_74169d8db55aee29
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_wam@
foreign import ccall unsafe "hs_bindgen_5181a3906e0dbcd0" hs_bindgen_5181a3906e0dbcd0_base ::
IO (BG.FunPtr BG.Void)
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_wam@
hs_bindgen_5181a3906e0dbcd0 :: IO (BG.FunPtr (BG.CFloat -> BG.Ptr BG.CChar -> IO (BG.Ptr BG.CChar)))
hs_bindgen_5181a3906e0dbcd0 =
fmap BG.fromFFIType hs_bindgen_5181a3906e0dbcd0_base
{-# NOINLINE wam #-}
{-| __C declaration:__ @wam@
__defined at:__ @macros\/macro_in_fundecl.h 13:4@
__exported by:__ @macros\/macro_in_fundecl.h@
-}
wam :: BG.FunPtr (BG.CFloat -> BG.Ptr BG.CChar -> IO (BG.Ptr BG.CChar))
wam = BG.unsafePerformIO hs_bindgen_5181a3906e0dbcd0
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_foo1@
foreign import ccall unsafe "hs_bindgen_a36f322a391d1892" hs_bindgen_a36f322a391d1892_base ::
IO (BG.FunPtr BG.Void)
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_foo1@
hs_bindgen_a36f322a391d1892 :: IO (BG.FunPtr (BG.CFloat -> BG.FunPtr (BG.CInt -> IO BG.CInt) -> IO (BG.Ptr BG.CChar)))
hs_bindgen_a36f322a391d1892 =
fmap BG.fromFFIType hs_bindgen_a36f322a391d1892_base
{-# NOINLINE foo1 #-}
{-| __C declaration:__ @foo1@
__defined at:__ @macros\/macro_in_fundecl.h 16:7@
__exported by:__ @macros\/macro_in_fundecl.h@
-}
foo1 :: BG.FunPtr (BG.CFloat -> BG.FunPtr (BG.CInt -> IO BG.CInt) -> IO (BG.Ptr BG.CChar))
foo1 = BG.unsafePerformIO hs_bindgen_a36f322a391d1892
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_foo2@
foreign import ccall unsafe "hs_bindgen_d4a2d20bdafd587c" hs_bindgen_d4a2d20bdafd587c_base ::
IO (BG.FunPtr BG.Void)
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_foo2@
hs_bindgen_d4a2d20bdafd587c :: IO (BG.FunPtr (BG.CFloat -> BG.FunPtr (BG.CInt -> IO BG.CInt) -> IO (BG.Ptr BG.CChar)))
hs_bindgen_d4a2d20bdafd587c =
fmap BG.fromFFIType hs_bindgen_d4a2d20bdafd587c_base
{-# NOINLINE foo2 #-}
{-| __C declaration:__ @foo2@
__defined at:__ @macros\/macro_in_fundecl.h 17:7@
__exported by:__ @macros\/macro_in_fundecl.h@
-}
foo2 :: BG.FunPtr (BG.CFloat -> BG.FunPtr (BG.CInt -> IO BG.CInt) -> IO (BG.Ptr BG.CChar))
foo2 = BG.unsafePerformIO hs_bindgen_d4a2d20bdafd587c
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_foo3@
foreign import ccall unsafe "hs_bindgen_e12635d17ba76dbe" hs_bindgen_e12635d17ba76dbe_base ::
IO (BG.FunPtr BG.Void)
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_foo3@
hs_bindgen_e12635d17ba76dbe :: IO (BG.FunPtr (BG.CFloat -> BG.FunPtr (BG.CInt -> IO BG.CInt) -> IO (BG.Ptr BG.CChar)))
hs_bindgen_e12635d17ba76dbe =
fmap BG.fromFFIType hs_bindgen_e12635d17ba76dbe_base
{-# NOINLINE foo3 #-}
{-| __C declaration:__ @foo3@
__defined at:__ @macros\/macro_in_fundecl.h 18:4@
__exported by:__ @macros\/macro_in_fundecl.h@
-}
foo3 :: BG.FunPtr (BG.CFloat -> BG.FunPtr (BG.CInt -> IO BG.CInt) -> IO (BG.Ptr BG.CChar))
foo3 = BG.unsafePerformIO hs_bindgen_e12635d17ba76dbe
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_bar1@
foreign import ccall unsafe "hs_bindgen_0d4abdd006893d05" hs_bindgen_0d4abdd006893d05_base ::
IO (BG.FunPtr BG.Void)
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_bar1@
hs_bindgen_0d4abdd006893d05 :: IO (BG.FunPtr (BG.CLong -> IO (BG.FunPtr (BG.CShort -> IO BG.CInt))))
hs_bindgen_0d4abdd006893d05 =
fmap BG.fromFFIType hs_bindgen_0d4abdd006893d05_base
{-# NOINLINE bar1 #-}
{-| __C declaration:__ @bar1@
__defined at:__ @macros\/macro_in_fundecl.h 21:7@
__exported by:__ @macros\/macro_in_fundecl.h@
-}
bar1 :: BG.FunPtr (BG.CLong -> IO (BG.FunPtr (BG.CShort -> IO BG.CInt)))
bar1 = BG.unsafePerformIO hs_bindgen_0d4abdd006893d05
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_bar2@
foreign import ccall unsafe "hs_bindgen_48eea819ab113ebd" hs_bindgen_48eea819ab113ebd_base ::
IO (BG.FunPtr BG.Void)
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_bar2@
hs_bindgen_48eea819ab113ebd :: IO (BG.FunPtr (BG.CLong -> IO (BG.FunPtr (BG.CShort -> IO BG.CInt))))
hs_bindgen_48eea819ab113ebd =
fmap BG.fromFFIType hs_bindgen_48eea819ab113ebd_base
{-# NOINLINE bar2 #-}
{-| __C declaration:__ @bar2@
__defined at:__ @macros\/macro_in_fundecl.h 22:7@
__exported by:__ @macros\/macro_in_fundecl.h@
-}
bar2 :: BG.FunPtr (BG.CLong -> IO (BG.FunPtr (BG.CShort -> IO BG.CInt)))
bar2 = BG.unsafePerformIO hs_bindgen_48eea819ab113ebd
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_bar3@
foreign import ccall unsafe "hs_bindgen_14e5e584697348b2" hs_bindgen_14e5e584697348b2_base ::
IO (BG.FunPtr BG.Void)
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_bar3@
hs_bindgen_14e5e584697348b2 :: IO (BG.FunPtr (BG.CLong -> IO (BG.FunPtr (BG.CShort -> IO BG.CInt))))
hs_bindgen_14e5e584697348b2 =
fmap BG.fromFFIType hs_bindgen_14e5e584697348b2_base
{-# NOINLINE bar3 #-}
{-| __C declaration:__ @bar3@
__defined at:__ @macros\/macro_in_fundecl.h 23:7@
__exported by:__ @macros\/macro_in_fundecl.h@
-}
bar3 :: BG.FunPtr (BG.CLong -> IO (BG.FunPtr (BG.CShort -> IO BG.CInt)))
bar3 = BG.unsafePerformIO hs_bindgen_14e5e584697348b2
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_bar4@
foreign import ccall unsafe "hs_bindgen_84c4ab01f92c9531" hs_bindgen_84c4ab01f92c9531_base ::
IO (BG.FunPtr BG.Void)
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_bar4@
hs_bindgen_84c4ab01f92c9531 :: IO (BG.FunPtr (BG.CLong -> IO (BG.FunPtr (BG.CShort -> IO BG.CInt))))
hs_bindgen_84c4ab01f92c9531 =
fmap BG.fromFFIType hs_bindgen_84c4ab01f92c9531_base
{-# NOINLINE bar4 #-}
{-| __C declaration:__ @bar4@
__defined at:__ @macros\/macro_in_fundecl.h 24:5@
__exported by:__ @macros\/macro_in_fundecl.h@
-}
bar4 :: BG.FunPtr (BG.CLong -> IO (BG.FunPtr (BG.CShort -> IO BG.CInt)))
bar4 = BG.unsafePerformIO hs_bindgen_84c4ab01f92c9531
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_baz1@
foreign import ccall unsafe "hs_bindgen_735e74a32eb70545" hs_bindgen_735e74a32eb70545_base ::
IO (BG.FunPtr BG.Void)
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_baz1@
hs_bindgen_735e74a32eb70545 :: IO (BG.FunPtr (BG.CInt -> IO (BG.Ptr (CA.ConstantArray 2 (CA.ConstantArray 3 BG.CInt)))))
hs_bindgen_735e74a32eb70545 =
fmap BG.fromFFIType hs_bindgen_735e74a32eb70545_base
{-# NOINLINE baz1 #-}
{-| __C declaration:__ @baz1@
__defined at:__ @macros\/macro_in_fundecl.h 27:7@
__exported by:__ @macros\/macro_in_fundecl.h@
-}
baz1 :: BG.FunPtr (BG.CInt -> IO (BG.Ptr (CA.ConstantArray 2 (CA.ConstantArray 3 BG.CInt))))
baz1 = BG.unsafePerformIO hs_bindgen_735e74a32eb70545
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_baz2@
foreign import ccall unsafe "hs_bindgen_e99b238adefb8ed5" hs_bindgen_e99b238adefb8ed5_base ::
IO (BG.FunPtr BG.Void)
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_baz2@
hs_bindgen_e99b238adefb8ed5 :: IO (BG.FunPtr (BG.CInt -> IO (BG.Ptr (CA.ConstantArray 2 (CA.ConstantArray 3 BG.CInt)))))
hs_bindgen_e99b238adefb8ed5 =
fmap BG.fromFFIType hs_bindgen_e99b238adefb8ed5_base
{-# NOINLINE baz2 #-}
{-| __C declaration:__ @baz2@
__defined at:__ @macros\/macro_in_fundecl.h 35:7@
__exported by:__ @macros\/macro_in_fundecl.h@
-}
baz2 :: BG.FunPtr (BG.CInt -> IO (BG.Ptr (CA.ConstantArray 2 (CA.ConstantArray 3 BG.CInt))))
baz2 = BG.unsafePerformIO hs_bindgen_e99b238adefb8ed5
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_baz3@
foreign import ccall unsafe "hs_bindgen_b00b767b92358e5e" hs_bindgen_b00b767b92358e5e_base ::
IO (BG.FunPtr BG.Void)
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_baz3@
hs_bindgen_b00b767b92358e5e :: IO (BG.FunPtr (BG.CInt -> IO (BG.Ptr (CA.ConstantArray 2 (CA.ConstantArray 3 BG.CInt)))))
hs_bindgen_b00b767b92358e5e =
fmap BG.fromFFIType hs_bindgen_b00b767b92358e5e_base
{-# NOINLINE baz3 #-}
{-| __C declaration:__ @baz3@
__defined at:__ @macros\/macro_in_fundecl.h 43:5@
__exported by:__ @macros\/macro_in_fundecl.h@
-}
baz3 :: BG.FunPtr (BG.CInt -> IO (BG.Ptr (CA.ConstantArray 2 (CA.ConstantArray 3 BG.CInt))))
baz3 = BG.unsafePerformIO hs_bindgen_b00b767b92358e5e
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_no_args_no_void@
foreign import ccall unsafe "hs_bindgen_d6825192c2bff8ef" hs_bindgen_d6825192c2bff8ef_base ::
IO (BG.FunPtr BG.Void)
-- __unique:__ @test_macrosmacro_in_fundecl_2_raw_Example_get_no_args_no_void@
hs_bindgen_d6825192c2bff8ef :: IO (BG.FunPtr (IO BG.CInt))
hs_bindgen_d6825192c2bff8ef =
fmap BG.fromFFIType hs_bindgen_d6825192c2bff8ef_base
{-# NOINLINE no_args_no_void #-}
{-| __C declaration:__ @no_args_no_void@
__defined at:__ @macros\/macro_in_fundecl.h 53:3@
__exported by:__ @macros\/macro_in_fundecl.h@
-}
no_args_no_void :: BG.FunPtr (IO BG.CInt)
no_args_no_void =
BG.unsafePerformIO hs_bindgen_d6825192c2bff8ef