#!/usr/local/bin/sbcl --script (defvar x +) (princ (apply x '(3 2)))