def b64.quad

emerging-ezhttp@0.21.0.0 · src/b64.bend:48

import emerging-ezhttp@0.21.0.0/src/b64.bend as B64
import Base

48# one quantum as four characters
49def b64.quad(+a: U32, +b: U32, +c: U32, pad: Nat) -> String:
50  +n = b64.pack(a, b, c)
51  SCon{b64.at(U32.shrn(n, 18n)), SCon{b64.at(U32.shrn(n, 12n)), b64.tail(n, pad)}}

Uses (7)

Used by (2)