Основи мови програмування Лісп

Наприклад, розглянемо трасування функціі APPEND (злиття двох списків), яка була визначена раніше. Після виконання команд

$ (TRACE-FUNCTION ‘APPEND)

$ (APPEND ‘(q w e) (r t y u))

на екрані відобразиться траса:

APPEND [(Q W E), (R T Y U)]

APPEND [(W E), (R T Y U)]

APPEND [(E), (R T Y U)]

APPEND [NIL, (R T Y U)]

APPEND = (R T Y U)

APPEND = (E R T Y U)

APPEND = (W E R T Y U)

APPEND = (Q W E R T Y U)

(Q W E R T Y U)

Виведемо на екран трасу функції REVERSE з дозволом (лівий стовпчик) та без дозволу (правий стовпчик) трасировки функції APPEND для виразу (REVERSE ‘(q w)).

$ (TRACE-FUNCTION ‘REVERSE)$ (TRACE-FUNCTION ‘REVERSE)

$ (TRACE-FUNCTION ‘APPEND)$ (REVERSE ‘(q w))

$ (REVERSE ‘(q w))REVERSE [(Q W)]

REVERSE [(Q W)] REVERSE [(W)]

REVERSE [(W)] REVERSE [NIL]

REVERSE [NIL] REVERSE = NIL

REVERSE = NIL REVERSE = (W)

APPEND [NIL, (W)]REVERSE = (W Q)

APPEND = (W)(W Q)

REVERSE = (W)

APPEND [(W), (Q)]