diff options
author | Emilio Jesus Gallego Arias <e+git@x80.org> | 2018-03-09 23:58:56 +0100 |
---|---|---|
committer | Emilio Jesus Gallego Arias <e+git@x80.org> | 2018-04-02 06:57:55 +0200 |
commit | ce9b17821a3be3dee7fa7e49c35edaefc658b965 (patch) | |
tree | 9466d4125f446a1483af29201026ca9734522014 /vernac/vernacentries.ml | |
parent | f29f8f80c8ad94576c7a36f3f638866c208338a0 (diff) |
[lib] Move global options to their proper place.
Recent commits introduced global flags, but these should be
module-specific so relocating.
Global flags are deprecated, and for 8.9 `Lib.Flags` will be reduced
to the truly global stuff.
Diffstat (limited to 'vernac/vernacentries.ml')
-rw-r--r-- | vernac/vernacentries.ml | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/vernac/vernacentries.ml b/vernac/vernacentries.ml index 5dcc170b1..503a22f54 100644 --- a/vernac/vernacentries.ml +++ b/vernac/vernacentries.ml @@ -1468,22 +1468,22 @@ let _ = optkey = ["Printing";"Universes"]; optread = (fun () -> !Constrextern.print_universes); optwrite = (fun b -> Constrextern.print_universes:=b) } - + let _ = declare_bool_option { optdepr = false; optname = "dumping bytecode after compilation"; optkey = ["Dump";"Bytecode"]; - optread = Flags.get_dump_bytecode; - optwrite = Flags.set_dump_bytecode } + optread = (fun () -> !Cbytegen.dump_bytecode); + optwrite = (:=) Cbytegen.dump_bytecode } let _ = declare_bool_option { optdepr = false; optname = "dumping VM lambda code after compilation"; optkey = ["Dump";"Lambda"]; - optread = Flags.get_dump_lambda; - optwrite = Flags.set_dump_lambda } + optread = (fun () -> !Clambda.dump_lambda); + optwrite = (:=) Clambda.dump_lambda } let _ = declare_bool_option |