diff options
author | Emilio Jesus Gallego Arias <e+git@x80.org> | 2017-11-21 13:14:17 +0100 |
---|---|---|
committer | Emilio Jesus Gallego Arias <e+git@x80.org> | 2017-11-21 13:14:17 +0100 |
commit | 83c63a5075fb55e4e3291e163417bcffaf009dcd (patch) | |
tree | 31686304f831584f322dd6d143956a57ea917e20 /stm/stm.ml | |
parent | 2a857da2a88855a6c9f0fa7e48a8700c1613e0c7 (diff) |
[stm] Allow delayed constant in interactive mode.
This setting is a debug assertion, due to the many flags we still
over-approximate setting the flag to true to all interactive
environments. [So the assert is checked in vo compilation]
Fixes #6152.
Diffstat (limited to 'stm/stm.ml')
-rw-r--r-- | stm/stm.ml | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/stm/stm.ml b/stm/stm.ml index 864fff9e0..359890eb7 100644 --- a/stm/stm.ml +++ b/stm/stm.ml @@ -2478,12 +2478,16 @@ let new_doc { doc_type ; require_libs } = begin match doc_type with | Interactive ln -> + Safe_typing.allow_delayed_constants := true; Declaremods.start_library ln + | VoDoc ln -> let ldir = Flags.verbosely Library.start_library ln in VCS.set_ldir ldir; set_compilation_hints ln + | VioDoc ln -> + Safe_typing.allow_delayed_constants := true; let ldir = Flags.verbosely Library.start_library ln in VCS.set_ldir ldir; set_compilation_hints ln |