def cr.xcbc.encb
import bend-osdev-crypto@0.1.0.0/xcbc.bend as Xcbcimport Base
import bend-osdev-bytes@0.1.0.0/bytes.bend as B
24# one block of bytes encrypted (a string the format refuses stays as it is)
25def cr.xcbc.encb(~K: Data, ~Blk: Data, ~enc: K -> Blk -> Blk, ~blk_to: Blk -> B.Octets, +k: K, x: Maybe<&2, Blk>, +o: B.Octets) -> B.Octets:
26 match x:
27 case None{}:
28 o
29 case Some{b}:
30 blk_to(enc(k, b))