try to fix compat issue

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

View file

@ -17,7 +17,7 @@ let prefix ~pre s =
else (
let rec check i =
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)
in
check 0