common lisp utils for me