(emulate-CALL) ( cpu -- )

Vocabulary

cpu.8080.emulator

Inputs

cpu

an object

Outputs

None

Definition

USING: accessors kernel math ;

IN: cpu.8080.emulator

: (emulate-CALL) ( cpu -- )
    [ next-word 65535 bitand ] keep [ sp>> 2 - dup ] keep
    [ sp<< ] keep [ pc>> ] keep swapd [ write-word ] keep pc<< ;