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

got rid of extraneous digit? function

Browse Source
This commit is contained in:
Richard Harrington 2013-07-12 17:38:56 -04:00
parent 907d4d36d4
commit b0fe08bd80
2 changed files with 0 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/hs_robotwar/core.clj
View File

@ -8,9 +8,6 @@
(def operators #{\= \< \> \# \+ \- \* \/})
(defn digit?
[ch]
(re-find #"\d" (str ch)))
(defn conj-with-metadata
[coll s n]

12
test/hs_robotwar/core_test.clj
View File

@ -2,18 +2,6 @@
(:require [clojure.test :refer :all]
[hs-robotwar.core :refer :all]))
(deftest digit?-negative
(testing "not a digit"
(is (not (digit? \f)))))
(deftest digit?-char-positive
(testing "digit char"
(is (digit? "6"))))
(deftest digit?-str-positive
(testing "digit str"
(is (digit? \6))))
(def line1 "IF DAMAGE # D GOTO MOVE")
(def line2 "AIM-17 TO AIM")
(def line3 "IF X<-5 GOTO SCAN")