Le lundi 19 juin 2023 à 16:20 +0400, Andrew Tropin a écrit :
+      (if (eq? old-value (atomic-box-compare-and-swap! box old-value new-value))


Are you sure eq? is a good idea here? (eq? 5 5) is unspecified, for example. Perhaps eqv? would be more appropriate.