add-round-key ( aes n -- aes' )

Vocabulary

crypto.aes.private

Inputs

aes	an object
n	an object

Outputs

aes'

an object

Definition

USING: accessors kernel ;

IN: crypto.aes.private

: add-round-key ( aes n -- aes' )
    over (key-at-nth-round) swap
    [ (add-round-key) ] change-state ;