我正在尝试使用sortBy根据Y> M> D优先级对出生日期列表进行排序.
由于无法设置嵌套防护装置,我想出了这种丑陋的解决方案:
sortBD (day1, month1, year1) (day2, month2, year2)
| year1 < year2 = GT
| year1 < year2 = LT -- Typo: < should be >
| year1 == year2 = if compare month1 month2 == EQ then compare day1 day2 else compare month1 month2
然而,由于非穷举模式,这会返回异常.
[编辑]:为了避免其他人遇到同样问题的混乱:上面代码中的问题是一个拼写错误,正如答案所指出的那样,而不是方法本身.