From 7b02ecaff4e3e884700e4ec6a0ab4db28966dca1 Mon Sep 17 00:00:00 2001
From: Andrey Orst <andreyorst@gmail.com>
Date: Wed, 25 Nov 2020 20:52:50 +0300
Subject: feature(core): print empty vectors as [] in the REPL

---
 tests/core.fnl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'tests/core.fnl')

diff --git a/tests/core.fnl b/tests/core.fnl
index d323a07..4c7fdeb 100644
--- a/tests/core.fnl
+++ b/tests/core.fnl
@@ -716,7 +716,9 @@
     (assert-eq (vector) [])
     (assert-eq (vector 1) [1])
     (assert-eq (vector 1 2 3) [1 2 3])
-    (assert-eq (getmetatable (vector 1 2 3)) {:cljlib/type :seq})))
+    (let [m (getmetatable (vector 1 2 3))]
+      (assert-eq (. m :__name) "vector")
+      (assert-eq (. m :cljlib/type) :seq))))
 
 (deftest hash-map
   (testing "hash-map"
-- 
cgit v1.2.3