update-zero-flag ( result cpu -- )

Vocabulary

cpu.8080.emulator

Inputs

result	an object
cpu	an object

Outputs

None

Definition

USING: kernel math ;

IN: cpu.8080.emulator

: update-zero-flag ( result cpu -- )
    swap 255 bitand 0 =
    [ zero-flag set-flag ] [ zero-flag clear-flag ] if ;