diff options
| author |  Emilio Jesus Gallego Arias <e+git@x80.org> | 2017-04-07 16:02:16 +0200 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias <e+git@x80.org> | 2017-04-07 17:28:59 +0200 |
| commit | e95b816ed34a379e6b6f38630e416710d66c4179 (patch) | |
| tree | dd16a0fb98ddf0717283a6248aaf3ab68ce80aa9 /toplevel/coqtop.ml | |
| parent | 3fb4d9dfc270aa7d4ea09fabbf857cfc11607019 (diff) | |
[toplevel] Remove the feedback feeder printing only on exit.
This fixes the bug in `Drop` reported by @mattam82: after performing a
`Drop`, the feeder was lost and no further message from Coq was
printed.
Diffstat (limited to 'toplevel/coqtop.ml')
| -rw-r--r-- | toplevel/coqtop.ml | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/toplevel/coqtop.ml b/toplevel/coqtop.ml index 4968804fd..aca94e63d 100644 --- a/toplevel/coqtop.ml +++ b/toplevel/coqtop.ml @@ -92,11 +92,11 @@ let console_toploop_run () = Dumpglob.noglob () end; Coqloop.loop(); - (* We remove the feeder but it could be ok not to do so *) - Feedback.del_feeder tl_feed; (* Initialise and launch the Ocaml toplevel *) Coqinit.init_ocaml_path(); - Mltop.ocaml_toploop() + Mltop.ocaml_toploop(); + (* We let the feeder in place for users of Drop *) + Feedback.del_feeder tl_feed let toploop_run = ref console_toploop_run |