In system 32.3, with microcode 674, on LISP Machine One: (length 'atom) gives some sort of error (wrong type of args, I think) whereas in the manual (pg 41), it is defined as: (defun length (x) (cond ((atom x) 0) ((1+ (length (cdr x)))))) CLEMW