这是我使用递归来反转列表的程序
(define l empty)
(define (reverse list)
(cond
[(empty? list)list]
[((set! l(cons (car list) l))(reverse (cdr list)))])
(display l))
(reverse '(1 2 3 4 ))
我的程序正确地给出输出＆＃39;（4 3 2 1）。但我也给出了一个错误， 说这个应用程序不是程序员。 我无法理解它是什么。请告诉我，我做错了什么