add another test case from slack report

metosin · Jul 16, 2024 · e0d64ae · e0d64ae
1 parent c089835
commit e0d64ae
Showing 1 changed file with 8 additions and 2 deletions.
diff --git a/test/malli/registry_test.cljc b/test/malli/registry_test.cljc
@@ -4,13 +4,19 @@
             [malli.registry :as mr]))
 
 (deftest mutable-test
-  (let [registry* (atom {})
+  (let [registry* (atom (m/default-schemas))
         registry (mr/mutable-registry registry*)
         register! (fn [t ?s] (swap! registry* assoc t ?s))]
     (testing "default registy"
       (is (thrown? #?(:clj Exception, :cljs js/Error) (m/validate :str "kikka" {:registry registry})))
       (register! :str (m/-string-schema))
-      (is (true? (m/validate :str "kikka" {:registry registry}))))))
+      (is (true? (m/validate :str "kikka" {:registry registry}))))
+    (register! ::int-pair (m/schema [:tuple :int :int]))
+    (is (thrown-with-msg?
+          #?(:clj Exception, :cljs js/Error)
+          #?(:clj #":malli\.core/infinitely-expanding-schema"
+             :cljs #":malli\.core/invalid-schema")
+          (m/schema [::int-pair {:foo :bar}] {:registry registry})))))
 
 (deftest composite-test
   (let [registry* (atom {})