diff options
| author | Emilio Jesus Gallego Arias | 2019-02-08 18:53:55 +0100 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2019-02-08 18:53:55 +0100 |
| commit | 92df98da23057a47a6cd2053618fd97efe54ba30 (patch) | |
| tree | 1ebc2880fa850e5c095b064972158a940844a85f /lib/envars.ml | |
| parent | 3b9d338c751acd6694038b30e0c40637449df86a (diff) | |
| parent | 6c06f36b2dd1812454d40cbde1da28e1ea8be67e (diff) | |
Merge PR #9523: Make boot flag into a normal option (no global flag).
Ack-by: SkySkimmer
Reviewed-by: ejgallego
Diffstat (limited to 'lib/envars.ml')
| -rw-r--r-- | lib/envars.ml | 4 |
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 |