From ffd31966ec6a5e362dd16911643a43e2ce098a11 Mon Sep 17 00:00:00 2001
From: Joel Martin <github@martintribe.org>
Date: Fri, 30 Jan 2015 13:21:10 -0600
Subject: guide.md: step9,A stubs. TODO. More vector tests.

---
 tests/step4_if_fn_do.mal | 10 ++++++++++
 1 file changed, 10 insertions(+)

(limited to 'tests')

diff --git a/tests/step4_if_fn_do.mal b/tests/step4_if_fn_do.mal
index 46efeae..4adb4c8 100644
--- a/tests/step4_if_fn_do.mal
+++ b/tests/step4_if_fn_do.mal
@@ -351,6 +351,16 @@ a
 (if [] 7 8)
 ;=>7
 
+;; Testing vector functions
+(count [1 2 3])
+;=>3
+(empty? [1 2 3])
+;=>false
+(empty? [])
+;=>true
+(list? [4 5 6])
+;=>false
+
 ;; Testing vector equality
 (= [] (list))
 ;=>true
-- 
cgit v1.2.3