1 2 3 4 5 6 7
{-# LANGUAGE ForeignFunctionInterface #-} module T4464H where f :: Int -> Int f x = x + 1 foreign export ccall f :: Int -> Int