def hs.md.step

bend-osdev-hashes@0.1.0.0 · hashes.bend:124

import Base

124# one byte in: a block of last + 1 bytes is compressed when it is full
125def hs.md.step(~C: Data, ~compress: C -> List<&2, U32> -> C, ~last: U32, s: HsMdState<C>, b: U32) -> HsMdState<C>:
126  match s:
127    case HsMdState{cv, buf, +cnt, nb}:
128      hs.md.push(~C, ~compress, U32.is_eq(cnt, last), cv, Con{b, buf}, cnt, nb)