diff options
author | Enrico Tassi <Enrico.Tassi@inria.fr> | 2014-02-17 15:25:14 +0100 |
---|---|---|
committer | Enrico Tassi <Enrico.Tassi@inria.fr> | 2014-02-17 15:25:14 +0100 |
commit | c08b210e5929efdc16a7fee56037e5f14b81e8b2 (patch) | |
tree | ae63ee01e1dc599cee7b4dc8945387f521ee687e /ide/coq.ml | |
parent | 3b49e85621e87ff9c20fc26e2d2ea1b55a87eb1c (diff) |
CoqIDE: when coqtop misbehaves kill it properly (no zombie)
Diffstat (limited to 'ide/coq.ml')
-rw-r--r-- | ide/coq.ml | 2 |
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 |