简单的haskell单元测试
|
我想经历99个Haskell问题,我想专注于解决方案,但要进行测试。如果我有第3行as0 line文件作为第一个问题的解决方案,
myLast :: [a] -> a
myLast [x] = x
myLast (_:xs) = myLast xs
我可以为此添加的最少代码量是多少,以便可以内联添加测试并以runhaskell
运行它们?
没有找到相关结果
已邀请:
2 个回复
草票
如果您运行它,将会得到:
因为您的
无法处理
大小写(它应该,但应该抛出\'last \'之类的错误)。 但是在这里我们可以简单地调整测试,但是指定仅可以使用非空字符串(使用
组合器):
这使所有100个自动生成的测试用例通过
:
PS指定“ 5”行为的另一种方法可能是:
或更好:
宦哨抹存胳