From e71c5abfdbceeddc3d5ac9701611762d6f702450 Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Sat, 7 Dec 2013 20:45:47 -0800
Subject: [PATCH] rename unbound symbols by default

---
 src/macro.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/macro.c b/src/macro.c
index 408fcb88..fc783ef5 100644
--- a/src/macro.c
+++ b/src/macro.c
@@ -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;