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对哈斯克尔来说是比较新的。想知道为什么在尝试加载之后收到以下错误消息。
Parse error in pattern: move1发布于 2015-02-11 00:20:18
move1不是一个数据构造函数(这是允许您在其上进行模式匹配的构造函数),实际上不可能是这样,因为它们必须以大写字母开头。用数据声明中的构造函数Move替换它,错误就会消失。
您可能仍然会收到一些警告,如"code1已定义但未使用“,如果您真的不关心内容,则可以通过将模式更改为(Move _ _ _)来消除这些警告。
https://stackoverflow.com/questions/28444347
复制相似问题