summaryrefslogtreecommitdiff
path: root/tests/core.fnl
diff options
context:
space:
mode:
authorAndrey Orst <andreyorst@gmail.com>2020-11-15 14:10:19 +0300
committerAndrey Orst <andreyorst@gmail.com>2020-11-15 14:10:19 +0300
commitd94b8ee9383df27f8ab96b89e3b787f083ec524b (patch)
treea20f19bb1eca154542c8deec701b8ce59a772aeb /tests/core.fnl
parent4ea70bf39971eeb742a5de689a9ad8ba63559ecb (diff)
fix(core): rename seq? to vector?
Diffstat (limited to 'tests/core.fnl')
-rw-r--r--tests/core.fnl20
1 files changed, 10 insertions, 10 deletions
diff --git a/tests/core.fnl b/tests/core.fnl
index f7dccd7..2481f02 100644
--- a/tests/core.fnl
+++ b/tests/core.fnl
@@ -129,13 +129,13 @@
(assert* (map? (empty {})))
(assert-not (map? (empty []))))
- (testing "seq?"
- (assert-not (seq? []))
- (assert* (seq? [{:a 1}]))
- (assert-not (seq? {}))
- (assert-not (seq? {:a 1}))
- (assert* (seq? (empty [])))
- (assert-not (seq? (empty {}))))
+ (testing "vector?"
+ (assert-not (vector? []))
+ (assert* (vector? [{:a 1}]))
+ (assert-not (vector? {}))
+ (assert-not (vector? {:a 1}))
+ (assert* (vector? (empty [])))
+ (assert-not (vector? (empty {}))))
(testing "nil?"
(assert* (nil?))
@@ -248,7 +248,7 @@
(assert-eq (filter even? (range 10)) [0 2 4 6 8])
(assert-eq (filter odd? (range 10)) [1 3 5 7 9])
(assert-eq (filter map? [{:a 1} {5 1} [1 2] [] {}]) [{:a 1} {5 1}])
- (assert-eq (filter seq? [{:a 1} {5 1} [1 2] [] {}]) [[1 2]]))
+ (assert-eq (filter vector? [{:a 1} {5 1} [1 2] [] {}]) [[1 2]]))
(testing "concat"
(assert-eq (concat) nil)
@@ -574,8 +574,8 @@
(assert-not (gt 2 1 3))
(assert-not (gt 1 2 4 4))))
-(deftest vec
- (testing "vec"
+(deftest vector
+ (testing "vector"
(assert-eq (vector) [])
(assert-eq (vector 1) [1])
(assert-eq (vector 1 2 3) [1 2 3])