deftype protocol method, mutation not visible #817
Description
Repro in pure SCI:
user=> (sci/eval-string "(defprotocol ICounter (inc! [_])) (deftype Cnt [^:unsynchronized-mutable n] ICounter (inc! [_] (let [old-n n new-n-set (set! n (inc n)) new-n n] [old-n new-n-set new-n]))) (inc! (->Cnt 1))")
[1 {n 2} 1]
Expected result: [1 2 2].
Originally posted by @borkdude in babashka/babashka#1401 (comment)