#!/usr/local/bin/sbcl --script (set 'x '(1 2 3)) (set 'bonus 1)