Exception OCaml-例外

我有一个代码，但有一个例外：when 1问题是您混合了表达式和定义。 在某些定义之后计算有效表达式的惯用方法是 要使用let=…：

---

我看到的唯一错误是在第一行，它一定是异常无效的输入，大写字母为I。同样，你颠倒了你的测试，为什么n<1而不是n>=1？

exception invalid_input

let n = 5

let k = 6

if n<1 || n > 30 || k<1 || k>n  then raise Invalid_input
else ()

let () = if n<1 || n > 30 || k<1 || k>n  then raise Invalid_input

;; if n<1 || n > 30 || k<1 || k>n  then raise Invalid_input