package ocaml-base-compiler
type error = Unix.error =
| E2BIG
| EACCES
| EAGAIN
| EBADF
| EBUSY
| ECHILD
| EDEADLK
| EDOM
| EEXIST
| EFAULT
| EFBIG
| EINTR
| EINVAL
| EIO
| EISDIR
| EMFILE
| EMLINK
| ENAMETOOLONG
| ENFILE
| ENODEV
| ENOENT
| ENOEXEC
| ENOLCK
| ENOMEM
| ENOSPC
| ENOSYS
| ENOTDIR
| ENOTEMPTY
| ENOTTY
| ENXIO
| EPERM
| EPIPE
| ERANGE
| EROFS
| ESPIPE
| ESRCH
| EXDEV
| EWOULDBLOCK
| EINPROGRESS
| EALREADY
| ENOTSOCK
| EDESTADDRREQ
| EMSGSIZE
| EPROTOTYPE
| ENOPROTOOPT
| EPROTONOSUPPORT
| ESOCKTNOSUPPORT
| EOPNOTSUPP
| EPFNOSUPPORT
| EAFNOSUPPORT
| EADDRINUSE
| EADDRNOTAVAIL
| ENETDOWN
| ENETUNREACH
| ENETRESET
| ECONNABORTED
| ECONNRESET
| ENOBUFS
| EISCONN
| ENOTCONN
| ESHUTDOWN
| ETOOMANYREFS
| ETIMEDOUT
| ECONNREFUSED
| EHOSTDOWN
| EHOSTUNREACH
| ELOOP
| EOVERFLOW
| EUNKNOWNERR of int
exception Unix_error of error * string * string
val error_message : error -> string
val wait : unit -> int * process_status
val waitpid : mode:wait_flag list -> int -> int * process_status
val system : string -> process_status
type file_descr = Unix.file_descr
val stdin : file_descr
val stdout : file_descr
val stderr : file_descr
type open_flag = Unix.open_flag =
val openfile : string -> mode:open_flag list -> perm:file_perm -> file_descr
val close : file_descr -> unit
val read : file_descr -> buf:bytes -> pos:int -> len:int -> int
val write : file_descr -> buf:bytes -> pos:int -> len:int -> int
val single_write : file_descr -> buf:bytes -> pos:int -> len:int -> int
val write_substring : file_descr -> buf:string -> pos:int -> len:int -> int
val single_write_substring :
file_descr ->
buf:string ->
pos:int ->
len:int ->
int
val in_channel_of_descr : file_descr -> Pervasives.in_channel
val out_channel_of_descr : file_descr -> Pervasives.out_channel
val descr_of_in_channel : Pervasives.in_channel -> file_descr
val descr_of_out_channel : Pervasives.out_channel -> file_descr
val lseek : file_descr -> int -> mode:seek_command -> int
val ftruncate : file_descr -> len:int -> unit
type stats = Unix.stats = {
st_dev : int;
st_ino : int;
st_kind : file_kind;
st_perm : file_perm;
st_nlink : int;
st_uid : int;
st_gid : int;
st_rdev : int;
st_size : int;
st_atime : float;
st_mtime : float;
st_ctime : float;
}
val stat : string -> stats
val lstat : string -> stats
val fstat : file_descr -> stats
val isatty : file_descr -> bool
module LargeFile : sig ... end
val chmod : string -> perm:file_perm -> unit
val fchmod : file_descr -> perm:file_perm -> unit
val fchown : file_descr -> uid:int -> gid:int -> unit
val access : string -> perm:access_permission list -> unit
val dup : file_descr -> file_descr
val dup2 : src:file_descr -> dst:file_descr -> unit
val set_nonblock : file_descr -> unit
val clear_nonblock : file_descr -> unit
val set_close_on_exec : file_descr -> unit
val clear_close_on_exec : file_descr -> unit
val mkdir : string -> perm:file_perm -> unit
type dir_handle = Unix.dir_handle
val opendir : string -> dir_handle
val readdir : dir_handle -> string
val rewinddir : dir_handle -> unit
val closedir : dir_handle -> unit
val pipe : unit -> file_descr * file_descr
val mkfifo : string -> perm:file_perm -> unit
val create_process :
prog:string ->
args:string array ->
stdin:file_descr ->
stdout:file_descr ->
stderr:file_descr ->
int
val create_process_env :
prog:string ->
args:string array ->
env:string array ->
stdin:file_descr ->
stdout:file_descr ->
stderr:file_descr ->
int
val open_process_in : string -> Pervasives.in_channel
val open_process_out : string -> Pervasives.out_channel
val open_process : string -> Pervasives.in_channel * Pervasives.out_channel
val open_process_full :
string ->
env:string array ->
Pervasives.in_channel * Pervasives.out_channel * Pervasives.in_channel
val close_process_in : Pervasives.in_channel -> process_status
val close_process_out : Pervasives.out_channel -> process_status
val close_process :
(Pervasives.in_channel * Pervasives.out_channel) ->
process_status
val close_process_full :
(Pervasives.in_channel * Pervasives.out_channel * Pervasives.in_channel) ->
process_status
val select :
read:file_descr list ->
write:file_descr list ->
except:file_descr list ->
timeout:float ->
file_descr list * file_descr list * file_descr list
val lockf : file_descr -> mode:lock_command -> len:int -> unit
val sigprocmask : mode:sigprocmask_command -> int list -> int list
type tm = Unix.tm = {
tm_sec : int;
tm_min : int;
tm_hour : int;
tm_mday : int;
tm_mon : int;
tm_year : int;
tm_wday : int;
tm_yday : int;
tm_isdst : bool;
}
val gmtime : float -> tm
val localtime : float -> tm
val times : unit -> process_times
val getitimer : interval_timer -> interval_timer_status
val setitimer :
interval_timer ->
interval_timer_status ->
interval_timer_status
type passwd_entry = Unix.passwd_entry = {
pw_name : string;
pw_passwd : string;
pw_uid : int;
pw_gid : int;
pw_gecos : string;
pw_dir : string;
pw_shell : string;
}
val getpwnam : string -> passwd_entry
val getgrnam : string -> group_entry
val getpwuid : int -> passwd_entry
val getgrgid : int -> group_entry
type inet_addr = Unix.inet_addr
val inet_addr_of_string : string -> inet_addr
val string_of_inet_addr : inet_addr -> string
val inet_addr_any : inet_addr
val inet_addr_loopback : inet_addr
val inet6_addr_any : inet_addr
val inet6_addr_loopback : inet_addr
val socket :
domain:socket_domain ->
kind:socket_type ->
protocol:int ->
file_descr
val domain_of_sockaddr : sockaddr -> socket_domain
val socketpair :
domain:socket_domain ->
kind:socket_type ->
protocol:int ->
file_descr * file_descr
val accept : file_descr -> file_descr * sockaddr
val bind : file_descr -> addr:sockaddr -> unit
val connect : file_descr -> addr:sockaddr -> unit
val listen : file_descr -> max:int -> unit
val shutdown : file_descr -> mode:shutdown_command -> unit
val getsockname : file_descr -> sockaddr
val getpeername : file_descr -> sockaddr
val recv :
file_descr ->
buf:bytes ->
pos:int ->
len:int ->
mode:msg_flag list ->
int
val recvfrom :
file_descr ->
buf:bytes ->
pos:int ->
len:int ->
mode:msg_flag list ->
int * sockaddr
val send :
file_descr ->
buf:bytes ->
pos:int ->
len:int ->
mode:msg_flag list ->
int
val send_substring :
file_descr ->
buf:string ->
pos:int ->
len:int ->
mode:msg_flag list ->
int
val sendto :
file_descr ->
buf:bytes ->
pos:int ->
len:int ->
mode:msg_flag list ->
addr:sockaddr ->
int
val sendto_substring :
file_descr ->
bug:string ->
pos:int ->
len:int ->
mode:msg_flag list ->
sockaddr ->
int
val getsockopt : file_descr -> socket_bool_option -> bool
val setsockopt : file_descr -> socket_bool_option -> bool -> unit
val getsockopt_int : file_descr -> socket_int_option -> int
val setsockopt_int : file_descr -> socket_int_option -> int -> unit
val getsockopt_optint : file_descr -> socket_optint_option -> int option
val setsockopt_optint :
file_descr ->
socket_optint_option ->
int option ->
unit
val getsockopt_float : file_descr -> socket_float_option -> float
val setsockopt_float : file_descr -> socket_float_option -> float -> unit
val getsockopt_error : file_descr -> error option
val open_connection :
sockaddr ->
Pervasives.in_channel * Pervasives.out_channel
val shutdown_connection : Pervasives.in_channel -> unit
val establish_server :
(Pervasives.in_channel -> Pervasives.out_channel -> unit) ->
addr:sockaddr ->
unit
type host_entry = Unix.host_entry = {
h_name : string;
h_aliases : string array;
h_addrtype : socket_domain;
h_addr_list : inet_addr array;
}
val gethostbyname : string -> host_entry
val gethostbyaddr : inet_addr -> host_entry
val getprotobyname : string -> protocol_entry
val getprotobynumber : int -> protocol_entry
val getservbyname : string -> protocol:string -> service_entry
val getservbyport : int -> protocol:string -> service_entry
type addr_info = {
ai_family : socket_domain;
ai_socktype : socket_type;
ai_protocol : int;
ai_addr : sockaddr;
ai_canonname : string;
}
type getaddrinfo_option =
| AI_FAMILY of socket_domain
| AI_SOCKTYPE of socket_type
| AI_PROTOCOL of int
| AI_NUMERICHOST
| AI_CANONNAME
| AI_PASSIVE
val getaddrinfo : string -> string -> getaddrinfo_option list -> addr_info list
val getnameinfo : sockaddr -> getnameinfo_option list -> name_info
type terminal_io = Unix.terminal_io = {
mutable c_ignbrk : bool;
mutable c_brkint : bool;
mutable c_ignpar : bool;
mutable c_parmrk : bool;
mutable c_inpck : bool;
mutable c_istrip : bool;
mutable c_inlcr : bool;
mutable c_igncr : bool;
mutable c_icrnl : bool;
mutable c_ixon : bool;
mutable c_ixoff : bool;
mutable c_opost : bool;
mutable c_obaud : int;
mutable c_ibaud : int;
mutable c_csize : int;
mutable c_cstopb : int;
mutable c_cread : bool;
mutable c_parenb : bool;
mutable c_parodd : bool;
mutable c_hupcl : bool;
mutable c_clocal : bool;
mutable c_isig : bool;
mutable c_icanon : bool;
mutable c_noflsh : bool;
mutable c_echo : bool;
mutable c_echoe : bool;
mutable c_echok : bool;
mutable c_echonl : bool;
mutable c_vintr : char;
mutable c_vquit : char;
mutable c_verase : char;
mutable c_vkill : char;
mutable c_veof : char;
mutable c_veol : char;
mutable c_vmin : int;
mutable c_vtime : int;
mutable c_vstart : char;
mutable c_vstop : char;
}
val tcgetattr : file_descr -> terminal_io
val tcsetattr : file_descr -> mode:setattr_when -> terminal_io -> unit
val tcsendbreak : file_descr -> duration:int -> unit
val tcdrain : file_descr -> unit
val tcflush : file_descr -> mode:flush_queue -> unit
val tcflow : file_descr -> mode:flow_action -> unit
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>