Module Transport_intf.Handler_result
type 'a t=|Stop of 'a|Continue|Wait of unit Async_kernel.Deferred.tResult of an
on_messagecallback. We split theContinueandWait _cases to make it clear thatContinueis the expected case. The implementation should be optimized for this case.