don't need to strip syntactic information away from quoted expressions

This commit is contained in:
Yuichi Nishiwaki 2014-01-12 20:21:07 +09:00
parent b70c689b1f
commit f4202a7555
1 changed files with 1 additions and 1 deletions

View File

@ -510,7 +510,7 @@ macroexpand(pic_state *pic, pic_value expr, struct pic_senv *senv)
pic_gc_protect(pic, v);
return v;
case PIC_STX_QUOTE:
v = pic_cons(pic, pic_symbol_value(pic_syntax(car)->sym), strip(pic, pic_cdr(pic, expr)));
v = pic_cons(pic, pic_symbol_value(pic_syntax(car)->sym), pic_cdr(pic, expr));
pic_gc_arena_restore(pic, ai);
pic_gc_protect(pic, v);
return v;