diff options
| author | Emilio Jesus Gallego Arias | 2019-02-12 02:23:38 +0100 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2019-02-14 16:30:28 +0100 |
| commit | 49ed4b7d3a01b9c383bb99fc26a7b34a7a711fdf (patch) | |
| tree | ef708a5ce689d236c68933fa43890a41ac963edd /checker | |
| parent | 7831c257168b74fc8e7132af2ec0b7a8aa00d539 (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 'checker')
| -rw-r--r-- | checker/checker.ml | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/checker/checker.ml b/checker/checker.ml index af8d1e5617..3db7ccdcae 100644 --- a/checker/checker.ml +++ b/checker/checker.ml @@ -350,9 +350,9 @@ let parse_args argv = | "-debug" :: rem -> set_debug (); parse rem | "-where" :: _ -> - Envars.set_coqlib ~boot:!boot_opt ~fail:(fun x -> CErrors.user_err Pp.(str x)); - print_endline (Envars.coqlib ()); - exit 0 + Envars.set_coqlib ~fail:(fun x -> CErrors.user_err Pp.(str x)); + print_endline (Envars.coqlib ()); + exit 0 | ("-?"|"-h"|"-H"|"-help"|"--help") :: _ -> usage () @@ -386,7 +386,7 @@ let init_with_argv argv = try parse_args argv; if !Flags.debug then Printexc.record_backtrace true; - Envars.set_coqlib ~boot:!boot_opt ~fail:(fun x -> CErrors.user_err Pp.(str x)); + Envars.set_coqlib ~fail:(fun x -> CErrors.user_err Pp.(str x)); Flags.if_verbose print_header (); init_load_path (); make_senv () |