Safe.hs

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

module Example.Safe
    ( Example.Safe.foo
    , Example.Safe.bar
    , Example.Safe.dash
    , Example.Safe.quux
    , Example.Safe.heq
    )
  where

import qualified HsBindgen.Runtime.Support as BG
import qualified HsBindgen.Runtime.Support.CAPI
import Example
import Prelude (IO)

$(HsBindgen.Runtime.Support.CAPI.addCSource (HsBindgen.Runtime.Support.CAPI.unlines
  [ "#include <macros/reparse/gnu_attributes.h>"
  , "void hs_bindgen_702437d53bf7e32f ("
  , "  BOOL arg1"
  , ")"
  , "{"
  , "  (foo)(arg1);"
  , "}"
  , "void hs_bindgen_432c6480e8c1355b ("
  , "  BOOL arg1"
  , ")"
  , "{"
  , "  (bar)(arg1);"
  , "}"
  , "void hs_bindgen_b7cd534964204668 ("
  , "  BOOL arg1"
  , ")"
  , "{"
  , "  (dash)(arg1);"
  , "}"
  , "void hs_bindgen_24c242811e7f290b ("
  , "  BOOL arg1"
  , ")"
  , "{"
  , "  (quux)(arg1);"
  , "}"
  , "void hs_bindgen_9bea1bb33c269bc2 ("
  , "  BOOL arg1"
  , ")"
  , "{"
  , "  (heq)(arg1);"
  , "}"
  ]))

-- __unique:__ @test_macrosreparsegnu_attributes_Example_Safe_foo@
foreign import ccall safe "hs_bindgen_702437d53bf7e32f" hs_bindgen_702437d53bf7e32f_base ::
     BG.CInt
  -> IO ()

-- __unique:__ @test_macrosreparsegnu_attributes_Example_Safe_foo@
hs_bindgen_702437d53bf7e32f ::
     BOOL
  -> IO ()
hs_bindgen_702437d53bf7e32f =
  \x0 ->
    hs_bindgen_702437d53bf7e32f_base (BG.toFFIType x0)

{-| __C declaration:__ @foo@

    __defined at:__ @macros\/reparse\/gnu_attributes.h 3:6@

    __exported by:__ @macros\/reparse\/gnu_attributes.h@
-}
foo ::
     BOOL
  -> IO ()
foo = hs_bindgen_702437d53bf7e32f

-- __unique:__ @test_macrosreparsegnu_attributes_Example_Safe_bar@
foreign import ccall safe "hs_bindgen_432c6480e8c1355b" hs_bindgen_432c6480e8c1355b_base ::
     BG.CInt
  -> IO ()

-- __unique:__ @test_macrosreparsegnu_attributes_Example_Safe_bar@
hs_bindgen_432c6480e8c1355b ::
     BOOL
  -> IO ()
hs_bindgen_432c6480e8c1355b =
  \x0 ->
    hs_bindgen_432c6480e8c1355b_base (BG.toFFIType x0)

{-| __C declaration:__ @bar@

    __defined at:__ @macros\/reparse\/gnu_attributes.h 6:46@

    __exported by:__ @macros\/reparse\/gnu_attributes.h@
-}
bar ::
     BOOL
  -> IO ()
bar = hs_bindgen_432c6480e8c1355b

-- __unique:__ @test_macrosreparsegnu_attributes_Example_Safe_dash@
foreign import ccall safe "hs_bindgen_b7cd534964204668" hs_bindgen_b7cd534964204668_base ::
     BG.CInt
  -> IO ()

-- __unique:__ @test_macrosreparsegnu_attributes_Example_Safe_dash@
hs_bindgen_b7cd534964204668 ::
     BOOL
  -> IO ()
hs_bindgen_b7cd534964204668 =
  \x0 ->
    hs_bindgen_b7cd534964204668_base (BG.toFFIType x0)

{-| __C declaration:__ @dash@

    __defined at:__ @macros\/reparse\/gnu_attributes.h 7:46@

    __exported by:__ @macros\/reparse\/gnu_attributes.h@
-}
dash ::
     BOOL
  -> IO ()
dash = hs_bindgen_b7cd534964204668

-- __unique:__ @test_macrosreparsegnu_attributes_Example_Safe_quux@
foreign import ccall safe "hs_bindgen_24c242811e7f290b" hs_bindgen_24c242811e7f290b_base ::
     BG.CInt
  -> IO ()

-- __unique:__ @test_macrosreparsegnu_attributes_Example_Safe_quux@
hs_bindgen_24c242811e7f290b ::
     BOOL
  -> IO ()
hs_bindgen_24c242811e7f290b =
  \x0 ->
    hs_bindgen_24c242811e7f290b_base (BG.toFFIType x0)

{-| __C declaration:__ @quux@

    __defined at:__ @macros\/reparse\/gnu_attributes.h 11:13@

    __exported by:__ @macros\/reparse\/gnu_attributes.h@
-}
quux ::
     BOOL
  -> IO ()
quux = hs_bindgen_24c242811e7f290b

-- __unique:__ @test_macrosreparsegnu_attributes_Example_Safe_heq@
foreign import ccall safe "hs_bindgen_9bea1bb33c269bc2" hs_bindgen_9bea1bb33c269bc2_base ::
     BG.CInt
  -> IO ()

-- __unique:__ @test_macrosreparsegnu_attributes_Example_Safe_heq@
hs_bindgen_9bea1bb33c269bc2 ::
     BOOL
  -> IO ()
hs_bindgen_9bea1bb33c269bc2 =
  \x0 ->
    hs_bindgen_9bea1bb33c269bc2_base (BG.toFFIType x0)

{-| __C declaration:__ @heq@

    __defined at:__ @macros\/reparse\/gnu_attributes.h 12:13@

    __exported by:__ @macros\/reparse\/gnu_attributes.h@
-}
heq ::
     BOOL
  -> IO ()
heq = hs_bindgen_9bea1bb33c269bc2