def lanes
import bend-collections@1.0.0.0/src/crypto/sha512/core.bend as Coreimport Base
import bend-collections@1.0.0.0/src/crypto/sha512/types.bend as T
128# Big-endian 64-bit words, eight bytes each.
129def lanes(bytes: List<&2, U32>) -> List<&2, T.Lane>:
130 match bytes:
131 case a <> b <> c <> d <> e <> f <> g <> h <> rest:
132 T.W{pack(a, b, c, d), pack(e, f, g, h)} <> lanes(rest)
133 case _:
134 Nil{}