如何退出程序?

How to exit a program?

如果输入参数不符合预期我想退出程序。我应该如何实现?以下是我的尝试。

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

谢谢。

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