From e73d9cc590130f1c085fedc6f90b20cd91851566 Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Sun, 3 Aug 2014 13:52:18 +0900
Subject: [PATCH] compiler may perform tco against macroexpand_node

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

diff --git a/src/macro.c b/src/macro.c
index 6adf9b0a..2253533b 100644
--- a/src/macro.c
+++ b/src/macro.c
@@ -295,7 +295,7 @@ macroexpand_node(pic_state *pic, pic_value expr, struct pic_senv *senv)
       }
 
       if ((mac = find_macro(pic, tag)) != NULL) {
-        return macroexpand(pic, macroexpand_macro(pic, mac, expr, senv), senv);
+        return macroexpand_node(pic, macroexpand_macro(pic, mac, expr, senv), senv);
       }
     }