无法读取自定义数据类型

Question

data MyNum = One
           | Two
           | Three
           deriving (Show, Eq)

我只需使用构造函数MyNum，One和Two定义Three。

  

*主＆GT; ：t一个

     

One :: MyNum

但是当我向程序中添加x = read("One")::MyNum时，ghci会产生错误：

  

使用'read'

时没有（Read MyNum）的实例      

在表达式中：read（＆＃34; One＆＃34;）:: MyNum

     

在'x'的等式中：x = read（＆＃34; One＆＃34;）:: MyNum

为什么我不能read？

Answer 1

您必须在Read：

的定义中派生MyNum

data MyNum = One
           | Two
           | Three
           deriving (Show, Eq, Read)

x = read("One")::MyNum

  

*主＆GT; X

     

一