1 2 3 4 5 6 7 8 9 10
{-# LANGUAGE ForeignFunctionInterface #-} module Main where main :: IO () main = foo foreign import ccall unsafe "c.h foo" foo :: IO ()