blob: 1e8d2d47555243a338877a33a48349e4e7b987f0 (
plain) (
blame)
1
2
3
4
5
6
7
|
{-# LANGUAGE ForeignFunctionInterface #-}
module TestSubLib (messageEnd) where
messageEnd :: String
messageEnd = "world " ++ show (foo 10)
foreign import ccall foo :: Int -> Int
|