exprs during macroexpansion may have syntactic-closure in the tail position

2013-12-03 13:08:00 +09:00 · 2013-12-03 13:08:00 +09:00 · dc7c801c38
parent 761deffe1f
commit dc7c801c38
1 changed files with 0 additions and 3 deletions
--- 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) {