Sha256.digest_bytes: def of mylsm-lsm-store@0.6.0.1
Import: import mylsm-lsm-store@0.6.0.1/src/hub_sha/sha256.bend as Sha256
Lines 49-58 of mylsm-lsm-store@0.6.0.1/src/hub_sha/sha256.bend: https://jend.leeeet.dev/read.txt?path=mylsm-lsm-store@0.6.0.1/src/hub_sha/sha256.bend&start_line=49&end_line=58

import Base

# Big-endian octets, represented as U32 values in 0..255.
def digest_bytes(ws: List<&2, U32>) -> List<&2, U32>:
  match ws:
    case Nil{}:
      Nil{}
    case +w <> tail:
      U32.and(U32.shrn(w, 24n), 255) <>
      U32.and(U32.shrn(w, 16n), 255) <>
      U32.and(U32.shrn(w, 8n), 255) <>
      U32.and(w, 255) <> digest_bytes(tail)

Uses (4):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.and
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.shrn