# HG changeset patch # User Robert McIntyre # Date 1332318003 18000 # Node ID d7e2cfecef1df3d50f0bedc78121faf7c76e3dee # Parent 09caf6a5bbf40c177a194b779f9dd9858ee70eb2 fixed compilation problems. diff -r 09caf6a5bbf4 -r d7e2cfecef1d clojure/com/aurellem/exp/item_bridge.clj --- a/clojure/com/aurellem/exp/item_bridge.clj Wed Mar 21 03:18:20 2012 -0500 +++ b/clojure/com/aurellem/exp/item_bridge.clj Wed Mar 21 03:20:03 2012 -0500 @@ -113,30 +113,7 @@ (run-moves state (corrupt-moves))) - - - - - (step - (second - (->> - [[] state] - (advance [:b] [:a :b :start]) - (advance [] [:d]) - (play-moves [[] [] [] [:d] [] [] [] [:d] [] [] [:a]]) - scroll-text - (play-moves - ;; this section is copied from speedrun-2942 - ;; and corrupts the save so that the end-of-list marker - ;; for the pokemon roster is destroyed, but the save is still - ;; playable. - [[] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] - [] [] [] [] [] [] [] [] [] [] [:select] [:restart]]) - (play-moves - (first (title))) - (advance [] [:start]) - (advance [] [:a]) - (advance [:a] [:a :start]))) [])) + ([] (corrupt @current-state)))