package flock

  1. Overview
  2. Docs
Ctypes bindings to flock for OCaml

Install 

dune-project
 Dependency

github.com Edit opam file Versions (1)

Authors

  1. S
    Si Beaumont

Maintainers

  1. S
    simon.beaumont@citrix.com

Sources

ocaml-flock-v1.0.0.tar.gz
sha256=07484e86ccd3bdbec30accca0cb6d406f9dfaad4618076a7e13f615c4bc4bf96
md5=36e19ef9f9875decb4d8dd1f16d56324

doc/src/flock_bindings/ffi_bindings.ml.html

Source file ffi_bindings.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
open Ctypes

module Types (F: Cstubs.Types.TYPE) = struct
  open F
  module Lock_operation = struct
    let lock_shared = constant "LOCK_SH" int
    let lock_exclusive = constant "LOCK_EX" int
    let lock_unlock = constant "LOCK_UN" int
    let lock_nonblocking = constant "LOCK_NB" int
  end
end

module Bindings (F : Cstubs.FOREIGN) = struct
  open F
  let flock = foreign "flock" (int @-> int @-> returning int)
end

module Foreign_bindings = struct
  open Foreign
  let flock = foreign "flock" ~check_errno:true (int @-> int @-> returning int)
end