Определить, что делает следующий макрос

@BAZHEN · Регистрация: 15.10.2015

Author24 — интернет-сервис помощи студентам

Определить, что делает следующий макрос. В случае возникновения ошибки объяснить причину ее появления.

Lisp

1
2
3

   
(delmacro аргумент (форма)
     (list '(lambda (x) x) (саr форма)))

@Catstail · 04.11.2015, 20:22

Сообщение от BAZHEN

В случае возникновения ошибки объяснить причину ее появления.

Во-первых, не delmacro, а defmacro!
Во-вторых, ты (или, конечно, препод!) в слове car две первые буквы сделал русскими...

А после исправления этих глупостей получается вот это:

Lisp

(defmacro аргумент (форма)
     (list '(lambda (x) x) (car форма)))
 
==> аргумент
 
(аргумент (+ 3 4 5))
 
Assoc: Символ + не имеет значения (не связан).
 
==> ERRSTATE
 
(аргумент ((+ 3 4) (- 3 4)))
 
==> 7

Это макрос вычисляет первый элемент списка-аргумента.

	04.11.2015, 20:22