Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Unbroke 's' support

  • Loading branch information...
commit 7c26a592ab67492d08bfad9f23d819ef45eab7db 1 parent 3109b01
@palfrey authored
Showing with 2 additions and 2 deletions.
  1. +2 −2 src/clostridium/core.clj
View
4 src/clostridium/core.clj
@@ -423,9 +423,9 @@
\r reflect
\s (fn [nb]
(let [
- {:keys [b item]} (removeFromStack (updatePC nb))
+ {:keys [b item]} (removeFromStack (updatePC nb true))
]
- (assoc b :grid (setVal (:grid b) (:pc b) (char item)))
+ (assoc b :grid (setVal (:grid b) (reverse (:pc b)) (char item)))
)
)
\z (fn [b] b)
Please sign in to comment.
Something went wrong with that request. Please try again.