def pack

bend-collections-laws-crypto@1.0.0.0 · src/crypto/sha512/core.bend:124

import Base

124def pack(a: U32, b: U32, c: U32, d: U32) -> U32:
125  U32.or(U32.or(U32.or(U32.shln(U32.and(a, 255), 24n),
126    U32.shln(U32.and(b, 255), 16n)), U32.shln(U32.and(c, 255), 8n)), U32.and(d, 255))