def page.leaf

bend-kit-sigv4@0.11.0.1 · sigv4.bend:1092

import Base

1092def page.leaf(a: Acc, +p: String, +n: String, +x: String) -> Acc:
1093  Acc{+cur, +objs, +pre, +cut, +next} = a
1094  +top = String.eq(p, "ListBucketResult")
1095  +done = Bool.and(top, String.eq(n, "Contents"))
1096  Acc{Bool.pick(Object, done, blank(), Bool.pick(Object, String.eq(p, "Contents"), obj.set(cur, n, x), cur)),
1097    Bool.pick(List<&2, Object>, done, Con{cur, objs}, objs),
1098    Bool.pick(List<&2, String>, Bool.and(String.eq(p, "CommonPrefixes"), String.eq(n, "Prefix")), Con{x, pre}, pre),
1099    Bool.pick(Bool, Bool.and(top, String.eq(n, "IsTruncated")), String.eq(x, "true"), cut),
1100    Bool.pick(String, Bool.and(top, String.eq(n, "NextContinuationToken")), x, next)}