Mercurial > vba-clojure

diff clojure/com/aurellem/gb/gb_driver.clj @ 523:d00096b6bf17

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
added sound introspection abilities.
author Robert McIntyre <rlm@mit.edu>
date Sat, 23 Jun 2012 20:34:14 -0500
parents 5596cd4a3fc6
children 7ef5c73ea8fa
line wrap: on
line diff
     1.1 --- a/clojure/com/aurellem/gb/gb_driver.clj	Sat Jun 23 19:12:26 2012 -0500
     1.2 +++ b/clojure/com/aurellem/gb/gb_driver.clj	Sat Jun 23 20:34:14 2012 -0500
     1.3 @@ -193,6 +193,12 @@
     1.4      ([new-data]
     1.5         (store-data @current-state new-data))))
     1.6  
     1.7 +(def sound-data
     1.8 +  (cpu-data Gb/SOUND_SIZE
     1.9 +            (fn [arr]
    1.10 +              (Gb/getFrameSound arr)
    1.11 +              (Gb/setSoundFrameWritten 0))))
    1.12 +
    1.13  (def memory
    1.14    (cpu-data Gb/GB_MEMORY #(Gb/getMemory %)))
    1.15