haskell - 如何编写数据的 "Show"Typeclass

Question

我有一个非常简单的data，我想使用Show类型类来给它一个很好的输出。

data Fruit = Apple | Orange Int 

instance Show Fruit
         where
            show Apple    = "Hey Apple"
            show Orange a = "X number of Orange"

这会出现以下错误，但我不知道如何修复它:

Equations for `show' have different numbers of arguments

Answer 1

你只是忘记了一些括号:)

instance Show Fruit where
  show Apple      = "Hey Apple"
  show (Orange a) = show a ++ " number of Orange"

像 Orange a 这样的模式需要括号来消除与 Apple a 这样的模式的歧义，因为我们实际上有两个参数。