Skip to content

Commit

Permalink
Make compiler happy.
Browse files Browse the repository at this point in the history
  • Loading branch information
toots committed May 14, 2015
1 parent 20d3803 commit bf2417b
Showing 1 changed file with 3 additions and 0 deletions.
3 changes: 3 additions & 0 deletions src/dtools.ml
Original file line number Diff line number Diff line change
Expand Up @@ -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 () =
Expand Down

0 comments on commit bf2417b

Please sign in to comment.