recognize +! and set-vector (#706)

"
2026-08-17 13:40:39 -04:00 · 2021-07-17 15:00:10 -04:00
parent 1e90da8e7c
commit 4989470828
48 changed files with 557 additions and 1038 deletions
@@ -1058,7 +1058,7 @@
       (shrink-heap obj s3-0)
       (relocate s3-0 (- s2-0))
       (set! (-> obj first-gap) (find-gap obj s4-1))
-       (set! (-> obj compact-count) (+ (-> obj compact-count) 1))
+       (+! (-> obj compact-count) 1)
       )
      )
     )