def hear.step

emerging-ezhttp@0.22.0.0 · src/http.bend:1637

import Base

1637# an interim head: on to the next; a final one: its body
1638def hear.step(asked: Bool, +ls: List<&2, String>, +after: String,
1639  interim: Bool, go: String -> Hear) -> Hear:
1640  match interim:
1641    case True{}:
1642      go(after)
1643    case False{}:
1644      hear.body(frame(Bool.or(asked, status.bare(status.of(ls))),
1645        head.go(ls, "transfer-encoding"), head.values(ls, "content-length")),
1646        after)