aboutsummaryrefslogtreecommitdiffhomepage
path: root/ide/coqOps.ml
diff options
context:
space:
mode:
authorGravatar Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr>2015-09-15 16:56:42 +0200
committerGravatar Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr>2015-09-15 16:56:42 +0200
commit42ab65d7c7eed4f6696dacedceaf7c695e0d06d6 (patch)
tree778b002f1cf64b4766189a2b7b5322f90d9beb36 /ide/coqOps.ml
parentdffd1a75c7ecf8870935f48c8aff2a9e750be4aa (diff)
Removing a warning in CoqOps.
Diffstat (limited to 'ide/coqOps.ml')
-rw-r--r--ide/coqOps.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/ide/coqOps.ml b/ide/coqOps.ml
index c6d314947..ba9ab9672 100644
--- a/ide/coqOps.ml
+++ b/ide/coqOps.ml
@@ -204,7 +204,7 @@ object(self)
let on_changed (i, f) = segment#add i (flags_to_color f) in
let on_push s =
set_index s document_length;
- (SentenceId.connect s)#changed on_changed;
+ ignore ((SentenceId.connect s)#changed on_changed);
document_length <- succ document_length;
segment#set_length document_length;
let flags = List.map mem_flag_of_flag s.flags in