The function dotted-list-length performs the same action as list-length, except that if the last cdr is not nil then instead of signaling an error, it returns the number of conses plus 1.
LispWorks User Guide and Reference Manual - 13 Feb 2015