小编Zeb*_*Zeb的帖子

我正在使用 Alex + Happy 为 Haskell 中的 DSL 制作解析器。我的 DSL 使用掷骰子作为可能表达式的一部分。

有时我有一个我想解析的表达式，如下所示：

[some code...]  3D6  [... rest of the code]

这应该大致翻译为：

TokenInt {... value = 3}, TokenD, TokenInt {... value = 6}

我的 DSL 也使用变量（基本上是字符串），所以我有一个特殊的标记来处理变量名。所以，有了这个令牌：

"D"                                 { \pos str -> TokenD pos }
$alpha [$alpha $digit \_ \']*       { \pos str -> TokenName pos str}
$digit+                             { \pos str -> TokenInt pos (read str) }

我现在使用解析时得到的结果是：

TokenInt {... value = 3}, TokenName { ... , name …