＆＃34;解析输入错误 - ＆gt;＆＃34;在哈斯克尔

Question

我正在编写一个函数，它接受一个日期列表（当前处于表单（年，月，日），其中每个是Int：（Int，Int，Int））和一个月（作为Int）并返回该月出现在日期列表中的次数。

我收到错误：＆＃34;解析输入错误 - ＆gt;＆＃34;关于我的第一个＆＃39; - ＆gt;＆＃39;在函数签名中：

numberInMonth [(Int, Int, Int)] -> Int -> Int
numberInMonth ((y,m,d) : rst) month = 
   if y == month then 1 +(numberInMonth rst) 
   else numberInMonth rst

有关为什么没有解析的想法？

Answer 1

您刚刚错过了类型签名中的::。

--------------|
--            V
numberInMonth :: [(Int, Int, Int)] -> Int -> Int
numberInMonth ((y,m,d) : rst) month = 
   if y == month then 1 +(numberInMonth rst) 
   else numberInMonth rst