mirror of
https://github.com/c-cube/ocaml-containers.git
synced 2025-12-05 19:00:31 -05:00
small fix
This commit is contained in:
parent
fcd987f1c0
commit
6c8de1bc64
1 changed files with 1 additions and 1 deletions
|
|
@ -718,7 +718,7 @@ let equal_caseless s1 s2: bool =
|
|||
in
|
||||
String.length s1 = String.length s2 &&
|
||||
for_all2
|
||||
(fun c1 c2 -> Char.equal (char_lower c1) (char_lower c2))
|
||||
(fun c1 c2 -> char_lower c1 = char_lower c2)
|
||||
s1 s2
|
||||
|
||||
let pp buf s =
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue