From 3e4d870d6b287905c786174565a93fbd79bbb87c Mon Sep 17 00:00:00 2001
From: Asko Nõmm <asko@nmm.ee>
Date: Sat, 10 Jan 2026 14:44:59 +0200
Subject: Add empty-seq? function and update nodes-from-opt to handle empty
 sequences (#13)

---
 src/dompa/nodes.cljc | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'src/dompa')

diff --git a/src/dompa/nodes.cljc b/src/dompa/nodes.cljc
index d2f8e4b..eef65d3 100644
--- a/src/dompa/nodes.cljc
+++ b/src/dompa/nodes.cljc
@@ -142,11 +142,19 @@
   (and (sequential? coll)
        (> (count coll) 1)))
 
+(defn- empty-seq?
+  [coll]
+  (and (sequential? coll)
+       (empty? coll)))
+
 (defn- nodes-from-opt
   [opt]
   (cond (map? opt)
         opt
 
+        (empty-seq? opt)
+        nil
+
         (list-of-many? opt)
         {:node/name :<>
          :node/children opt}
-- 
cgit v1.2.3