def server.accept.un
import emerging-ezhttp@0.21.0.0/src/server.bend as Serverimport Base
import emerging-ezhttp@0.21.0.0/src/step.bend as Step
57# accept one connection, waiting at most server.wait() ms
58def server.accept.un(r: Listener & Result<&1, &1, U32 & String, Socket>)
59 -> IO(Listener & Step.Accept<Socket>):
60 (lst, res) = r
61 IO.pure(Listener & Step.Accept<Socket>, (lst, Step.step.accepted(Socket, res)))