Lisp :Макросы и функции [дубликат]

На этот вопрос уже есть ответы здесь:

Что можно сделать с макросами Лиспа, чего нельзя сделать с функциями класса first -? (7 ответов)

Закрыто 2 года назад .

В моем стремлении полностью понять такие мощные макросы lisp мне в голову пришел вопрос. Я знаю, что золотое правило макросов гласит "Никогда не используйте макрос, когда функция будет выполнять всю работу" . Однако, читая Главу 9-Практика :Создание среды модульного тестирования-из книги «Practical Common Lisp» я познакомился с приведенным ниже макросом, цель которого состояла в том, чтобы избавиться от дублирования выражения тестового примера с сопутствующим риском неправильной маркировки результатов.

;; Function defintion. 

(defun report-result (result form)
  (format t "~:[FAIL~;pass~]... ~a~%" result form))

;; Macro Definition

(defmacro check (form)
  `(report-result,form ',form))

Хорошо, я понимаю его цель, но я мог бы сделать это, используя функцию вместо макроса, например:

(setf unevaluated.form '(= 2 (+ 2 3)))

(defun my-func (unevaluated.form)
  (report-result (eval unevaluated.form) unevaluated.form))

Возможно ли это только потому, что данный макрос слишком прост?
Более того,является ли макросистема Лисп настолько мощной по сравнению с ее противниками из-за того, что сам код -такой как управляющие структуры, функции и т. д. -представлен в виде СПИСКА?

common-lisp macros

задан Rainer Joswig 22 July 2012 в 02:16

0 ответов

Другие вопросы по тегам:

common-lisp macros

Lisp :Макросы и функции [дубликат]

0 ответов

Похожие вопросы: