测试函数时在haskell中不断获取匹配错误

这就是函数

这就是错误所在

如何使测试仪正常工作

---

当然，它是-在您的

testRevDigits

中，您匹配的是

[d]

-这意味着输入元组的第二个组件将仅适用于长度为1的列表，但您会传入更长的列表

我最好的猜测是你想要这个：

testRevDigits :: (Integer, [Integer]) -> Bool
testRevDigits (n,expected) = toRevDigits n == expected

testRevDigits :: (Integer, [Integer]) -> Bool
testRevDigits (n, [d]) = toRevDigits n ==[n]

ex2Tests :: [Test]
ex2Tests = [Test "toRevDigits test" testRevDigits
            [(321,[1,2,3]), (0,[]), ((-17),[])]
           ]

*** Exception: LAB8Tests.hs:27:1-44: Non-exhaustive patterns in function         testRevDigits

testRevDigits :: (Integer, [Integer]) -> Bool
testRevDigits (n,expected) = toRevDigits n == expected