-- | A module provinding a linker hook that can be referenced to ensure
-- that the runtime support files are linked.
--
-- NOTE. This file should not be loaded from ghci
--
module Feldspar.Runtime
( feldspar_compiler_hook
)
where
feldspar_compiler_hook :: Int
feldspar_compiler_hook = sum [ feldspar_c99_hook
, feldspar_ivar_hook
, feldspar_taskpool_hook
]
foreign import ccall safe "feldspar_c99_hook"
feldspar_c99_hook :: Int
foreign import ccall safe "feldspar_ivar_hook"
feldspar_ivar_hook :: Int
foreign import ccall safe "feldspar_taskpool_hook"
feldspar_taskpool_hook :: Int