Module `Jsonrpc2_sync.IO_sync`

type 'a t = 'a

val return : 'a -> 'a t

module Infix : sig ... end

include module type of Infix

val (>>=) : 'a t -> ('a -> 'b t) -> 'b t
val (>|=) : 'a t -> ('a -> 'b) -> 'b t

module Future : Jsonrpc2__.Jsonrpc2_intf.FUTURE with type 'a wait = 'a t

type lock

val create_lock : unit -> lock
val with_lock : lock -> (unit -> 'a t) -> 'a t

type in_channel = Pervasives.in_channel
type out_channel = Pervasives.out_channel

val read_line : in_channel -> (string, exn) Pervasives.result t: Read a full line, including the trailing '\n'

val read_exact : in_channel -> bytes -> int -> (unit, exn) Pervasives.result t: read_exact ic buf n reads exactly n bytes into buf, starting at index 0.

val write_string : out_channel -> string -> (unit, exn) Pervasives.result t: write to the channel.