1 2 3 4 5 6 7 8 9
(define (foo) '(1 2)) (define a (foo)) (define b (foo)) (set-car! a "x_x") (display a) (display b)
1
(x_x 2)(x_x 2)