Problems with optimizing Common Lisp code