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

unit test fixes

Browse source
This commit is contained in:
cpiccion 2015-02-20 16:20:03 -05:00
parent a1ca8ff831
commit 777aca435a
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/data/CCRingBuffer.ml
View file

@ -361,7 +361,7 @@ struct
(*$Q
(Q.pair Q.printable_string Q.printable_string) (fun (s,s') -> \
(let b = ByteBuffer.create 24 in ByteBuffer.blit_from b s 0 (Bytes.length s);
(let b = ByteBuffer.create 24 in ByteBuffer.blit_from b s 0 (Bytes.length s); \
ByteBuffer.blit_from b s' 0 (Bytes.length s'); \
ByteBuffer.blit_from b "hello world" 0 (Bytes.length "hello word"); (* big enough *) \
let l = ByteBuffer.length b in let l' = l/2 in ByteBuffer.skip b l'; \