{-# LANGUAGE CApiFFI #-} {-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE TemplateHaskell #-} {-# OPTIONS_HADDOCK prune #-} module GarnetRs.Unsafe where import qualified Foreign.C as FC import qualified GHC.Ptr as Ptr import qualified HsBindgen.Runtime.Internal.CAPI import qualified HsBindgen.Runtime.Internal.HasFFIType import qualified HsBindgen.Runtime.PtrConst import Data.Void (Void) import GarnetRs import Prelude (IO) $(HsBindgen.Runtime.Internal.CAPI.addCSource (HsBindgen.Runtime.Internal.CAPI.unlines [ "#include " , "void hs_bindgen_2dfe97662a4d6377 (" , " char const *arg1" , ")" , "{" , " hello(arg1);" , "}" , "void hs_bindgen_29d823ada2bc7302 (" , " struct T const *arg1" , ")" , "{" , " hello_struct(arg1);" , "}" , "void hs_bindgen_b3f40a03f07eaa85 (" , " struct Shape const *arg1" , ")" , "{" , " hello_shape(arg1);" , "}" ])) -- __unique:__ @com_garnet_GarnetRs_Unsafe_hello@ foreign import ccall unsafe "hs_bindgen_2dfe97662a4d6377" hs_bindgen_2dfe97662a4d6377_base :: Ptr.Ptr Void -> IO () -- __unique:__ @com_garnet_GarnetRs_Unsafe_hello@ hs_bindgen_2dfe97662a4d6377 :: HsBindgen.Runtime.PtrConst.PtrConst FC.CChar -> IO () hs_bindgen_2dfe97662a4d6377 = HsBindgen.Runtime.Internal.HasFFIType.fromFFIType hs_bindgen_2dfe97662a4d6377_base {-| __C declaration:__ @hello@ __defined at:__ @garnet_rs.h 32:6@ __exported by:__ @garnet_rs.h@ -} hello :: HsBindgen.Runtime.PtrConst.PtrConst FC.CChar -- ^ __C declaration:__ @c@ -> IO () hello = hs_bindgen_2dfe97662a4d6377 -- __unique:__ @com_garnet_GarnetRs_Unsafe_hello_struct@ foreign import ccall unsafe "hs_bindgen_29d823ada2bc7302" hs_bindgen_29d823ada2bc7302_base :: Ptr.Ptr Void -> IO () -- __unique:__ @com_garnet_GarnetRs_Unsafe_hello_struct@ hs_bindgen_29d823ada2bc7302 :: HsBindgen.Runtime.PtrConst.PtrConst T -> IO () hs_bindgen_29d823ada2bc7302 = HsBindgen.Runtime.Internal.HasFFIType.fromFFIType hs_bindgen_29d823ada2bc7302_base {-| __C declaration:__ @hello_struct@ __defined at:__ @garnet_rs.h 34:6@ __exported by:__ @garnet_rs.h@ -} hello_struct :: HsBindgen.Runtime.PtrConst.PtrConst T -- ^ __C declaration:__ @t@ -> IO () hello_struct = hs_bindgen_29d823ada2bc7302 -- __unique:__ @com_garnet_GarnetRs_Unsafe_hello_shape@ foreign import ccall unsafe "hs_bindgen_b3f40a03f07eaa85" hs_bindgen_b3f40a03f07eaa85_base :: Ptr.Ptr Void -> IO () -- __unique:__ @com_garnet_GarnetRs_Unsafe_hello_shape@ hs_bindgen_b3f40a03f07eaa85 :: HsBindgen.Runtime.PtrConst.PtrConst Shape -> IO () hs_bindgen_b3f40a03f07eaa85 = HsBindgen.Runtime.Internal.HasFFIType.fromFFIType hs_bindgen_b3f40a03f07eaa85_base {-| __C declaration:__ @hello_shape@ __defined at:__ @garnet_rs.h 36:6@ __exported by:__ @garnet_rs.h@ -} hello_shape :: HsBindgen.Runtime.PtrConst.PtrConst Shape -- ^ __C declaration:__ @s@ -> IO () hello_shape = hs_bindgen_b3f40a03f07eaa85