datatype expr = constant of int
|pow of expr * int
| variable of string
| product of expr *expr ;
val x = variable("x");
fun integ(x,pow(y,a))= if (x=y) then pow(x,a+1) else product(x,pow(y,a));
integ(x,variable("y"),2);
给我输出 产品(变量" x",pow(变量#,2)); 我想要而不是#there?
答案 0 :(得分:1)
这些变量控制SML / NJ打印。如果你想看到更多,请将它们设置得更高。
Control.Print.printLength := 1000
Control.Print.printDepth := 1000
Control.Print.stringDepth := 1000