comparison clojure/com/aurellem/gb/gb_driver.clj @ 191:893c753f8088

added function to set ROM
author Robert McIntyre <rlm@mit.edu>
date Thu, 22 Mar 2012 20:10:09 -0500
parents 3a3bb2197b7f
children d5dddf33543c
comparison
equal deleted inserted replaced
190:9a7a46c4aa1b 191:893c753f8088
198 (def write-memory! 198 (def write-memory!
199 (write-cpu-data Gb/GB_MEMORY #(Gb/writeMemory %))) 199 (write-cpu-data Gb/GB_MEMORY #(Gb/writeMemory %)))
200 200
201 (def write-registers! 201 (def write-registers!
202 (write-cpu-data Gb/NUM_REGISTERS #(Gb/writeRegisters %))) 202 (write-cpu-data Gb/NUM_REGISTERS #(Gb/writeRegisters %)))
203
204 (def write-rom!
205 (write-cpu-data Gb/ROM_SIZE #(Gb/writeROM %)))
203 206
204 ;;;;; Registers ;;;;;;;;;;;;;;;;;;;;;;;;;;; 207 ;;;;; Registers ;;;;;;;;;;;;;;;;;;;;;;;;;;;
205 208
206 (defmacro gen-get-set-register [name index] 209 (defmacro gen-get-set-register [name index]
207 (let [name-bang (symbol (str name "!"))] 210 (let [name-bang (symbol (str name "!"))]