test for r/->defs bug

hyperfiddle · Apr 22, 2024 · fa3ed0e · fa3ed0e
1 parent 0e890f3
commit fa3ed0e
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/test/hyperfiddle/electric/impl/runtime_test.cljc b/test/hyperfiddle/electric/impl/runtime_test.cljc
@@ -243,4 +243,7 @@
   (s->c @s-ps)
   % := 2
   % := :step-c
-  (c->s @c-ps))
+  (c->s @c-ps))
+
+(tests
+  (set (keys (r/->defs {:a (fn [_ _] {:b (fn [_ _] {:a (fn [_ _])})})}))) := #{:a :b})