P2p: minor style issues

This commit is contained in:
Raphaël Proust 2019-02-21 14:58:59 +01:00 committed by Grégoire Henry
parent 9250e3891d
commit 568057ed8f
No known key found for this signature in database
GPG Key ID: 50D984F20BD445D2
2 changed files with 4 additions and 4 deletions

View File

@ -347,7 +347,7 @@ module Reader = struct
match status with
| Success { result ; size ; stream } ->
return_some (result, size, stream)
| Error _ ->
| Error _err ->
lwt_debug "[read_message] incremental decoding error" >>= fun () ->
return_none
| Await decode_next_buf ->

View File

@ -74,7 +74,7 @@ val authenticate:
[P2P_io_scheduler.connection] into an [authenticated_connection] (auth
correct, acceptation undecided). *)
val kick: 'meta authenticated_connection -> unit Lwt.t
val kick: 'meta authenticated_connection -> P2p_point.Id.t list -> unit Lwt.t
(** (Low-level) (Cancelable) [kick afd] notifies the remote peer that
we refuse this connection and then closes [afd]. Used in
[P2p_connection_pool] to reject an [authenticated_connection] which we do