aboutsummaryrefslogtreecommitdiffhomepage
path: root/ide/coq.ml
diff options
context:
space:
mode:
authorGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2014-02-17 15:25:14 +0100
committerGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2014-02-17 15:25:14 +0100
commitc08b210e5929efdc16a7fee56037e5f14b81e8b2 (patch)
treeae63ee01e1dc599cee7b4dc8945387f521ee687e /ide/coq.ml
parent3b49e85621e87ff9c20fc26e2d2ea1b55a87eb1c (diff)
CoqIDE: when coqtop misbehaves kill it properly (no zombie)
Diffstat (limited to 'ide/coq.ml')
-rw-r--r--ide/coq.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/ide/coq.ml b/ide/coq.ml
index fe17c20a4..a7535bfab 100644
--- a/ide/coq.ml
+++ b/ide/coq.ml
@@ -409,6 +409,8 @@ let spawn_handle args respawner feedback_processor =
let clear_handle h =
if h.alive then begin
(* invalidate the old handle *)
+ CoqTop.kill h.proc;
+ ignore(CoqTop.wait h.proc);
h.alive <- false;
end