From 09e2f2d88674410fb80333f80654e8db9cdc8f1c Mon Sep 17 00:00:00 2001
From: Antoine Belvire <antoine.belvire@opensuse.org>
Date: Wed, 19 Nov 2025 18:17:12 +0100
Subject: [PATCH] Test make-hierarchy

This closes #350.
---
 test/clojure/core_test/make_hierarchy.cljc | 7 +++++++
 1 file changed, 7 insertions(+)
 create mode 100644 test/clojure/core_test/make_hierarchy.cljc

diff --git a/test/clojure/core_test/make_hierarchy.cljc b/test/clojure/core_test/make_hierarchy.cljc
new file mode 100644
index 00000000..c347522f
--- /dev/null
+++ b/test/clojure/core_test/make_hierarchy.cljc
@@ -0,0 +1,7 @@
+(ns clojure.core-test.make-hierarchy
+  (:require [clojure.test :refer [deftest is]]
+            [clojure.core-test.portability #?(:cljs :refer-macros :default :refer) [when-var-exists]]))
+
+(when-var-exists make-hierarchy
+  (deftest test-make-hierarchy
+      (is (= {:parents {}, :descendants {}, :ancestors {}} (make-hierarchy)))))