Haskell 检查 sum 数据类型的两个变量而不是对应的值是否相同

问题描述

如何检查求和数据类型的两个变体是否相同？我不能只是推导 Eq，因为这也会比较里面的元素。

显而易见的方法是为每个变体编写一个模式匹配，例如：

data Token = Ident String | Number String | Let | Dec

myeq (Ident _) (Ident _) = True
myeq (Number _) (Number _) = True
myeq Let Let = True
myeq Dec Dec = True
myeq _ _ = False

然而，我实际的 Token 类型比这个长得多，所以这会乏味。有一个更好的方法吗？来自 rust，有没有类似 std::mem::discriminant 的东西？

注意： 我正在寻找的行为是 Ident "foo" == Ident "bar" 为 True。请注意 Ident 中的字符串是如何不同的。顺便说一句，我需要这个，因为我正在编写一个解析器，它接受令牌列表，并且需要匹配令牌的类型而不是令牌的内容。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）