aboutsummaryrefslogtreecommitdiff
path: root/lib/envars.ml
diff options
context:
space:
mode:
authorGaëtan Gilbert2019-02-08 13:34:02 +0100
committerGaëtan Gilbert2019-02-08 13:34:02 +0100
commit6c06f36b2dd1812454d40cbde1da28e1ea8be67e (patch)
tree62782d00b4c5781caf89dfc08e804f220e6cc790 /lib/envars.ml
parent99c1d7b0ae1beed66fe8dd6a06db84dc0c8322d8 (diff)
Make boot flag into a normal option (no global flag).
Diffstat (limited to 'lib/envars.ml')
-rw-r--r--lib/envars.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/envars.ml b/lib/envars.ml
index b5036e7340..8a75d9a552 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 ~fail =
+let set_coqlib ~boot ~fail =
match !coqlib with
| Some _ -> ()
| None ->
- let lib = if !Flags.boot then coqroot else guess_coqlib fail in
+ let lib = if boot then coqroot else guess_coqlib fail in
coqlib := Some lib
let coqlib () = Option.default "" !coqlib