aboutsummaryrefslogtreecommitdiffhomepage
path: root/ide/coq.ml
diff options
context:
space:
mode:
authorGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2014-04-10 16:09:22 +0200
committerGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2014-04-10 19:43:07 +0200
commitcbd7317516eaac4a5f37c896da5ea984ec1bb77a (patch)
tree39b5c58f9db3a2d47220f7586ac9af2cfce1d272 /ide/coq.ml
parent4ec840d145927b0dd6ec1040a8a5ff573a0d7685 (diff)
CoqIDE: removing a timer may raise an exception
Diffstat (limited to 'ide/coq.ml')
-rw-r--r--ide/coq.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/ide/coq.ml b/ide/coq.ml
index 3dd2ce006..af00cc63c 100644
--- a/ide/coq.ml
+++ b/ide/coq.ml
@@ -196,7 +196,7 @@ module GlibMainLoop = struct
type condition = Glib.Io.condition
let add_watch ~callback chan =
Glib.Io.add_watch ~cond:[`ERR; `HUP; `IN; `NVAL; `PRI] ~callback chan
- let remove_watch = Glib.Io.remove
+ let remove_watch x = try Glib.Io.remove x with Glib.GError _ -> ()
let read_all = Ideutils.io_read_all
let async_chan_of_file fd = Glib.Io.channel_of_descr fd
let async_chan_of_socket s = !gio_channel_of_descr_socket s