Apple-2-SW/robotwar
1
0
Fork 0
mirror of https://github.com/richardharrington/robotwar.git synced 2024-08-03 14:29:03 +00:00
Code Issues Projects Releases Wiki Activity

imported clojure.string/split and join

Browse Source
This commit is contained in:
Richard Harrington 2013-07-13 12:16:02 -04:00
parent 7337fa36cd
commit 0d8cb73924
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/hs_robotwar/core.clj
View File

@ -2,6 +2,7 @@
(use '[clojure.core.match :only (match)])
(use '[clojure.set :only (union)])
(use '[clojure.string :only (split join)])
(def operators #{\= \< \> \# \+ \- \* \/})
@ -50,7 +51,7 @@
(defn lex
[src-code]
(mapcat lex-line (clojure.string/split src-code #"\n")))
(mapcat lex-line (split src-code #"\n")))
(defn str->int
"Like Integer/parseInt, but returns nil on failure"
@ -99,7 +100,7 @@
(defn pretty-print-tokens [token-seq]
(clojure.string/join
(join
"\n"
(map #(format "%2d %s %s" (:pos %) (:type %) (:val %))
token-seq)))