Skip to content
Browse files

Change commenting location

  • Loading branch information...
1 parent 620ebc2 commit a347fa101390f2beb2d07ec37930abe2c7dfe6ff @palfrey committed Jul 12, 2012
Showing with 2 additions and 2 deletions.
  1. +2 −2 src/clostridium/core.clj
View
4 src/clostridium/core.clj
@@ -145,8 +145,8 @@
([b noJump dir]
(let [initial (step (:pc b) dir)]
(cond
- noJump
- (assoc b :pc initial) ; easy case, can just return the basic value
+ noJump ; easy case, can just return the basic value
+ (assoc b :pc initial)
(not= (current (:grid b) (reverse initial)) \ ) ; shortcut for simple "not a space" cases
(assoc b :pc initial)
(:stringMode b)

0 comments on commit a347fa1

Please sign in to comment.
Something went wrong with that request. Please try again.