try to port the code to cffi
port my ccl code to cffi
indent
add clozure common lisp code