simon/ocaml-containers
1
0
Fork 0
mirror of https://github.com/c-cube/ocaml-containers.git synced 2025-12-06 11:15:31 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

try to fix compat issue

Browse source
This commit is contained in:
Simon Cruanes 2022-02-17 10:20:24 -05:00
parent acadb6b9d3
commit c50ee3d928
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/core/cpp/cpp.ml
View file

@ -17,7 +17,7 @@ let prefix ~pre s =
else ( else (
let rec check i = let rec check i =
if i=len then true if i=len then true
else if Stdlib.(<>) (String.unsafe_get s i) (String.unsafe_get pre i) then false else if (String.unsafe_get s i) <> (String.unsafe_get pre i) then false
else check (i+1) else check (i+1)
in in
check 0 check 0