def server.conn

emerging-ezhttp@0.21.0.0 · src/server.bend:322

import 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

322# one connection: read, decide, maybe handle, write, close
323def server.conn(~C: Data, ~handle: C -> Req -> IO(Answer), +ctx: C,
324  sock: Socket) -> IO(Unit):
325  IO.bind(Socket & Step.Got<Http.Request>, Unit, server.read(sock),
326    r => server.conn.got(~C, handle, ctx, r))