emulate-XOR_(HL) ( cpu -- )

Vocabulary

cpu.8080

Inputs

cpu

an object

Outputs

None

Definition

USING: accessors cpu.8080.emulator kernel ;

IN: cpu.8080

: emulate-XOR_(HL) ( cpu -- )
    [ a>> ] keep [ hl>> ] keep [ read-byte ] keep
    [ xor-byte ] keep a<< ;