ex er cise

basilisp-lang · Jun 26, 2021 · 4f2b21a · 4f2b21a
1 parent 6002612
commit 4f2b21a
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/tests/basilisp/test_multifn.lpy b/tests/basilisp/test_multifn.lpy
@@ -66,6 +66,10 @@
   "operating system")
 
 (deftest multimethod-with-hierarchies-test
+  (testing "cannot create multimethod with non-reference type hierarchy"
+    (is (thrown? basilisp.lang.runtime/RuntimeException
+                 (defmulti real-fn :os :hierarchy (make-hierarchy)))))
+
   (let [m {:os :os/osx}]
     (is (= "unix" (os-lineage m)))
     (is (= "unix" (os-lineage m)))  ;; check again (should be a cache hit)