Haskell: 模式 3 中的解析错误

Haskell: parse error in pattern 3

data Peg = Red | Green | Blue | Yellow | Orange | Purple
    deriving (Show, Eq, Ord)

type Code = [Peg]

data Move = Move Code Int Int
      deriving (Show, Eq)

isConsistent :: Move -> Code -> Bool
isConsistent (move1 code1 num1 num2) code2 = True --parse error here

Haskell 相对较新。想知道为什么我在尝试加载后收到以下错误消息。

Parse error in pattern: move1

move1 不是数据构造函数(您可以在其上进行模式匹配),实际上不可能,因为它们必须以大写字母开头。用数据声明中的构造函数 Move 替换它,错误应该消失。

您可能仍会收到一些警告,例如 "code1 defined but not used" 如果您真的不关心内容,可以通过将模式更改为 (Move _ _ _) 来摆脱它们。