inline-c-0.5.0.1: test/Dummy.hs

-- | This module exists because of TH staging restrictions.
module Dummy (dummyFun) where

import           Foreign.C.Types

dummyFun :: CDouble -> IO CDouble
dummyFun x = return $ cos x