aboutsummaryrefslogtreecommitdiff
path: root/ide
diff options
context:
space:
mode:
authorGaëtan Gilbert2020-03-30 13:19:45 +0200
committerGaëtan Gilbert2020-03-30 13:19:45 +0200
commit64e65e9fe7f0a4ea72ab195a4e8708a181c5abef (patch)
treeffb14c27988d3ead4d795d471d7a39191baf2823 /ide
parente21aae1b32adba4e8673783f327826d279e05ced (diff)
parentf3fb2f21646f257c0dd030a8411bafd80ea9d0bd (diff)
Merge PR #11817: [cleanup] Remove unnecessary Map/Set module creation
Reviewed-by: SkySkimmer Reviewed-by: herbelin Ack-by: ppedrot
Diffstat (limited to 'ide')
-rw-r--r--ide/wg_Completion.ml12
1 files changed, 1 insertions, 11 deletions
diff --git a/ide/wg_Completion.ml b/ide/wg_Completion.ml
index dcb71d96a1..a7f8c70499 100644
--- a/ide/wg_Completion.ml
+++ b/ide/wg_Completion.ml
@@ -8,17 +8,7 @@
(* * (see LICENSE file for the text of the license) *)
(************************************************************************)
-module StringOrd =
-struct
- type t = string
- let compare s1 s2 =
- (* we use first size, then usual comparison *)
- let d = String.length s1 - String.length s2 in
- if d <> 0 then d
- else compare s1 s2
-end
-
-module Proposals = Set.Make(StringOrd)
+module Proposals = CString.Set
(** Retrieve completion proposals in the buffer *)
let get_syntactic_completion (buffer : GText.buffer) pattern accu =