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;
}
return expr;
return pic_symbol_value(new_uniq_sym(pic, pic_sym(expr)));
}
case PIC_TT_PAIR: {
pic_value car, v;