def hdr.ck
import bend-kit-tar@0.3.0.0/tar.bend as Tarimport Base
import bend-kit-bytes@0.3.3.0/bytes.bend as Bytes
599# Six octal digits, NUL, space: the last space stays from the fields.
600def hdr.ck(r: Array<U32> & U32) -> Array<U32>:
601 (a, +s) = r
602 oct.put(6n, Bytes.poke(a, 154, 0), 153, s)