#!/usr/local/bin/sbcl --script

(setf x '(1 2 3))