#!/usr/local/bin/sbcl --script (defun abc (n) (format t "~a" (list 1 2 3)))