package eio
Effect-based direct-style IO API for OCaml
Install
dune-project
Dependency
Authors
Maintainers
Sources
eio-1.3.tbz
sha256=8ed5c13e6689f31c85dca5f12762d84b8cc0042a7b07d3e464df6eb4b72b3dfc
sha512=46e8f817f32c3316e7f35835a136ad177a295b3306351eb2efa2386482b0169a5b19ed2925b32da2a1f10d40f083fe3d588dd401908f9fec6e4a44cd68535204
doc/src/eio.unix/private.ml.html
Source file private.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
[@@@alert "-unstable"] open Eio.Std open Types type _ Effect.t += | Await_readable : Unix.file_descr -> unit Effect.t | Await_writable : Unix.file_descr -> unit Effect.t | Get_monotonic_clock : Eio.Time.Mono.ty r Effect.t | Pipe : Switch.t -> (source_ty r * sink_ty r) Effect.t let await_readable fd = Effect.perform (Await_readable fd) let await_writable fd = Effect.perform (Await_writable fd) let pipe sw = Effect.perform (Pipe sw) module Rcfd = Rcfd module Fork_action = Fork_action module Thread_pool = Thread_pool external eio_readlinkat : Unix.file_descr -> string -> Cstruct.t -> int = "eio_unix_readlinkat" let read_link_unix fd path = match fd with | None -> Unix.readlink path | Some fd -> let rec aux size = let buf = Cstruct.create_unsafe size in let len = eio_readlinkat fd path buf in if len < size then Cstruct.to_string ~len buf else aux (size * 4) in aux 1024 let read_link fd path = Fd.use_exn_opt "readlink" fd (fun fd -> read_link_unix fd path)
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>