Mercurial > vba-clojure

changeset 279:aa9b8d9d5b76

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
script: save corruption
author Robert McIntyre <rlm@mit.edu>
date Tue, 27 Mar 2012 13:33:44 -0500
parents 7ecea582ec9d
children d5e5c73af7e6
files clojure/com/aurellem/run/bootstrap_0.clj
diffstat 1 files changed, 74 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
     1.1 --- a/clojure/com/aurellem/run/bootstrap_0.clj	Tue Mar 27 13:10:48 2012 -0500
     1.2 +++ b/clojure/com/aurellem/run/bootstrap_0.clj	Tue Mar 27 13:33:44 2012 -0500
     1.3 @@ -546,9 +546,80 @@
     1.4              [1 1]
     1.5              [2 1]
     1.6              [3 1]
     1.7 -            [4 1]
     1.8 -            ]))))
     1.9 +            [4 1]])
    1.10 +          (do-nothing 100)
    1.11 +          (play-moves [[:b]])
    1.12 +          (do-nothing 100)
    1.13 +          (play-moves [[:b]])
    1.14 +          (do-nothing 100)
    1.15 +          (play-moves [[:b] []]))))
    1.16  
    1.17  
    1.18 +(defn do-save-corruption
    1.19 +  ([] (do-save-corruption
    1.20 +       (buy-initial-items)))
    1.21 +  ([script]
    1.22 +     (->> script
    1.23 +          (do-nothing 100)
    1.24            
    1.25 -     
    1.26 \ No newline at end of file
    1.27 +          (play-moves
    1.28 +           [[:start]])
    1.29 +          (do-nothing 500)
    1.30 +          (play-moves [[:d]])
    1.31 +          (do-nothing 100)
    1.32 +
    1.33 +          (play-moves
    1.34 +           [[] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.35 +           [][] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.36 +           [] [] [] [] [] [] [] [] [] [:d] [] [] [] [:d] [] [] [] [:d]
    1.37 +           [] [] [:a] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b]
    1.38 +           [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b]
    1.39 +           [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b]
    1.40 +           [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b]
    1.41 +           [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b]
    1.42 +           [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b]
    1.43 +           [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b] [:b]
    1.44 +           [:a :b] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.45 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [:select] [:restart]
    1.46 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.47 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.48 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.49 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.50 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.51 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.52 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.53 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.54 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.55 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.56 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.57 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.58 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.59 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.60 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.61 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.62 +           [] [:a] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.63 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.64 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.65 +           [] [] [] [:start] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.66 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.67 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.68 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.69 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.70 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.71 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.72 +           [] [] [] [] [] [] [] [] [] [] [] [] [:a] [] [] [] [] [] []
    1.73 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.74 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.75 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.76 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.77 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.78 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.79 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.80 +           [:start] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.81 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
    1.82 +           [] [] [] [] [] [] [] [] [] [] [] [] [] [:start] [:a] [:a]
    1.83 +           [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a]
    1.84 +           [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a]
    1.85 +           [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a]
    1.86 +           [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a] [:a]
    1.87 +           [:a] [:a :start] []]))))