# HG changeset patch # User Robert McIntyre # Date 1331614982 18000 # Node ID d2e00ea31508f85685f6a81017d5c512726ad422 # Parent 3305490a8f62e34557fcb0a8d40c9aa4463901a5 checking in continue!, which let's the GB run for an unlimited time. diff -r 3305490a8f62 -r d2e00ea31508 clojure/com/aurellem/gb_driver.clj --- a/clojure/com/aurellem/gb_driver.clj Mon Mar 12 22:51:56 2012 -0500 +++ b/clojure/com/aurellem/gb_driver.clj Tue Mar 13 00:03:02 2012 -0500 @@ -131,6 +131,9 @@ ([n] (play @current-state n))) +(defn continue! [] + (play @current-state Integer/MAX_VALUE)) + (defn play-moves ([moves [prev state]] (set-state! state)