[no subject]

[William G. Dubuque <WGD at MIT-MC>]

(defun car&cdr (list &aux (car (car list)) (list (cdr list))) 
       (values car list))

(car&cdr '(a b)) ==> (values 'b '(b))

It appears that defun& is totally losing here, switching the order of the &aux's
and performing a boundp check on list. This works on the Lispm and in NIL.