F＃鉴别工会和印刷

Question

我试图解决下面的问题，但很难弄清楚如何以所需的格式打印它，括号和数字/运算符。

我有下面的代码来创建表达式，但使用匹配模式打印％A不起作用。 我可以访问值但不能以所需的格式打印它们。 有人有建议吗？

let one = Const(1)
let two = Const(2)
let three = Const(3)
let Bin1 = BinOpr(one, "+", two)
let Bin2 = BinOpr(Bin1, "*", three)

Answer 1

解决此问题的方法是通过expr上的模式匹配实现toString ，并为Const和BinOpr输出相应的字符串：

• 对于Const ，您只需将int转换为字符串即可。
• 对于BinOpr ，您必须构建一个表单的字符串(<expr> <op> <expr>) 。

尝试自己实现这个功能，并不是那么困难但是如果你遇到困难，我提供下面的解决方案。

---

解

let rec toString expr =
  match expr with
  | Const x -> string x
  | BinOpr (e1, op, e2) -> sprintf "(%s %s %s)" (toString e1) op (toString e2)