chore(Source_tree): remove dead code (#7528)

Signed-off-by: Rudi Grinberg <me@rgrinberg.com>
ocaml · Apr 13, 2023 · 05e0bc1 · 05e0bc1
1 parent 06e2fe1
commit 05e0bc1
Show file tree

Hide file tree

Showing 2 changed files with 0 additions and 6 deletions.
diff --git a/src/dune_rules/source_tree.ml b/src/dune_rules/source_tree.ml
@@ -387,10 +387,6 @@ module Dir0 = struct
     Filename.Map.foldi (sub_dirs t) ~init:Filename.Set.empty ~f:(fun s _ acc ->
         Filename.Set.add acc s)
 
-  let sub_dir_paths t =
-    String.Map.foldi (sub_dirs t) ~init:Path.Source.Set.empty ~f:(fun s _ acc ->
-        Path.Source.Set.add acc (Path.Source.relative t.path s))
-
   let sub_dir_as_t (s : sub_dir) =
     let+ t = Memo.Cell.read s.sub_dir_as_t in
     (Option.value_exn t).dir

diff --git a/src/dune_rules/source_tree.mli b/src/dune_rules/source_tree.mli
@@ -51,8 +51,6 @@ module Dir : sig
       -> Outcome.t M.t
   end
 
-  val sub_dir_paths : t -> Path.Source.Set.t
-
   val sub_dir_names : t -> Filename.Set.t
 
   val status : t -> Sub_dirs.Status.t