diff --git a/src/dtools.ml b/src/dtools.ml
index 2a56e5d..05ff508 100644
--- a/src/dtools.ml
+++ b/src/dtools.ml
@@ -533,6 +533,9 @@ struct
   "ocaml-dtools not compiled with ocaml >= 3.11, \
    cannot print stack backtrace"
 
+  (* For the compiler.. *)
+  let () = ignore (get_backtrace ())
+
   open Printexc
 
   let main f () =