Mercurial > vba-clojure
comparison clojure/com/aurellem/gb_driver.clj @ 107:ad96e9464d6a
working on the start of the bootstrap program; expanded register array to 29 elements
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Thu, 15 Mar 2012 03:24:05 -0500 |
parents | 3a60bb14a64a |
children | bcb5c41626b4 |
comparison
equal
deleted
inserted
replaced
106:3a60bb14a64a | 107:ad96e9464d6a |
---|---|
114 (step state [:listen])) | 114 (step state [:listen])) |
115 ([] (step (if @current-state @current-state (root))))) | 115 ([] (step (if @current-state @current-state (root))))) |
116 | 116 |
117 (defn tick | 117 (defn tick |
118 ([] (tick @current-state)) | 118 ([] (tick @current-state)) |
119 ([state] | 119 ([^SaveState state] |
120 (set-state! state) | 120 (set-state! state) |
121 (Gb/tick) | 121 (Gb/tick) |
122 (update-state))) | 122 (update-state))) |
123 | 123 |
124 (defn play | 124 (defn play |