call-sub ( addr cpu -- )

Vocabulary

cpu.8080.emulator

Inputs

addr	an object
cpu	an object

Outputs

None

Definition

USING: accessors kernel math ;

IN: cpu.8080.emulator

: call-sub ( addr cpu -- )
    dup push-pc [ 65535 bitand ] dip pc<< ;