我发现
Prelude> :i ()
data () = () -- Defined in `GHC.Tuple'
instance Bounded () -- Defined in `GHC.Enum'
instance Enum () -- Defined in `GHC.Enum'
instance Eq () -- Defined in `GHC.Classes'
instance Ord () -- Defined in `GHC.Classes'
instance Read () -- Defined in `GHC.Read'
instance Show () -- Defined in `GHC.Show'
所以,mean()是Enum的一个实例,应该已经实现了succ
函数。然而,当我尝试succ ()
时,我得到了*** Exception: Prelude.Enum.().succ: bad argument
我搜索了GHC.Tuple
的源代码,其中()的类型应该被定义,但GHC.Tuple
succ
函数只定义有后继参数的参数
Prelude> succ False
True
Prelude> succ True
*** Exception: Prelude.Enum.Bool.succ: bad argument
Prelude> succ 0
1
Prelude> succ 1
2
Prelude> succ ((2^63 - 1) :: Int)
*** Exception: Prelude.Enum.succ{Int}: tried to take `succ' of maxBound
Prelude> succ ()
*** Exception: Prelude.Enum.().succ: bad argument
所以答案是:函数被实现了,它只是(正确地)返回一个错误,总是。