(load-rom) ( n ram -- )


Vocabulary
cpu.8080.emulator

Inputs
nan object
raman object


Outputs
None

Definition
USING: io kernel math sequences ;

IN: cpu.8080.emulator

: (load-rom) ( n ram -- )
read1
[ -rot [ set-nth ] 2keep [ 1 + ] dip (load-rom) ] [ 2drop ]
if* ;