add-carry ( change-by result cpu -- change-by result )


Vocabulary
cpu.8080.emulator

Inputs
change-byan object
resultan object
cpuan object


Outputs
change-byan object
resultan object


Definition
USING: kernel math ;

IN: cpu.8080.emulator

: add-carry ( change-by result cpu -- change-by result )
flag-c? [ 1 + [ 1 + ] dip ] when ;