(in-package :common-lisp-user) (defun foo () (+ 2 2))