hs-bindgen-1.0.0.0: test-artefacts/fixtures/edge-cases/adios/Example/Safe.hs
{-# LANGUAGE ForeignFunctionInterface #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE TemplateHaskell #-}
{-# OPTIONS_HADDOCK prune #-}
module Example.Safe
( Example.Safe.adio'0301s_fun
, Example.Safe.cϒ
, Example.Safe.拜拜
, Example.Safe.say拜拜
)
where
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 <edge-cases/adios.h>"
, "signed int hs_bindgen_2f6d4be143076044 (void)"
, "{"
, " return (adio\769s_fun)();"
, "}"
, "void hs_bindgen_2010521804ef9a6e (void)"
, "{"
, " (\978)();"
, "}"
, "void hs_bindgen_3bc3e53cc82c9580 (void)"
, "{"
, " (\25308\25308)();"
, "}"
, "void hs_bindgen_ad8eb47027b2d49d (void)"
, "{"
, " (Say\25308\25308)();"
, "}"
]))
-- __unique:__ @test_edgecasesadios_Example_Safe_adiós_fun@
foreign import ccall safe "hs_bindgen_2f6d4be143076044" hs_bindgen_2f6d4be143076044_base ::
IO BG.CInt
-- __unique:__ @test_edgecasesadios_Example_Safe_adiós_fun@
hs_bindgen_2f6d4be143076044 :: IO BG.CInt
hs_bindgen_2f6d4be143076044 =
fmap BG.fromFFIType hs_bindgen_2f6d4be143076044_base
{-| __C declaration:__ @adiós_fun@
__defined at:__ @edge-cases\/adios.h 12:5@
__exported by:__ @edge-cases\/adios.h@
-}
adio'0301s_fun :: IO BG.CInt
adio'0301s_fun = hs_bindgen_2f6d4be143076044
-- __unique:__ @test_edgecasesadios_Example_Safe_ϒ@
foreign import ccall safe "hs_bindgen_2010521804ef9a6e" hs_bindgen_2010521804ef9a6e_base ::
IO ()
-- __unique:__ @test_edgecasesadios_Example_Safe_ϒ@
hs_bindgen_2010521804ef9a6e :: IO ()
hs_bindgen_2010521804ef9a6e =
hs_bindgen_2010521804ef9a6e_base
{-| __C declaration:__ @ϒ@
__defined at:__ @edge-cases\/adios.h 23:6@
__exported by:__ @edge-cases\/adios.h@
-}
cϒ :: IO ()
cϒ = hs_bindgen_2010521804ef9a6e
-- __unique:__ @test_edgecasesadios_Example_Safe_拜拜@
foreign import ccall safe "hs_bindgen_3bc3e53cc82c9580" hs_bindgen_3bc3e53cc82c9580_base ::
IO ()
-- __unique:__ @test_edgecasesadios_Example_Safe_拜拜@
hs_bindgen_3bc3e53cc82c9580 :: IO ()
hs_bindgen_3bc3e53cc82c9580 =
hs_bindgen_3bc3e53cc82c9580_base
{-| __C declaration:__ @拜拜@
__defined at:__ @edge-cases\/adios.h 32:6@
__exported by:__ @edge-cases\/adios.h@
-}
拜拜 :: IO ()
拜拜 = hs_bindgen_3bc3e53cc82c9580
-- __unique:__ @test_edgecasesadios_Example_Safe_Say拜拜@
foreign import ccall safe "hs_bindgen_ad8eb47027b2d49d" hs_bindgen_ad8eb47027b2d49d_base ::
IO ()
-- __unique:__ @test_edgecasesadios_Example_Safe_Say拜拜@
hs_bindgen_ad8eb47027b2d49d :: IO ()
hs_bindgen_ad8eb47027b2d49d =
hs_bindgen_ad8eb47027b2d49d_base
{-| __C declaration:__ @Say拜拜@
__defined at:__ @edge-cases\/adios.h 36:6@
__exported by:__ @edge-cases\/adios.h@
-}
say拜拜 :: IO ()
say拜拜 = hs_bindgen_ad8eb47027b2d49d