From 0ae4e647c5ca9c7d8c736499e7854f23252e2efb Mon Sep 17 00:00:00 2001 From: Marshall Roch Date: Fri, 8 Dec 2017 11:14:17 -0800 Subject: [PATCH] Fix ocaml 4.02.3 compatibility --- src/wtf8.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/wtf8.ml b/src/wtf8.ml index eeea8a6..be7d371 100644 --- a/src/wtf8.ml +++ b/src/wtf8.ml @@ -82,7 +82,7 @@ let fold_wtf_8 ?(pos = 0) ?len f acc s = (* Add a UTF-16 code unit to a buffer, encoded in WTF-8. *) let add_wtf_8 buf code = - let w byte = Buffer.add_char buf (Char.unsafe_chr byte) [@@inline] in + let[@inline] w byte = Buffer.add_char buf (Char.unsafe_chr byte) in if code >= 0x10000 then begin (* 4 bytes *) w (0xf0 lor (code lsr 18));