;; What is WRONG?

(define (reverse ls)
  (if (null? ls) '()
      (cons (reverse (cdr ls)) (car ls))))


;; do the RIGHT thing!

(define (reverse ls)
  (if (null? ls) '()
      (APPEND (reverse (cdr ls)) (LIST (car ls)))))