summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniil Baturin <daniil@baturin.org>2021-07-20 17:28:55 +0700
committerDaniil Baturin <daniil@baturin.org>2021-07-20 17:28:55 +0700
commit66ebdf7b65ce09eb2fff5617aec4383d1b89f69b (patch)
tree4cb868160365f73b410fa8243c101105bff76261
parentf78478dc4a712010f4fb233a844127911bb9b396 (diff)
downloaduncron-66ebdf7b65ce09eb2fff5617aec4383d1b89f69b.tar.gz
uncron-66ebdf7b65ce09eb2fff5617aec4383d1b89f69b.zip
Force exception trace recording.
-rw-r--r--src/uncron.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/uncron.ml b/src/uncron.ml
index 7040774..9fb891f 100644
--- a/src/uncron.ml
+++ b/src/uncron.ml
@@ -3,6 +3,8 @@
Build with: ocamlfind ocamlopt -package lwt,lwt.unix,lwt_ppx,logs,logs.lwt -linkpkg -o uncron ./uncron.ml
*)
+let () = Printexc.record_backtrace true
+
open Lwt
(* Queue *)