From e462669c3c3cc04ea29420e14dbb589899d201ec Mon Sep 17 00:00:00 2001
From: Teddy <ted.sybil@gmail.com>
Date: Sat, 3 Aug 2013 12:10:09 +0800
Subject: AST parser can now work!

---
 builtin.cpp | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

(limited to 'builtin.cpp')

diff --git a/builtin.cpp b/builtin.cpp
index 232f873..876c75d 100644
--- a/builtin.cpp
+++ b/builtin.cpp
@@ -89,7 +89,7 @@ Cons *SpecialOptIf::call(ArgList *arg_list, Environment * &envt,
 
 string SpecialOptIf::ext_repr() { return string("#<Builtin Macro: if>"); }
 #ifdef DEBUG
-SpecialOptIf::_debug_repr() { return ext_repr(); }
+string SpecialOptIf::_debug_repr() { return ext_repr(); }
 #endif
 
 SpecialOptLambda::SpecialOptLambda() : SpecialOptObj() {}
@@ -163,6 +163,10 @@ Cons *SpecialOptDefine::call(ArgList *arg_list, Environment * &envt,
     *top_ptr = obj;
     return ret_addr->next;
 }
+string SpecialOptDefine::ext_repr() { return string("#<Builtin Macro: define>"); }
+#ifdef DEBUG
+string SpecialOptDefine::_debug_repr() { return ext_repr(); }
+#endif
 
 void SpecialOptSet::prepare(Cons *pc) {
     // TODO: check number of arguments
@@ -180,3 +184,8 @@ Cons *SpecialOptSet::call(ArgList *arg_list, Environment * &envt,
     *top_ptr = new UnspecObj();
     return ret_addr->next;
 }
+
+string SpecialOptSet::ext_repr() { return string("#<Builtin Macro: set!>"); }
+#ifdef DEBUG
+string SpecialOptSet::_debug_repr() { return ext_repr(); }
+#endif
-- 
cgit v1.2.3