Print backtrace in case of uncaught exception

Otherwise uncaught by configurator are hard to debug
2018-04-06 11:37:19 +08:00 · 2018-04-06 11:37:19 +08:00 · 10c5447608
parent 6688144a74
commit 10c5447608
1 changed files with 1 additions and 1 deletions
--- a/src/configurator/configurator.ml
+++ b/src/configurator/configurator.ml
@ -452,4 +452,4 @@ let main ?(args=[]) ~name f =
    | Fatal_error msg ->
      eprintf "Error: %s\n%!" msg;
      exit 1
-    | exn -> raise exn
+    | _ -> Exn.reraise exn