package posix-time2

You can search for identifiers within the package.

in-package search v0.2.0

Bindings for posix time functions

Install

Dune Dependency

github.com Readme Edit opam file Versions (5)

Authors

R

Romain Beauxis

Maintainers

R

romain.beauxis@gmail.com

Sources

v2.1.0.tar.gz

md5=0c6a8cd7b7f5e163160abb8a62f75a5b

sha512=735c6afd48e36af0a032f51217e7558629a198fd39a0484883831bdbff511b331033696b8ad73c6896fa9df0a0b1fd2f27336c2b0b7447dd10902e6bc64e4886

doc/src/posix-time2.stubs/posix_time2_stubs.ml.html

Source file `posix_time2_stubs.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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
open Ctypes

module Def (F : Cstubs.FOREIGN) = struct
  open F
  module Types = Posix_time2_types.Def (Posix_time2_generated_types)
  open Types

  let asctime = foreign "asctime" (ptr Tm.t @-> returning string)

  let clock_getres =
    foreign "clock_getres"
      (Posix_types.clockid_t @-> ptr Timespec.t @-> returning int)

  let clock_gettime =
    foreign "clock_gettime"
      (Posix_types.clockid_t @-> ptr Timespec.t @-> returning int)

  let clock_settime =
    foreign "clock_settime"
      (Posix_types.clockid_t @-> ptr Timespec.t @-> returning int)

  let ctime = foreign "ctime" (ptr Posix_types.time_t @-> returning string)
  let gmtime = foreign "gmtime" (ptr Posix_types.time_t @-> returning (ptr Tm.t))

  let localtime =
    foreign "localtime" (ptr Posix_types.time_t @-> returning (ptr Tm.t))

  let mktime = foreign "mktime" (ptr Tm.t @-> returning Posix_types.time_t)

  let nanosleep =
    foreign "nanosleep" (ptr Timespec.t @-> ptr void @-> returning int)

  let clock_nanosleep =
    foreign "clock_nanosleep"
      (Posix_types.clockid_t @-> int @-> ptr Timespec.t @-> ptr void
     @-> returning int)

  let getitimer = foreign "getitimer" (int @-> ptr Itimerval.t @-> returning int)

  let setitimer =
    foreign "setitimer"
      (int @-> ptr Itimerval.t @-> ptr Itimerval.t @-> returning int)

  let gettimeofday =
    foreign "gettimeofday" (ptr Timeval.t @-> ptr void @-> returning int)

  let fd_zero =
    foreign "ocaml_posix_time2_fd_zero"
      (ptr Posix_time2_types.fd_set @-> returning void)

  let fd_set =
    foreign "ocaml_posix_time2_fd_set"
      (int @-> ptr Posix_time2_types.fd_set @-> returning void)

  let fd_isset =
    foreign "ocaml_posix_time2_fd_isset"
      (int @-> ptr Posix_time2_types.fd_set @-> returning int)

  let fd_clr =
    foreign "ocaml_posix_time2_fd_clr"
      (int @-> ptr Posix_time2_types.fd_set @-> returning void)

  let select =
    foreign "select"
      (int
      @-> ptr Posix_time2_types.fd_set
      @-> ptr Posix_time2_types.fd_set
      @-> ptr Posix_time2_types.fd_set
      @-> ptr Timeval.t @-> returning int)

  let utimes = foreign "utimes" (string @-> ptr Timeval.t @-> returning int)
end

package posix-time2

Install

Dune Dependency

Authors

Maintainers

Sources

doc/src/posix-time2.stubs/posix_time2_stubs.ml.html

Source file posix_time2_stubs.ml

Source file `posix_time2_stubs.ml`