Don't record backtraces

2018-05-09 19:49:56 +07:00 · 2018-05-09 19:49:56 +07:00 · f4a5413c46
parent bffd5407ce
commit f4a5413c46
1 changed files with 3 additions and 0 deletions
--- a/test/unit-tests/path.mlt
+++ b/test/unit-tests/path.mlt
@ -1,12 +1,15 @@
 (* -*- tuareg -*- *)
 open Stdune;;

+Printexc.record_backtrace false;;
+
 let r = Path.(relative root);;

 #install_printer Path.pp;;

 Path.(let p = relative root "foo" in descendant p ~of_:p)
 [%%expect{|
+- : unit = ()
 val r : string -> Stdune.Path.t = <fun>
 - : Stdune.Path.t option = Some foo
 |}]