diff --git a/src/blocking_IO.mli b/src/blocking_IO.mli index 9bbac2e4..f43882f6 100644 --- a/src/blocking_IO.mli +++ b/src/blocking_IO.mli @@ -7,11 +7,11 @@ include and type out_channel = out_channel val n_bytes_written : int Atomic.t -(** @since NEXT_RELEASE *) +(** @since 0.5 *) val n_bytes_read : int Atomic.t -(** @since NEXT_RELEASE *) +(** @since 0.5 *) val default_spawn : (unit -> unit) -> unit (** Start a new thread. - @since NEXT_RELEASE *) + @since 0.5 *) diff --git a/src/jsonrpc2.mli b/src/jsonrpc2.mli index 2472b868..7c92330a 100644 --- a/src/jsonrpc2.mli +++ b/src/jsonrpc2.mli @@ -22,7 +22,7 @@ module type S = sig val send_server_notification : t -> Lsp.Server_notification.t -> unit IO.t (** Send a notification from the server. - @since NEXT_RELEASE *) + @since 0.5 *) val send_server_request : t -> @@ -31,7 +31,7 @@ module type S = sig Req_id.t IO.t (** Send a request from the server, and pass a callback that will be called with the result in the future. - @since NEXT_RELEASE *) + @since 0.5 *) val run : ?shutdown:(unit -> bool) -> t -> unit IO.t (** Listen for incoming messages and responses. diff --git a/src/lwt/linol_lwt.ml b/src/lwt/linol_lwt.ml index 5c8f7ca0..c8dedd5c 100644 --- a/src/lwt/linol_lwt.ml +++ b/src/lwt/linol_lwt.ml @@ -32,7 +32,7 @@ module IO_lwt : end (** Spawn function. - @since NEXT_RELEASE *) + @since 0.5 *) let spawn f = Lwt.async (fun () -> Lwt.catch f (fun exn -> diff --git a/src/server.ml b/src/server.ml index bc99473d..8994f395 100644 --- a/src/server.ml +++ b/src/server.ml @@ -72,7 +72,7 @@ module Make (IO : IO) = struct method virtual spawn_query_handler : (unit -> unit IO.t) -> unit (** How to start a new future/task/thread concurrently. This is used to process incoming user queries. - @since NEXT_RELEASE *) + @since 0.5 *) end let async (self : #base_server) f : unit IO.t = @@ -165,7 +165,7 @@ module Make (IO : IO) = struct method get_status = status (** Check if exit or shutdown request was made by the client. - @since NEXT_RELEASE *) + @since 0.5 *) method find_doc (uri : DocumentUri.t) : doc_state option = try Some (Hashtbl.find docs uri) with Not_found -> None