From 179d4008fb206db7b52cef1213b2e1d455da2234 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Tue, 1 Sep 2015 22:45:24 -0400
Subject: [PATCH] Bugfixes?

---
 scheme/cyclone/macros.sld | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/scheme/cyclone/macros.sld b/scheme/cyclone/macros.sld
index 06f0bb48..b94d3a37 100644
--- a/scheme/cyclone/macros.sld
+++ b/scheme/cyclone/macros.sld
@@ -58,7 +58,7 @@
             ((not macro)
               (error "macro not found" exp))
             (compiled-macro?
-              ((Cyc-get-cvar (cdr macro))
+              ((Cyc-get-cvar macro)
                 exp
                 (Cyc-er-rename mac-env)
                 Cyc-er-compare?))
@@ -72,7 +72,7 @@
               ;       (env (create-environment env-vars env-vals)))
                 (eval
                   (list
-                    (cdr macro)
+                    (Cyc-get-cvar macro)
                     (list 'quote exp)
                     (Cyc-er-rename mac-env)
                     Cyc-er-compare?)