From 725297384a64a23afee47618ad435d248b2207e6 Mon Sep 17 00:00:00 2001 From: Yuichi Nishiwaki Date: Mon, 9 Dec 2013 09:26:28 -0800 Subject: [PATCH] define-syntax is now capable of takeing a synclo object at the position of the syntax name --- src/macro.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/macro.c b/src/macro.c index 322fe329..bdd30643 100644 --- a/src/macro.c +++ b/src/macro.c @@ -336,7 +336,7 @@ macroexpand(pic_state *pic, pic_value expr, struct pic_senv *senv) pic_error(pic, "syntax error"); } - var = pic_cadr(pic, expr); + var = strip(pic, pic_cadr(pic, expr)); if (! pic_symbol_p(var)) { pic_error(pic, "syntax error"); }