From 955b58b1a56e6fef52ec9777d717e98054e2d1b5 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Thu, 11 Jun 2015 23:02:59 -0400
Subject: [PATCH] WIP

---
 TODO      | 2 ++
 runtime.c | 2 +-
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/TODO b/TODO
index 488a5fa1..5f30cbfe 100644
--- a/TODO
+++ b/TODO
@@ -15,6 +15,8 @@ Working TODO list:
        cyclone> (write-char 1)
        Error:  
 
+    This it might be an issue with rt_raise2, perhaps this line:
+    make_cons(c0, &c1, nil);
 
  - Constructs require for self-hosting
 
diff --git a/runtime.c b/runtime.c
index e052b6d5..f556465c 100644
--- a/runtime.c
+++ b/runtime.c
@@ -185,7 +185,7 @@ object Cyc_current_exception_handler() {
 void Cyc_rt_raise(object err) {
     make_cons(c2, err, nil);
     make_cons(c1, boolean_f, &c2);
-    make_cons(c0, &c1, nil);
+    make_cons(c0, &c1, nil); // TODO: seems broken?
     apply(nil, Cyc_current_exception_handler(), &c0);
     // Should never get here
     fprintf(stderr, "Internal error in Cyc_rt_raise\n");