changeset 104:d2e00ea31508

checking in continue!, which let's the GB run for an unlimited time.
author Robert McIntyre <rlm@mit.edu>
date Tue, 13 Mar 2012 00:03:02 -0500
parents 3305490a8f62
children 2f8089eacab9
files clojure/com/aurellem/gb_driver.clj
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
     1.1 --- a/clojure/com/aurellem/gb_driver.clj	Mon Mar 12 22:51:56 2012 -0500
     1.2 +++ b/clojure/com/aurellem/gb_driver.clj	Tue Mar 13 00:03:02 2012 -0500
     1.3 @@ -131,6 +131,9 @@
     1.4    ([n]
     1.5       (play @current-state n)))
     1.6  
     1.7 +(defn continue! []
     1.8 +  (play @current-state Integer/MAX_VALUE))
     1.9 +
    1.10  (defn play-moves
    1.11    ([moves [prev state]]
    1.12       (set-state! state)