“if”的缩进在 Emacs 下的 Ocaml 中

Question

我正在使用 Emacs 编写 Ocaml 代码，目前 if 的缩进设置如下：

if cond1 then e1 else
  if cond2 then e2 else
    if cond3 then e3 else
      e4

我想实现与 Caml 编程指南：

if cond1 then e1 else
if cond2 then e2 else
if cond3 then e3 else
e4

谁能告诉我哪个参数与之相关？谢谢

编辑1：这是我的.emacs

Answer 1

您现在可以使用 ocp-indent ，它将（几乎总是）遵守 Caml 编程指南。唯一的区别是它会缩进最后一个表达式，以避免混淆范围错误：

if cond1 then e1 else
if cond2 then e2 else
if cond3 then e3 else
  e4;
e5

Answer 2

似乎有些不对劲。您是否使用 OCaml 发行版中的 caml 模式？因为我这样做了，并且它根据编程指南进行缩进，而无需设置任何参数。这就是我的 .emacs 中的内容（该模式安装在 ~/.emacs.d/caml-mode 中）：

;; Caml mode
(setq load-path (cons "~/.emacs.d/caml-mode" load-path))
(setq auto-mode-alist (cons '("\\.ml[iylp]?" . caml-mode) auto-mode-alist))
(autoload 'caml-mode "caml" "Major mode for editing Caml code." t)
(autoload 'run-caml "inf-caml" "Run an inferior Caml process." t)
(autoload 'camldebug "camldebug" "Run the Caml debugger." t)
(if window-system (require 'caml-font))

如果您使用 tuareg-mode，我无能为力你。但请注意，与普遍的看法相反，发行版中的 caml 模式非常好，并且仍然由 OCaml 的作者维护。

Answer 3

您可以将变量 tuareg-if-then-else-indent 设置为 0，这将缩进您的示例，因为

if cond1 then e1 else
if cond2 then e2 else
if cond3 then e3 else
e4

我不知道如果您没有嵌套 if，这是否会导致其他不良缩进尽管。您还可以 Mxcustomize-group RET tuareg RET 查看所有缩进（和其他）选项。

Answer 4

您对以下内容不满意吗？

if c1 then e1
else if c2 then e2
else if c3 then e3
else e4