add-byte-with-carry ( lhs rhs cpu -- result )


Vocabulary
cpu.8080.emulator

Inputs
lhsan object
rhsan object
cpuan object


Outputs
resultan object


Definition
USING: kernel math ;

IN: cpu.8080.emulator

: add-byte-with-carry ( lhs rhs cpu -- result )
[ 2dup + ] dip [ add-carry ] keep [ update-flags ] 2keep
[ update-half-carry-flag ] 2keep drop 255 bitand ;