Commit 9f4d23d9 authored by POTTIER Francois's avatar POTTIER Francois

Updated [Misc].

parent c6bc2fdf
......@@ -230,7 +230,7 @@ let rec smapa f accu = function
let normalize s =
let s = Bytes.of_string s in
let n = String.length s in
let n = Bytes.length s in
for i = 0 to n - 1 do
match Bytes.get s i with
| '('
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment