module Scheduler = Async_unix__.Raw_schedulermodule Unix = Async_unix__.Unix_syscallsmodule Id : sig ... endmodule Read_result : sig ... endmodule Internal : sig ... endval sexp_of_t : t ‑> Base.Sexp.tval sexp_of_handle_chunk_result : a. ('a ‑> Base.Sexp.t) ‑> 'a handle_chunk_result ‑> Base.Sexp.tval sexp_of_handle_iobuf_result : a. ('a ‑> Base.Sexp.t) ‑> 'a handle_iobuf_result ‑> Base.Sexp.tval sexp_of_read_one_chunk_at_a_time_result : a. ('a ‑> Base.Sexp.t) ‑> 'a read_one_chunk_at_a_time_result ‑> Base.Sexp.tval close : Internal.t ‑> unit Async_kernel__.Deferred0.tval close_finished : Internal.t ‑> unit Async_kernel__.Deferred0.tval create : ?buf_len:Core_kernel__Int.t ‑> Async_unix.Fd.t ‑> Internal.tval fd : Internal.t ‑> Async_unix.Fd.tval id : Internal.t ‑> Id.tval invariant : Internal.t ‑> unitval io_stats : Async_unix.Io_stats.tval is_closed : Internal.t ‑> boolval last_read_time : Internal.t ‑> Core.Time.tval of_in_channel : Core.In_channel.t ‑> Async_unix.Fd.Kind.t ‑> Internal.tval open_file : ?buf_len:Core_kernel__Int.t ‑> string ‑> Internal.t Async_kernel__Deferred.tval stdin : Internal.t lazy_tval with_close : Internal.t ‑> f:(unit ‑> 'a Async_unix__.Import.Monitor.Deferred.t) ‑> 'a Async_unix__.Import.Monitor.Deferred.tval with_file : ?buf_len:Core_kernel__Int.t ‑> ?exclusive:bool ‑> string ‑> f:(Internal.t ‑> 'a Async_unix__.Import.Monitor.Deferred.t) ‑> 'a Async_kernel__Deferred.tval use : t ‑> unitval finished_read : Internal.t ‑> unitval do_read : t ‑> (unit ‑> 'a Async_kernel__Deferred.t) ‑> 'a Async_kernel__Deferred.tval peek : t ‑> len:Core_kernel__Int.t ‑> [> `Eof | `Ok of Core_kernel__.Import.string ] Async_kernel__Deferred.tval read : t ‑> ?pos:Core_kernel__.Import.int ‑> ?len:Core_kernel__.Import.int ‑> Core.Substring.base ‑> [> `Eof | `Ok of Core.Int.t ] Async_kernel__Deferred.tval read_char : t ‑> [> `Eof | `Ok of Core_kernel__.Import.char ] Async_kernel__Deferred.tval read_substring : t ‑> Core.Substring.t ‑> [> `Eof | `Ok of Core.Int.t ] Async_kernel__Deferred.tval read_bigsubstring : t ‑> Core.Bigsubstring.t ‑> [> `Eof | `Ok of Core.Int.t ] Async_kernel__Deferred.tval read_one_chunk_at_a_time : t ‑> handle_chunk:(Core.Bigstring.t ‑> pos:int ‑> len:int ‑> [< `Consumed of Core_kernel__Int.t * [ `Need of Core_kernel__Int.t | `Need_unknown ] | `Continue | `Stop of 'a | `Stop_consumed of 'a * Core_kernel__Int.t ] Async_unix__.Import.Deferred.t) ‑> [> `Eof | `Eof_with_unconsumed_data of Core_kernel__.Import.string | `Stopped of 'a ] Async_kernel__Deferred.tval read_one_iobuf_at_a_time : t ‑> handle_chunk:(([< Core__.Import.read_write ], Core.Iobuf.seek) Core.Iobuf.t ‑> [< `Continue | `Stop of 'a ] Async_kernel__Deferred.t) ‑> [> `Eof | `Eof_with_unconsumed_data of Core_kernel__.Import.string | `Stopped of 'a ] Async_kernel__Deferred.tval really_read : t ‑> ?pos:Core_kernel__.Import.int ‑> ?len:Core_kernel__.Import.int ‑> Core.Substring.base ‑> [> `Eof of int | `Ok ] Async_kernel__Deferred.tval really_read_substring : t ‑> Core.Substring.t ‑> [> `Eof of int | `Ok ] Async_kernel__Deferred.tval really_read_bigsubstring : t ‑> Core.Bigsubstring.t ‑> [> `Eof of int | `Ok ] Async_kernel__Deferred.tval read_line : t ‑> [> `Eof | `Ok of Core_kernel__.Import.string ] Async_kernel__Deferred.tval really_read_line : wait_time:Core.Time.Span.t ‑> t ‑> Core.String.t option Async_kernel__Deferred.tval do_read_k : t ‑> (('a Core.Or_error.t ‑> unit) ‑> unit) ‑> ('a ‑> 'b) ‑> 'b Async_unix__.Import.Deferred.tval read_until : t ‑> [< `Char of Base__Char.t | `Pred of Core_kernel__.Import.char ‑> bool ] ‑> keep_delim:bool ‑> [> `Eof | `Eof_without_delim of Core_kernel__.Import.string | `Ok of Core_kernel__.Import.string ] Async_unix__.Import.Deferred.tval read_until_max : t ‑> [< `Char of Base__Char.t | `Pred of Core_kernel__.Import.char ‑> bool ] ‑> keep_delim:bool ‑> max:Core_kernel__Int.t ‑> [> `Eof | `Eof_without_delim of Core_kernel__.Import.string | `Max_exceeded of Core_kernel__.Import.string | `Ok of Core_kernel__.Import.string ] Async_unix__.Import.Deferred.tval read_sexp : ?parse_pos:Core.Sexp.Parse_pos.t ‑> t ‑> [> `Eof | `Ok of Core.Sexp.t ] Async_unix__.Import.Deferred.tval read_sexps : ?parse_pos:Core.Sexp.Parse_pos.t ‑> t ‑> Core.Sexp.t Async_unix__.Import.Pipe.Reader.tval read_annotated_sexps : ?parse_pos:Core.Sexp.Parse_pos.t ‑> t ‑> Core.Sexp.Annotated.t Async_unix__.Import.Pipe.Reader.tval peek_or_read_bin_prot : ?max_len:Core_kernel__Int.t ‑> t ‑> 'a Bin_prot.Type_class.reader ‑> peek_or_read:Internal.Peek_or_read.t ‑> [> `Eof | `Ok of 'a ] Async_unix__.Import.Deferred.tval peek_bin_prot : ?max_len:Core_kernel__Int.t ‑> t ‑> 'a Bin_prot.Type_class.reader ‑> [> `Eof | `Ok of 'a ] Async_unix__.Import.Deferred.tval read_bin_prot : ?max_len:Core_kernel__Int.t ‑> t ‑> 'a Bin_prot.Type_class.reader ‑> [> `Eof | `Ok of 'a ] Async_unix__.Import.Deferred.tval read_marshal_raw : t ‑> [> `Eof | `Ok of Core.Bytes.t ] Async_kernel__Deferred.tval read_marshal : t ‑> [> `Eof | `Ok of 'a ] Async_kernel__Deferred.tval recv : t ‑> [> `Eof | `Ok of Core.Bytes.t ] Async_kernel__Deferred.tval read_all : Internal.t ‑> (Internal.t ‑> [< `Eof | `Ok of 'a ] Async_kernel__Deferred.t) ‑> 'a Async_unix__.Import.Pipe.Reader.tval lines : t ‑> Core_kernel__.Import.string Async_unix__.Import.Pipe.Reader.tval contents : t ‑> string Async_kernel__Deferred.tval file_contents : string ‑> string Async_kernel__Deferred.tval file_lines : string ‑> Core_kernel__.Import.string list Async_kernel__Deferred.tval transfer : t ‑> (Core_kernel__.Import.string, Async_unix__.Import.Pipe.Writer.phantom) Async_unix__.Import.Pipe.t ‑> unit Async_unix__.Import.Deferred.tval lseek : t ‑> int64 ‑> mode:[< `Cur | `End | `Set ] ‑> int64 Async_kernel__Deferred.tval ltell : t ‑> Core.Int64.t Async_kernel__Deferred.tval get_error : file:Core_kernel__.Import.string ‑> sexp_kind:'a Internal.sexp_kind ‑> a_of_sexp:('a ‑> 'b) ‑> Core.Sexp.Annotated.t ‑> (unit, Core_kernel.Error.t) Core._resultval gen_load_exn : ?exclusive:bool ‑> sexp_kind:'a Internal.sexp_kind ‑> file:Core_kernel__.Import.string ‑> ('a list ‑> 'b) ‑> (Core.Sexp.Annotated.t list ‑> Core.Error.t) ‑> 'b Async_unix__.Import.Deferred.ttype ('sexp, 'a, 'b) load = ?exclusive:bool ‑> ?expand_macros:bool ‑> string ‑> ('sexp ‑> 'a) ‑> 'b Async_unix__.Import.Deferred.tmodule Macro_loader : sig ... endval gen_load_sexp_exn : ?exclusive:bool ‑> ?expand_macros:bool ‑> sexp_kind:'a Internal.sexp_kind ‑> file:Core_kernel__.Import.string ‑> a_of_sexp:('a ‑> 'b) ‑> 'b Async_kernel__Deferred.tval load_sexp_exn : ?exclusive:bool ‑> ?expand_macros:bool ‑> Core_kernel__.Import.string ‑> (Core.Sexp.t ‑> 'a) ‑> 'a Async_kernel__Deferred.tval load_annotated_sexp_exn : ?exclusive:bool ‑> ?expand_macros:bool ‑> Core_kernel__.Import.string ‑> (Core.Sexp.Annotated.t ‑> 'a) ‑> 'a Async_kernel__Deferred.tval gen_load_sexp : ?exclusive:bool ‑> ?expand_macros:bool ‑> sexp_kind:'a Internal.sexp_kind ‑> file:Core_kernel__.Import.string ‑> a_of_sexp:('a ‑> 'b) ‑> 'b Async_unix__.Import.Deferred.Or_error.tval load_sexp : ?exclusive:bool ‑> ?expand_macros:bool ‑> Core_kernel__.Import.string ‑> (Core.Sexp.t ‑> 'a) ‑> 'a Async_unix__.Import.Deferred.Or_error.tval load_annotated_sexp : ?exclusive:bool ‑> ?expand_macros:bool ‑> Core_kernel__.Import.string ‑> (Core.Sexp.Annotated.t ‑> 'a) ‑> 'a Async_unix__.Import.Deferred.Or_error.tval gen_load_sexps_exn : ?exclusive:bool ‑> ?expand_macros:bool ‑> sexp_kind:'a Internal.sexp_kind ‑> file:Core_kernel__.Import.string ‑> a_of_sexp:('a ‑> 'b) ‑> 'b Core.List.t Async_kernel__Deferred.tval load_sexps_exn : ?exclusive:bool ‑> ?expand_macros:bool ‑> Core_kernel__.Import.string ‑> (Core.Sexp.t ‑> 'a) ‑> 'a Core.List.t Async_kernel__Deferred.tval load_annotated_sexps_exn : ?exclusive:bool ‑> ?expand_macros:bool ‑> Core_kernel__.Import.string ‑> (Core.Sexp.Annotated.t ‑> 'a) ‑> 'a Core.List.t Async_kernel__Deferred.tval gen_load_sexps : ?exclusive:bool ‑> ?expand_macros:bool ‑> sexp_kind:'a Internal.sexp_kind ‑> file:Core_kernel__.Import.string ‑> a_of_sexp:('a ‑> 'b) ‑> 'b Core.List.t Async_unix__.Import.Deferred.Or_error.tval load_sexps : ?exclusive:bool ‑> ?expand_macros:bool ‑> Core_kernel__.Import.string ‑> (Core.Sexp.t ‑> 'a) ‑> 'a Core.List.t Async_unix__.Import.Deferred.Or_error.tval load_annotated_sexps : ?exclusive:bool ‑> ?expand_macros:bool ‑> Core_kernel__.Import.string ‑> (Core.Sexp.Annotated.t ‑> 'a) ‑> 'a Core.List.t Async_unix__.Import.Deferred.Or_error.tval pipe : t ‑> Core_kernel__.Import.string Async_unix__.Import.Pipe.Reader.tval drain : t ‑> unit Async_kernel__Deferred.ttype ('a, 'b) load_bin_prot = ?exclusive:bool ‑> ?max_len:int ‑> string ‑> 'a Bin_prot.Type_class.reader ‑> 'b Async_unix__.Import.Deferred.tval load_bin_prot : ?exclusive:bool ‑> ?max_len:Core_kernel__Int.t ‑> string ‑> 'a Bin_prot.Type_class.reader ‑> ('a, Core_kernel.Error.t) Core._result Async_kernel__Deferred.tval load_bin_prot_exn : ?exclusive:bool ‑> ?max_len:Core_kernel__Int.t ‑> string ‑> 'a Bin_prot.Type_class.reader ‑> 'a Async_kernel__Deferred.t