ocaml - 如何退出程序？

Question

如果输入参数不符合预期，我想退出程序。我应该如何做到这一点？下面是我的尝试。

let () =
  if ((Array.length Sys.argv) - 1) <> 2 then                                                                                                                                              
    exit 0 ; ()                                                                                                                                                                           
  else
    ()

谢谢。

Answer 1

exit n是退出程序的正确方法，但您的代码有语法错误。 if ... then exit 0; ()被解析为 (if ... then exit 0); () .因此，您在 else 附近遇到了语法错误。 ，因为它没有与 then 正确配对.

你应该写:

let () =
  if ((Array.length Sys.argv) - 1) <> 2 then begin                                                                                                                                           
    exit 0 ; ()                                                                                                                                                                           
  end else
    ()

或者干脆，

let () = if Array.length Sys.argv - 1 <> 2 then exit 0