Skip to content

Commit

Permalink
refactor: remove unused ocaml function
Browse files Browse the repository at this point in the history
Signed-off-by: Etienne Marais <[email protected]>
  • Loading branch information
maiste committed Jan 17, 2025
1 parent 97b3e3b commit 73f45df
Show file tree
Hide file tree
Showing 2 changed files with 0 additions and 16 deletions.
10 changes: 0 additions & 10 deletions src/dune_rules/pkg_toolchain.ml
Original file line number Diff line number Diff line change
Expand Up @@ -55,16 +55,6 @@ let is_compiler_and_toolchains_enabled name =
| `Disabled -> false
;;

let ocaml context env ~bin_dir =
let which prog =
let path = Path.Outside_build_dir.relative bin_dir prog in
let+ exists = Fs_memo.file_exists path in
if exists then Some (Path.outside_build_dir path) else None
in
let get_ocaml_tool ~dir:_ prog = which prog in
Ocaml_toolchain.make context ~which ~env ~get_ocaml_tool
;;

(* Returns the path to the directory containing the artifacts within the
temporary install directory. When installing with the DESTDIR variable, the
absolute path to the final installation directory is concatenated to the
Expand Down
6 changes: 0 additions & 6 deletions src/dune_rules/pkg_toolchain.mli
Original file line number Diff line number Diff line change
Expand Up @@ -30,12 +30,6 @@ val pkg_dir : Dune_pkg.Lock_dir.Pkg.t -> Path.Outside_build_dir.t
script. *)
val installation_prefix : pkg_dir:Path.Outside_build_dir.t -> Path.Outside_build_dir.t

val ocaml
: Context_name.t
-> Env.t
-> bin_dir:Path.Outside_build_dir.t
-> Ocaml_toolchain.t Memo.t

(** Rewrite the OCaml compiler install action so that it installs the compiler
package to the users toolchain directory. If the compiler is found to be
already installed in the users toolchain directory, the action is instead
Expand Down

0 comments on commit 73f45df

Please sign in to comment.