A Lisp complier experiment