Mercurial > vba-clojure
comparison clojure/com/aurellem/gb/gb_driver.clj @ 523:d00096b6bf17
added sound introspection abilities.
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Sat, 23 Jun 2012 20:34:14 -0500 |
parents | 5596cd4a3fc6 |
children | 7ef5c73ea8fa |
comparison
equal
deleted
inserted
replaced
522:5596cd4a3fc6 | 523:d00096b6bf17 |
---|---|
190 (assert (= size (count new-data))) | 190 (assert (= size (count new-data))) |
191 (store-fn store) | 191 (store-fn store) |
192 (update-state))) | 192 (update-state))) |
193 ([new-data] | 193 ([new-data] |
194 (store-data @current-state new-data)))) | 194 (store-data @current-state new-data)))) |
195 | |
196 (def sound-data | |
197 (cpu-data Gb/SOUND_SIZE | |
198 (fn [arr] | |
199 (Gb/getFrameSound arr) | |
200 (Gb/setSoundFrameWritten 0)))) | |
195 | 201 |
196 (def memory | 202 (def memory |
197 (cpu-data Gb/GB_MEMORY #(Gb/getMemory %))) | 203 (cpu-data Gb/GB_MEMORY #(Gb/getMemory %))) |
198 | 204 |
199 (def ram | 205 (def ram |