I m 试图在每个人都有性或姓名的情况下创造个人类型。
data Sex = Sex Char deriving Show
male = Sex M
female = Sex F
data Name = Name [Char] deriving Show
data Person = Person {
Sex :: Sex,
Name :: Name
} deriving (Show)
当我试图在格西里装上这段话时,我才发现无益的错误:输入中的错误
。
我在这里做了什么错误?