refactor: specialize string functions for opam's parser string cache

do not rely on polymorphic hashing/comparison for strings Signed-off-by: Rudi Grinberg <[email protected]>
ocaml · Jan 19, 2025 · de1beb3 · de1beb3
1 parent 8e544a5
commit de1beb3
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/vendor/opam-file-format/opamLexer.mll b/vendor/opam-file-format/opamLexer.mll
@@ -82,8 +82,7 @@ let char_for_hexadecimal_code lexbuf i =
   Char.chr (val1 * 16 + val2)
 
 (* Some hash-consing for strings *)
-module HS =
-  Weak.Make(struct include String let hash = Hashtbl.hash let equal = (=) end)
+module HS = Weak.Make(String)
 let hm = HS.create 317