在 OCaml 中将异常包装在另一个异常中

Wrapping an exception within another exception in OCaml

我可以创建一个在其构造函数中包含另一个异常的异常吗?我想抛出一个关于下面发生了什么异常的异常。

是的,像这样:

exception Foo
exception Bar of exn

打印时可能会出现问题。

Fatal error: exception Bar(_)