From dc7c801c388ec65a672dd900d5002579b7ef6aa9 Mon Sep 17 00:00:00 2001 From: Yuichi Nishiwaki Date: Tue, 3 Dec 2013 13:08:00 +0900 Subject: [PATCH] exprs during macroexpansion may have syntactic-closure in the tail position --- src/macro.c | 3 --- 1 file changed, 3 deletions(-) diff --git a/src/macro.c b/src/macro.c index 9ceff482..a0417e3c 100644 --- a/src/macro.c +++ b/src/macro.c @@ -179,9 +179,6 @@ macroexpand(pic_state *pic, pic_value expr, struct pic_senv *senv) case PIC_TT_PAIR: { pic_value car, v; - if (! pic_list_p(pic, expr)) - return expr; - car = macroexpand(pic, pic_car(pic, expr), senv); if (pic_syntax_p(car)) { switch (pic_syntax(car)->kind) {