rename unbound symbols by default

This commit is contained in:
Yuichi Nishiwaki 2013-12-07 20:45:47 -08:00
parent 01e60b5d8e
commit e71c5abfdb
1 changed files with 1 additions and 1 deletions

View File

@ -235,7 +235,7 @@ macroexpand(pic_state *pic, pic_value expr, struct pic_senv *senv)
} }
senv = senv->up; senv = senv->up;
} }
return expr; return pic_symbol_value(new_uniq_sym(pic, pic_sym(expr)));
} }
case PIC_TT_PAIR: { case PIC_TT_PAIR: {
pic_value car, v; pic_value car, v;