procesing file in common lisp