packages feed

hs-bindgen-1.0.0.0: test-artefacts/fixtures/edge-cases/adios/Example/Unsafe.hs

{-# LANGUAGE ForeignFunctionInterface #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE TemplateHaskell #-}
{-# OPTIONS_HADDOCK prune #-}

module Example.Unsafe
    ( Example.Unsafe.adio'0301s_fun
    , Example.Unsafe.cϒ
    , Example.Unsafe.拜拜
    , Example.Unsafe.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_2a3071850c230aa3 (void)"
  , "{"
  , "  return (adio\769s_fun)();"
  , "}"
  , "void hs_bindgen_1814d14d59d9daf7 (void)"
  , "{"
  , "  (\978)();"
  , "}"
  , "void hs_bindgen_c1ab9527e537714b (void)"
  , "{"
  , "  (\25308\25308)();"
  , "}"
  , "void hs_bindgen_d532055af9051fad (void)"
  , "{"
  , "  (Say\25308\25308)();"
  , "}"
  ]))

-- __unique:__ @test_edgecasesadios_Example_Unsafe_adiós_fun@
foreign import ccall unsafe "hs_bindgen_2a3071850c230aa3" hs_bindgen_2a3071850c230aa3_base ::
     IO BG.CInt

-- __unique:__ @test_edgecasesadios_Example_Unsafe_adiós_fun@
hs_bindgen_2a3071850c230aa3 :: IO BG.CInt
hs_bindgen_2a3071850c230aa3 =
  fmap BG.fromFFIType hs_bindgen_2a3071850c230aa3_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_2a3071850c230aa3

-- __unique:__ @test_edgecasesadios_Example_Unsafe_ϒ@
foreign import ccall unsafe "hs_bindgen_1814d14d59d9daf7" hs_bindgen_1814d14d59d9daf7_base ::
     IO ()

-- __unique:__ @test_edgecasesadios_Example_Unsafe_ϒ@
hs_bindgen_1814d14d59d9daf7 :: IO ()
hs_bindgen_1814d14d59d9daf7 =
  hs_bindgen_1814d14d59d9daf7_base

{-| __C declaration:__ @ϒ@

    __defined at:__ @edge-cases\/adios.h 23:6@

    __exported by:__ @edge-cases\/adios.h@
-}
cϒ :: IO ()
cϒ = hs_bindgen_1814d14d59d9daf7

-- __unique:__ @test_edgecasesadios_Example_Unsafe_拜拜@
foreign import ccall unsafe "hs_bindgen_c1ab9527e537714b" hs_bindgen_c1ab9527e537714b_base ::
     IO ()

-- __unique:__ @test_edgecasesadios_Example_Unsafe_拜拜@
hs_bindgen_c1ab9527e537714b :: IO ()
hs_bindgen_c1ab9527e537714b =
  hs_bindgen_c1ab9527e537714b_base

{-| __C declaration:__ @拜拜@

    __defined at:__ @edge-cases\/adios.h 32:6@

    __exported by:__ @edge-cases\/adios.h@
-}
拜拜 :: IO ()
拜拜 = hs_bindgen_c1ab9527e537714b

-- __unique:__ @test_edgecasesadios_Example_Unsafe_Say拜拜@
foreign import ccall unsafe "hs_bindgen_d532055af9051fad" hs_bindgen_d532055af9051fad_base ::
     IO ()

-- __unique:__ @test_edgecasesadios_Example_Unsafe_Say拜拜@
hs_bindgen_d532055af9051fad :: IO ()
hs_bindgen_d532055af9051fad =
  hs_bindgen_d532055af9051fad_base

{-| __C declaration:__ @Say拜拜@

    __defined at:__ @edge-cases\/adios.h 36:6@

    __exported by:__ @edge-cases\/adios.h@
-}
say拜拜 :: IO ()
say拜拜 = hs_bindgen_d532055af9051fad