From afbd1f1c31299ef9e2040b41fce7a8546fce618d Mon Sep 17 00:00:00 2001
From: Andrey Listopadov <andreyorst@gmail.com>
Date: Mon, 15 Mar 2021 19:12:02 +0300
Subject: fix: update test suite eq function builder

This really means that I need to externalize it into separate module
and just use everywhere, but Fennel doesn't yet feature stable way to
do it unfortunately
---
 init.fnl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'init.fnl')

diff --git a/init.fnl b/init.fnl
index 567ee4f..1b84cda 100644
--- a/init.fnl
+++ b/init.fnl
@@ -960,7 +960,7 @@ functions also reuse this indexing method, such as sets."
                :else
                false))
           ([x y & xs]
-           (reduce #(and $1 $2) (eq x y) (mapv #(eq x $) xs)))))
+           (and (eq x y) (apply eq x xs)))))
 
 (set core.eq (with-meta eq {:fnl/docstring "Deep compare values.
 
-- 
cgit v1.2.3