def server.answer
import emerging-ezhttp@0.21.0.0/src/server.bend as Serverimport Base
import emerging-ezhttp@0.21.0.0/src/http.bend as Http
import emerging-ezhttp@0.21.0.0/src/step.bend as Step
202# a text reply shaped for the request's method (HTTP-SRV-3), then close
203def server.answer(sock: Socket, method: String, reply: Http.Reply) -> IO(Unit):
204 IO.bind(Socket & Step.Got<Unit>, Unit,
205 server.send.text(sock, Http.respond.of(Http.reply.for(method, reply))),
206 server.close)