反转列表错误

我正在学习DrRacket，我需要编写一个可以反转列表的程序。我有下面的内容，它正反转数字，但是以某种方式将它们嵌套在列表或其他内容中。

(define (reverse-list lon)
  (if (empty? lon)
      empty
      (cons (reverse-list (rest lon))
            (cons (first lon)
                  empty))))

输出（（反向列表（列表1 2 3 4）））：

(list (list (list (list empty 4) 3) 2) 1)

有人知道为什么输出不只是一个列表吗？

谢谢您的帮助！