haskell - 实例声明Haskell出现编译错误

Question

我遇到奇怪的编译错误。

import Foreign
import Foreign.C.Types
import Foreign.C.String

newtype Test = Test {testList :: [CShort]}   deriving (Show)    

instance Storable Test where
    sizeOf _ =  16
    peek _ = error "peek is not implemented"
    alignment _ = alignment (undefined :: CShort)

得到了

TestICH.hsc:9:16: parse error on input `='

9:16是 peek _ = er{here}ror "peek is not implemented"，在 error一词的中间吗？这怎么可能？

更新
关闭，麻烦在于标签

Answer 1

检查sizeOf，peek和alignment声明的缩进。它们都应该缩进相同的级别。最有可能的是，一个或多个声明使用制表符进行缩进，而其他声明则使用空格，这将导致此错误。编写Haskell时，最好将编辑器配置为始终使用空格而不是制表符，以避免出现此问题。