define a (1 2 3) echo [car $a] set-car! $a 44 echo [car $a]