在OCaml toplevel中如何清除屏幕？

Question

我正在Ubuntu 14.04上使用带有ledit的ocaml toplevel（ledit -l 100 ocaml）。由于没有清除屏幕的方法，每次我都停留在屏幕底部。我想知道是否有一种方法可以在toplevel中清除屏幕？提前感谢您的帮助。祝好。

- UnSat

---

你已经尝试过 utop 了吗？ - Shamaoke

@Shamaoke 没有，我喜欢原始的顶层和库的极简主义方法。 - Str.

Answer 1

Sys.command "clear"非常实用 - 它会清除并返回一个整数 :-)

我最喜欢的是Ctrl+l - 只适用于Unix操作系统。

- Str.

Answer 2

您可以尝试以下方法：

# Sys.command "clear";;

然而，在屏幕底部停留是很正常的。命令行至少已经这样工作了30年 :-)

- Jeffrey Scofield

Answer 3

你可以尝试: let clear = function x -> Sys.command("clear")+x;; 然后每次调用: clear x;; 其中x是一个整数，你的屏幕应该再次清洁。

- AName

---

让 c = function () -> Sys.command("clear");; - johnfree