#!/usr/local/bin/sbcl --script (defun foo () 1)