aboutsummaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorEmilio Jesus Gallego Arias2019-02-12 02:23:38 +0100
committerEmilio Jesus Gallego Arias2019-02-14 16:30:28 +0100
commit49ed4b7d3a01b9c383bb99fc26a7b34a7a711fdf (patch)
treeef708a5ce689d236c68933fa43890a41ac963edd /lib
parent7831c257168b74fc8e7132af2ec0b7a8aa00d539 (diff)
[coqlib] Remove `-boot` option for setting the coqlib
Instead, if the coqlib is special, we set it explicitly in the command line, as Dune does. This is a continuation of #9523. In Sphinx, we stop using -boot, and pass `-coqlib` through the environment instead. Co-authored-by: Gaƫtan Gilbert <gaetan.gilbert@skyskimmer.net>
Diffstat (limited to 'lib')
-rw-r--r--lib/envars.ml4
-rw-r--r--lib/envars.mli2
2 files changed, 3 insertions, 3 deletions
diff --git a/lib/envars.ml b/lib/envars.ml
index 8a75d9a552..0f4670688b 100644
--- a/lib/envars.ml
+++ b/lib/envars.ml
@@ -110,11 +110,11 @@ let set_user_coqlib path = coqlib := Some path
(** coqlib is now computed once during coqtop initialization *)
-let set_coqlib ~boot ~fail =
+let set_coqlib ~fail =
match !coqlib with
| Some _ -> ()
| None ->
- let lib = if boot then coqroot else guess_coqlib fail in
+ let lib = guess_coqlib fail in
coqlib := Some lib
let coqlib () = Option.default "" !coqlib
diff --git a/lib/envars.mli b/lib/envars.mli
index 21365c48f6..ebf86d0650 100644
--- a/lib/envars.mli
+++ b/lib/envars.mli
@@ -39,7 +39,7 @@ val datadir : unit -> string
val configdir : unit -> string
(** [set_coqlib] must be runned once before any access to [coqlib] *)
-val set_coqlib : boot:bool -> fail:(string -> string) -> unit
+val set_coqlib : fail:(string -> string) -> unit
(** [set_user_coqlib path] sets the coqlib directory explicitedly. *)
val set_user_coqlib : string -> unit