Web.post.ok: def of ezmcp@0.1.0.0
Import: import ezmcp@0.1.0.0/src/web.bend as Web
Lines 147-154 of ezmcp@0.1.0.0/src/web.bend: https://jend.leeeet.dev/read.txt?path=ezmcp@0.1.0.0/src/web.bend&start_line=147&end_line=154

import Base
import ezmcp@0.1.0.0/src/server.bend as Server

# a POST: refused for an unsupported revision, else the server's step under
# the revision its header names
def post.ok(srv: Server.Server, body: String, header: String, ok: Bool) -> Web:
  match ok:
    case False{}:
      text(400, "Bad Request: unsupported MCP-Protocol-Version")
    case True{}:
      post.as(srv, body, revision(header))

Uses (7):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=String
  https://jend.leeeet.dev/definition.txt?path=ezmcp@0.1.0.0/src/server.bend&name=Server
  https://jend.leeeet.dev/definition.txt?path=ezmcp@0.1.0.0/src/web.bend&name=Web
  https://jend.leeeet.dev/definition.txt?path=ezmcp@0.1.0.0/src/web.bend&name=post.as
  https://jend.leeeet.dev/definition.txt?path=ezmcp@0.1.0.0/src/web.bend&name=revision
  https://jend.leeeet.dev/definition.txt?path=ezmcp@0.1.0.0/src/web.bend&name=text