0

正如问题所述,我有一些在 leksah 中编译但不使用ghc --make filename.hs

编码:

module Main (
    main
) where

pair a b = (Pair (a, b))

newtype Pair a b = Pair (a,b)  deriving (Eq,Show)

instance (Num a,Num b) => Num (Pair a b) where
   Pair (a,b) + Pair (c,d) = Pair (a+c,b+d)
   Pair (a,b) * Pair (c,d) = Pair (a*c,b*d)
   Pair (a,b) - Pair (c,d) = Pair (a-c,b-d)
   abs    (Pair (a,b)) = Pair (abs a,    abs b) 
   signum (Pair (a,b)) = Pair (signum a, signum b) 
   fromInteger i = Pair (fromInteger i, fromInteger i)

main = do   
            a <- return (pair 1 3)   
            print a
            print "haha"  
            print 3.2  
            print [3,4,3]  

是否需要调用一个选项才能使其运行ghc --make

免责声明:我没有制作这对 newtype

编辑:

使用ghc --make Bignumber.hs(Bignumber.hs 是文件名)时,输出为

[1 of 1] Compiling Main             ( BigNumber.hs, BigNumber.o )

BigNumber.hs:20:13: parse error on input `print'
4

1 回答 1

2

检查你的缩进:也许你正在混合制表符和空格,而 ghc 解释的方式与 leksah 不同?我没有看到关于解析错误的另一种解释print

于 2014-05-09T00:20:45.140 回答