Fix file tree cache benchmark building

These need to be updated to use the new Path.Source.t Signed-off-by: Rudi Grinberg <rudi.grinberg@gmail.com>
ocaml · Apr 24, 2019 · 194125e · 194125e
1 parent 599b787
commit 194125e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/bench/file_tree_cache.ml b/bench/file_tree_cache.ml
@@ -11,7 +11,7 @@ let setup = lazy (
   Path.set_root tmp;
   Path.set_build_dir (Path.Kind.of_string "_build");
   let ft = (Dune_load.load ()).file_tree in
-  let path = Path.of_string deep_path in
+  let path = Path.Source.of_string deep_path in
   at_exit (fun () -> Sys.remove "./dune-project");
   (ft, path))