抑制OCaml启动消息

Question

我根据.ocamlinit安装说明更新了真实世界OCaml的以使用以下设置：

#use "topfind";;
#thread;;
#camlp4o;;
#require "core.top";;
#require "core.syntax";;

运行utop很好，一开始只会产生一些额外的输出，但是ocaml会产生大量的启动消息：

/usr/lib/ocaml/threads: added to search path
/usr/lib/ocaml/unix.cma: loaded
/usr/lib/ocaml/threads/threads.cma: loaded
/usr/lib/ocaml/dynlink.cma: loaded
/usr/lib/ocaml/camlp4: added to search path
/usr/lib/ocaml/camlp4/camlp4o.cma: loaded
/usr/lib/ocaml/bigarray.cma: loaded
... (And so on, for ~50 lines or so!)
/home/jmu303/.opam/system/lib/herelib/pa_herelib.cma: loaded
# 

我能阻止这些启动消息吗？

Answer 1

一种方法是告诉toplevel，您不是在一个交互环境中：

# Sys.interactive := false;
# #use "topfind";;
# Sys.interactive := true;

您可以看到此方法的一个示例：https://github.com/ocaml-batteries-team/batteries-included/blob/master/ocamlinit的电池层初始化代码。