aboutsummaryrefslogtreecommitdiff
path: root/toplevel
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2019-12-18 15:55:23 +0100
committerPierre-Marie Pédrot2019-12-22 14:04:53 +0100
commitacba2419a4cebb2b55bad2aefa2062640ffe8828 (patch)
tree44231e66a98a36360041c9d48123507ca894ca79 /toplevel
parent9c75b6a6582620e2fb9a39c1ea1aa46a321af6a7 (diff)
Centralize the flag handling native compilation.
Instead of relying on the Coq_config immutable flag, we introduce an initialization-only flag to govern the use of the native compiler. This allows to make coqc passed with "-native-compiler no" behave as if it had been configured without native compilation.
Diffstat (limited to 'toplevel')
-rw-r--r--toplevel/coqtop.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/toplevel/coqtop.ml b/toplevel/coqtop.ml
index 46dd693155..87eafa251e 100644
--- a/toplevel/coqtop.ml
+++ b/toplevel/coqtop.ml
@@ -233,6 +233,7 @@ let init_execution opts custom_init =
Global.set_engagement opts.config.logic.impredicative_set;
Global.set_indices_matter opts.config.logic.indices_matter;
Global.set_VM opts.config.enable_VM;
+ Flags.set_native_compiler (match opts.config.native_compiler with NativeOff -> false | NativeOn _ -> true);
Global.set_native_compiler (match opts.config.native_compiler with NativeOff -> false | NativeOn _ -> true);
Global.set_allow_sprop opts.config.logic.allow_sprop;
if opts.config.logic.cumulative_sprop then Global.make_sprop_cumulative ();