fix common lisp