(assert-eq? 6 (: 2 4 6)) (assert-eq? 9 (: 2 4 (: 3 0 9))) (: ($ a 4) (assert-eq? 4 a) (set! a 42) (assert-eq? 42 a) (: ($ a 7) (assert-eq? 7 a) (set! a 32) (assert-eq? 32 a) ) (assert-eq? 42 a) )