Add.hs
モジュール名を宣言します。
-- Notice the module name matches the file name, this is typically required
module Add where
add :: Integer -> Integer -> Integer
add x y = x + y
そして、Test.hsで、関数がどのモジュールから来ているかを伝えます。
-- Notice we didn't declare a module name, so it defaults to 'Main'
import Add
import Test.QuickCheck
main = quickCheck (\ x y -> x > 0 && y > 0 ==> add x y > x && add x y > y)
これで、テストをコンパイルして実行できます。
$ ghc Test.hs
[1 of 2] Compiling Add ( Add.hs, Add.o )
[2 of 2] Compiling Main ( Test.hs, Test.o )
Linking Test ...
$ ./Test
+++ OK, passed 100 tests.
編集:
また、GHCiの内部で作業していて、上記のようにターミナルからコンパイルする場合は、次のことができます。
... run "ghci Test.hs" ...
> main
+++ OK, passed 100 tests.