Add CPU instructions.
This commit is contained in:
parent
7805e50062
commit
763c81a1e2
2 changed files with 27 additions and 9 deletions
|
@ -1,7 +1,6 @@
|
|||
open Printf
|
||||
|
||||
let rec run (cpu: Cpu.t) (mem: Memory.map) =
|
||||
let command = read_line () in
|
||||
Cpu.run cpu mem;
|
||||
run cpu mem
|
||||
|
||||
|
@ -17,8 +16,6 @@ let power_up cartridge =
|
|||
|
||||
let cpu = Cpu.init_cpu in
|
||||
let mem = Memory.init cartridge in
|
||||
Graphics.open_graph "";
|
||||
Graphics.resize_window 256 256;
|
||||
run cpu mem
|
||||
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue