def pool.take.of
import bend-kit-http@0.38.2.0/http.bend as Httpimport Base
2697def pool.take.of(+cap: U32, +key: String, r: Map<&1, List<&1, Conn>> & Maybe<&1, List<&1, Conn>>) -> Pool & Maybe<&1, Conn>:
2698 (m, got) = r
2699 match got:
2700 case None{}:
2701 (Pool{cap, m}, None{})
2702 case Some{xs}:
2703 match xs:
2704 case Nil{}:
2705 (Pool{cap, m}, None{})
2706 case Con{c, t}:
2707 (Pool{cap, Map.set(&1, List<&1, Conn>, m, key, t)}, Some{c})