def LcFcrypt.key

bend-osdev-legacy-ciphers@0.1.0.0 · fcrypt.bend:217

import Base
import bend-osdev-bytes@0.1.0.0/bytes.bend as B
import bend-osdev-legacy-ciphers@0.1.0.0/legacy_ciphers.bend as L

217# an 8-byte key (the parity bits are ignored)
218def LcFcrypt.key(o: B.Octets) -> Result<&2, &2, L.LcError, LcFcryptKey>:
219  +xs = B.Octets.to_list(o)
220  fc.key.pick(Nat.is_eq(B.len(xs), 8n), xs)