aboutsummaryrefslogtreecommitdiffhomepage
path: root/ide/wg_Completion.ml
diff options
context:
space:
mode:
Diffstat (limited to 'ide/wg_Completion.ml')
-rw-r--r--ide/wg_Completion.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/ide/wg_Completion.ml b/ide/wg_Completion.ml
index 7317f1abc..43564ba57 100644
--- a/ide/wg_Completion.ml
+++ b/ide/wg_Completion.ml
@@ -60,7 +60,7 @@ let is_substring s1 s2 =
let i = ref 0 in
let len1 = Array.length s1 in
let len2 = Array.length s2 in
- while !break && !i < len1 & !i < len2 do
+ while !break && !i < len1 && !i < len2 do
break := s1.(!i) = s2.(!i);
incr i;
done;