def server.dispatch

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

import Base
import emerging-ezhttp@0.21.0.0/src/http.bend as Http

520# turn a bad request into 400; otherwise call the handler
521def server.dispatch(~handle: Http.Request -> Http.Reply, req: Http.Request)
522  -> Http.Reply:
523  match req:
524    case Http.Bad{why}:
525      Http.Reply{400, [], why}
526    case Http.Request{method, target, headers, body}:
527      handle(Http.Request{method, target, headers, body})