Лисп: Помощь НЕ возвращает значение?

) Я написал функцию, которая принимает список строк, и распечатывает их построчно.

(defun print-to-lines (slist)
    (cond
        ((null slist) slist)
        (t (let ((empty (write-line (car slist)))) (print-to-lines (cdr slist))))))

Это отлично работает, за исключением того, что в конце вывода (при запуске в окне отладки) есть дополнительное возвращаемое значение (в данном случае NIL):

CG-USER(16): (print-to-lines '("adam" "emilio" "eoln"))
adam
emilio
eoln
NIL

Я понимаю, где этот дополнительный NIL исходит от (это возвращаемое значение моей функции), но я хочу, чтобы его там не было. Мое задание гласит, что этого нет. Есть ли способ "подделать" или отключить это?