def next.body

bend-kit-journal@0.3.1.0 · journal.bend:56

import Base

56def next.body(~P: Type, ~S: Type, ~u32: S -> @+at:U32 -> S & U32, ~cut: S -> @+hs:U32 -> @+len:U32 -> S & P, ~skip: S -> @+hs:U32 -> @+len:U32 -> S, ~sum: P -> P & U32, +len: U32, r: S & Bool) -> Step<P, S>:
57  (s, whole) = r
58  match whole:
59    case True{}:
60      next.want(~P, ~S, ~cut, ~skip, ~sum, len, u32(s, 8))
61    case False{}:
62      Short{s}