package index
A platform-agnostic multi-level index for OCaml
Install
Dune Dependency
Authors
Maintainers
Sources
index-1.6.2.tbz
sha256=9388835098a4ed44eeced070ed86855c049df12a98311d4980b9b724ecab8860
sha512=2e3052aac2a3ee4190e5cbc914d37904d589997463b22023d31e6b75e21d779342088324a9b42d1854bf7131f32f3e75f6f9cc2cb214d79dd2baa0b4cc2eaad3
doc/src/index.unix/syscalls.ml.html
Source file syscalls.ml
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35open! Import external pread_int : Unix.file_descr -> int -> bytes -> int -> int -> int = "caml_index_pread_int" external pread_int64 : Unix.file_descr -> int64 -> bytes -> int -> int -> int = "caml_index_pread_int64" let pread : fd:_ -> fd_offset:int63 -> _ = match Int63.is_immediate with | True -> fun ~fd ~fd_offset ~buffer ~buffer_offset ~length -> pread_int fd fd_offset buffer buffer_offset length | False -> fun ~fd ~fd_offset ~buffer ~buffer_offset ~length -> pread_int64 fd (Int63.Boxed.to_int64 fd_offset) buffer buffer_offset length external pwrite_int : Unix.file_descr -> int -> bytes -> int -> int -> int = "caml_index_pwrite_int" external pwrite_int64 : Unix.file_descr -> int64 -> bytes -> int -> int -> int = "caml_index_pwrite_int64" let pwrite : fd:_ -> fd_offset:int63 -> _ = match Int63.is_immediate with | True -> fun ~fd ~fd_offset ~buffer ~buffer_offset ~length -> pwrite_int fd fd_offset buffer buffer_offset length | False -> fun ~fd ~fd_offset ~buffer ~buffer_offset ~length -> pwrite_int64 fd (Int63.Boxed.to_int64 fd_offset) buffer buffer_offset length