仅打印带有 SML/NJ 的打印输出
Printing only print output with SML/NJ
我正在尝试使用 SML/NJ,我使用 sml < source.sml
到 运行 代码,但它打印出太多信息。
例如,这是 source.sml
:
fun fac 0 = 1
| fac n = n * fac (n - 1)
val r = fac 10 ;
print(Int.toString(r));
这是输出:
Standard ML of New Jersey v110.77 [built: Tue Mar 10 07:03:24 2015]
- val fac = fn : int -> int
val r = 3628800 : int
[autoloading]
[library $SMLNJ-BASIS/basis.cm is stable]
[autoloading done]
3628800val it = () : unit
从Suppress "val it" output in Standard ML, How to disable SMLNJ warnings?, and SMLNJ want to remove "val it = () : unit" from every print statement execution,我得到了一些如何抑制它们的提示。
我执行了CM_VERBOSE=false sml < $filename
,在代码里加了一行Control.Print.out := {say=fn _=>(), flush=fn()=>()};
,但是还是有一些信息:
Standard ML of New Jersey v110.77 [built: Tue Mar 10 07:03:24 2015]
- 3628800
如何只打印输出?
sml
命令旨在交互使用。在我看来,你最好从你的程序中构建一个独立的可执行文件。
有几个选项:
我正在尝试使用 SML/NJ,我使用 sml < source.sml
到 运行 代码,但它打印出太多信息。
例如,这是 source.sml
:
fun fac 0 = 1
| fac n = n * fac (n - 1)
val r = fac 10 ;
print(Int.toString(r));
这是输出:
Standard ML of New Jersey v110.77 [built: Tue Mar 10 07:03:24 2015]
- val fac = fn : int -> int
val r = 3628800 : int
[autoloading]
[library $SMLNJ-BASIS/basis.cm is stable]
[autoloading done]
3628800val it = () : unit
从Suppress "val it" output in Standard ML, How to disable SMLNJ warnings?, and SMLNJ want to remove "val it = () : unit" from every print statement execution,我得到了一些如何抑制它们的提示。
我执行了CM_VERBOSE=false sml < $filename
,在代码里加了一行Control.Print.out := {say=fn _=>(), flush=fn()=>()};
,但是还是有一些信息:
Standard ML of New Jersey v110.77 [built: Tue Mar 10 07:03:24 2015]
- 3628800
如何只打印输出?
sml
命令旨在交互使用。在我看来,你最好从你的程序中构建一个独立的可执行文件。
有几个选项: