ocaml/ocamltest/ocaml_directories.ml

38 lines
1.6 KiB
OCaml

(**************************************************************************)
(* *)
(* OCaml *)
(* *)
(* Sebastien Hinderer, projet Gallium, INRIA Paris *)
(* *)
(* Copyright 2018 Institut National de Recherche en Informatique et *)
(* en Automatique. *)
(* *)
(* All rights reserved. This file is distributed under the terms of *)
(* the GNU Lesser General Public License version 2.1, with the *)
(* special exception on linking described in the file LICENSE. *)
(* *)
(**************************************************************************)
(* Locations of directories in the OCaml source tree *)
open Ocamltest_stdlib
let srcdir =
Sys.getenv_with_default_value "OCAMLSRCDIR" Ocamltest_config.ocamlsrcdir
let stdlib =
Filename.make_path [srcdir; "stdlib"]
let libunix =
let subdir = if Sys.win32 then "win32unix" else "unix" in
Filename.make_path [srcdir; "otherlibs"; subdir]
let toplevel =
Filename.make_path [srcdir; "toplevel"]
let runtime =
Filename.make_path [srcdir; "runtime"]
let tools =
Filename.make_path [srcdir; "tools"]