1 2 3 4 5 6 7 8 9
{-# LANGUAGE ForeignFunctionInterface #-} module Main (main) where import qualified HsLib foreign import ccall "value" value :: Int main = print $ HsLib.value + value