comparison clojure/com/aurellem/gb_driver.clj @ 117:bcb5c41626b4

saving progress
author Robert McIntyre <rlm@mit.edu>
date Fri, 16 Mar 2012 17:50:35 -0500
parents ad96e9464d6a
children 718abf3bec8a
comparison
equal deleted inserted replaced
116:e45031af5327 117:bcb5c41626b4
126 (try 126 (try
127 (set-state! state) 127 (set-state! state)
128 (dorun (dotimes [_ n] 128 (dorun (dotimes [_ n]
129 (Thread/sleep 1) 129 (Thread/sleep 1)
130 (Gb/step))) 130 (Gb/step)))
131
132 (finally 131 (finally
133 (update-state)))) 132 (update-state))))
134 ([n] 133 ([n]
135 (play @current-state n))) 134 (play @current-state n)))
136 135