def cr.f128.block

bend-osdev-crypto@0.1.0.0 · inst_cm.bend:69

import Base
import bend-osdev-cipher-modes@0.1.0.0/cipher_modes.bend as M

69# exactly 16 bytes as a block
70def cr.f128.block(xs: List<&2, U32>) -> Maybe<&2, M.CmBlock>:
71  match xs:
72    case Con{a0, Con{a1, Con{a2, Con{a3, Con{a4, Con{a5, Con{a6, Con{a7, Con{a8, Con{a9, Con{a10, Con{a11, Con{a12, Con{a13, Con{a14, Con{a15, Nil{}}}}}}}}}}}}}}}}}:
73      Some{M.CmBlock{cr.f128.word(a0, a1, a2, a3), cr.f128.word(a4, a5, a6, a7), cr.f128.word(a8, a9, a10, a11), cr.f128.word(a12, a13, a14, a15)}}
74    case _:
75      None{}