Use set-car! and set-cdr! directly.