diff options
| author | Emilio Jesus Gallego Arias | 2017-10-28 19:04:50 +0200 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2017-10-28 19:09:05 +0200 |
| commit | 32e5a48e9aba2c80491417b8a60067c9baad22be (patch) | |
| tree | 63b2a93da10d9bab56c831449c9385c9b9b5f9f3 /toplevel/coqloop.ml | |
| parent | ad973248998da8d7d10ed00f4bcd6f383ba9a171 (diff) | |
[toplevel] Export the last document seen after `Drop`.
After `Drop`, `Coqtop.drop_last_doc` will contain the current document
used by `Coqloop`. This is useful for people wanting to restart Coq
after a `Drop`.
Diffstat (limited to 'toplevel/coqloop.ml')
| -rw-r--r-- | toplevel/coqloop.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/toplevel/coqloop.ml b/toplevel/coqloop.ml index c16e2751bc..910c81381b 100644 --- a/toplevel/coqloop.ml +++ b/toplevel/coqloop.ml @@ -350,7 +350,7 @@ let rec loop doc = not possible due exceptions. *) in vernac_loop doc (Stm.get_current_state ~doc) with - | CErrors.Drop -> () + | CErrors.Drop -> doc | CErrors.Quit -> exit 0 | any -> Feedback.msg_error (str "Anomaly: main loop exited with exception: " ++ |
