comparison clojure/com/aurellem/gb_driver.clj @ 70:ff6f1acae59e

removed zero frame confusion
author Robert McIntyre <rlm@mit.edu>
date Thu, 08 Mar 2012 02:25:20 -0600
parents 8cb500493ec2
children 39928bf4622d
comparison
equal deleted inserted replaced
69:063b78119835 70:ff6f1acae59e
11 (def yellow-save-file 11 (def yellow-save-file
12 (File. "/home/r/proj/pokemon-escape/roms/yellow.sav")) 12 (File. "/home/r/proj/pokemon-escape/roms/yellow.sav"))
13 13
14 (defn vba-init [] 14 (defn vba-init []
15 (.delete yellow-save-file) 15 (.delete yellow-save-file)
16 (future 16 (Gb/startEmulator (.getCanonicalPath yellow-rom-image)))
17 (Gb/startEmulator (.getCanonicalPath yellow-rom-image))))
18 17
19 (defn cpu-data [size arr-fn] 18 (defn cpu-data [size arr-fn]
20 (let [store (int-array size)] 19 (let [store (int-array size)]
21 (fn [] 20 (fn []
22 (arr-fn store) 21 (arr-fn store)