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