simon/iter
1
0
Fork 0
mirror of https://github.com/c-cube/iter.git synced 2025-12-06 19:25:30 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

merge from master

Browse source
This commit is contained in:
Simon Cruanes 2015-01-21 00:09:58 +01:00
commit 90df6f3719
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
bigarray/sequenceBigarray.ml
View file

@ -36,7 +36,7 @@ let mmap filename =
let fd = Unix.openfile filename [Unix.O_RDONLY] 0 in let fd = Unix.openfile filename [Unix.O_RDONLY] 0 in
let len = Unix.lseek fd 0 Unix.SEEK_END in let len = Unix.lseek fd 0 Unix.SEEK_END in
let _ = Unix.lseek fd 0 Unix.SEEK_SET in let _ = Unix.lseek fd 0 Unix.SEEK_SET in
let b = Bigarray.Array1.map_file fd Bigarray.Char Bigarray.C_layout false len in let b = Bigarray.Array1.map_file fd Bigarray.char Bigarray.c_layout false len in
try try
of_bigarray b yield; of_bigarray b yield;
Unix.close fd Unix.close fd