def cd.fill

bend-kit-zlib@0.5.1.0 · zlib.bend:232

import Base
import bend-kit-bits@0.1.0.1/bits.bend as Bits

232def cd.fill(over: Bool, h: Bits.Huff, b: Br, acc: List<&2, U32>, +n: U32, +v: U32, +cnt: U32) -> Cd:
233  match over:
234    case True{}:
235      Cd{h, b, acc, n, v, True{}}
236    case False{}:
237      Cd{h, b, rep(bits(cnt), v, acc), (n + cnt : U32), v, False{}}