diff options
| author | Emilio Jesus Gallego Arias | 2020-07-01 13:17:49 +0200 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2020-07-01 14:00:52 +0200 |
| commit | 4a6a94d60f258bbcbf843af0c60d4c7d810750aa (patch) | |
| tree | 7e0ec3895f293e3c3f9b4d932132ff66495cd3ef /toplevel | |
| parent | b017e302f69f20fc4fc3d4088a305194f6c387fa (diff) | |
[state] Consolidate state handling in Vernacstate
After #12504 , we can encapsulate and consolidate low-level state
logic in `Vernacstate`, removing `States` which is now a stub.
There is hope to clean up some stuff regarding the handling of
low-level proof state, by moving both `Evarutil.meta_counter` and
`Evd.evar_counter_summary` into the proof state itself [obligations
state is taken care in #11836] , but this will take some time.
Diffstat (limited to 'toplevel')
| -rw-r--r-- | toplevel/coqc.ml | 2 | ||||
| -rw-r--r-- | toplevel/coqtop.ml | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/toplevel/coqc.ml b/toplevel/coqc.ml index c6bb38e005..03c53d6991 100644 --- a/toplevel/coqc.ml +++ b/toplevel/coqc.ml @@ -11,7 +11,7 @@ let outputstate opts = Option.iter (fun ostate_file -> let fname = CUnix.make_suffix ostate_file ".coq" in - Library.extern_state fname) opts.Coqcargs.outputstate + Vernacstate.System.dump fname) opts.Coqcargs.outputstate let coqc_init _copts ~opts = Flags.quiet := true; diff --git a/toplevel/coqtop.ml b/toplevel/coqtop.ml index 2d450d430a..4231915be1 100644 --- a/toplevel/coqtop.ml +++ b/toplevel/coqtop.ml @@ -52,7 +52,7 @@ let print_memory_stat () = let inputstate opts = Option.iter (fun istate_file -> let fname = Loadpath.locate_file (CUnix.make_suffix istate_file ".coq") in - Library.intern_state fname) opts.inputstate + Vernacstate.System.load fname) opts.inputstate (******************************************************************************) (* Fatal Errors *) |