summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--sb-eval2.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/sb-eval2.lisp b/sb-eval2.lisp
index 843bacd..0a2828e 100644
--- a/sb-eval2.lisp
+++ b/sb-eval2.lisp
@@ -551,7 +551,7 @@
(symbol
(let ((macro? (context-find-symbol-macro context form)))
(if macro?
- (funcall (the function (cdr macro?)))
+ (prepare-form macro?)
(prepare-ref form context))))
(cons
(case (first form)