I chose to break away from the spec of reset! and swap! because there is really no reason to conform to these.

The reactive nodes should not try to mascarade as regular atom, it's not a goal for this lib.

Author: green-coder

CHANGELOG.md

@@ -16,9 +16,6 @@ Signaali is currently [experimental](https://github.com/topics/metosin-experimen
 
 ## Unreleased
 
-### Fixed
-
-- `reset!` and `swap!` on a ReactiveNode returns a value similar to when applied to an atom.
 
 ## 0.1.0
 

src/signaali/reactive.cljc

@@ -151,7 +151,8 @@
                          (propagation-filter-fn value new-value))
                  (set! value new-value)
                  (notify-signal-watchers this true))
-               value)
+               ;; Value intentionally not returned.
+               #_value)
              ,]
 
       :clj [IAtom
@@ -163,17 +164,21 @@
               (.reset this (f value a b)))
             (swap [this ^IFn f ^Object a ^Object b ^ISeq xs]
               (.reset this (apply f value a b xs)))
-            (^boolean compareAndSet [this ^Object old-value, ^Object new-value]
-              (if (identical? value old-value)
-                (do (.reset this new-value)
-                    true)
-                false))
+
+            ;; Intentionally not included.
+            ;;(^boolean compareAndSet [this ^Object old-value, ^Object new-value]
+            ;;  (if (identical? value old-value)
+            ;;    (do (.reset this new-value)
+            ;;        true)
+            ;;    false))
+
             (reset [this ^Object new-value]
               (when (or (nil? propagation-filter-fn)
                         (propagation-filter-fn value new-value))
                 (set! value new-value)
                 (notify-signal-watchers this true))
-              value)
+              ;; Value intentionally not returned.
+              #_value)
             ,])
 
   IDeref

test/signaali/reactive_test.cljc

@@ -13,12 +13,12 @@
     (let [x (sr/create-signal 1)]
       (is (= 1 @x))
 
-      (let [a (reset! x 5)]
-        (is (= a 5)))
+      ;; reset! intentionally does not return a meaningful value
+      (reset! x 5)
       (is (= 5 @x))
 
-      (let [a (swap! x inc)]
-        (is (= a 6)))
+      ;; swap! intentionally does not return a meaningful value
+      (swap! x inc)
       (is (= 6 @x)))))
 
 (deftest signal-test