Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Got rid of extraneous do

  • Loading branch information...
commit 2abe5945048ea6c2547c93ef942a1a6c66ef129f 1 parent 1e25ec3
@calebphillips authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  examples/test/snake.clj
View
2  examples/test/snake.clj
@@ -41,7 +41,7 @@
(is (lose? (-> snake (turn [0 -1]) move move)) "Running into the top wall")
(is (lose? (first (drop 75 (iterate move snake)))) "Running into the right wall")
(let [turned-snake (turn snake [0 1])]
- (is (lose? (do (first (drop 50 (iterate move turned-snake))))) "Running into the bottom wall"))))
+ (is (lose? (first (drop 50 (iterate move turned-snake)))) "Running into the bottom wall"))))
(deftest test-eats
(let [eat-me {:location (first (:body snake))}
Please sign in to comment.
Something went wrong with that request. Please try again.