>word< ( word -- byte byte )

Vocabulary

cpu.8080.emulator

Inputs

word

an object

Outputs

byte	an object
byte	an object

Definition

USING: kernel math ;

IN: cpu.8080.emulator

: >word< ( word -- byte byte )
    dup 255 bitand swap -8 shift 255 bitand swap ;