From b51cd6e0f0080f98a091f1ca0a6e27af5f37730a Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Wed, 13 May 2015 11:17:09 -0400
Subject: [PATCH] WIP

---
 cyclone.scm                          | 2 +-
 examples/hello-library/hello.scm     | 4 ++--
 examples/hello-library/libs/lib1.sld | 4 ++--
 3 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/cyclone.scm b/cyclone.scm
index 3011faba..84db7e25 100644
--- a/cyclone.scm
+++ b/cyclone.scm
@@ -230,7 +230,7 @@
     (if cc?
       (cond
         (program?
-; TODO:          (write `(DEBUG ,(lib:imports->objs (cdar input-program) ".")))
+          (write `(DEBUG ,(lib:imports->objs (cdar in-prog) ".")))
           (system 
             ;; -I is a hack, real answer is to use 'make install' to place .h file
 ;TODO: n  eed to link to object files from lib:import->obj-file
diff --git a/examples/hello-library/hello.scm b/examples/hello-library/hello.scm
index 98fc2aa8..1471293a 100644
--- a/examples/hello-library/hello.scm
+++ b/examples/hello-library/hello.scm
@@ -1,9 +1,9 @@
         ; TODO: just adding temporarily until import is supported.
         ; idea is to try and see how the C code needs to change to
 (import ;(scheme base)
-        (libs lib2)
+        (libs lib1)
         ;(rename (prefix (libs lib1) test-))
         )
 
 ;(test-lib1-hello)
-(write lib2-hello)
+(write lib1-hello)
diff --git a/examples/hello-library/libs/lib1.sld b/examples/hello-library/libs/lib1.sld
index 03604856..9da42ce9 100644
--- a/examples/hello-library/libs/lib1.sld
+++ b/examples/hello-library/libs/lib1.sld
@@ -6,8 +6,8 @@
 ;;;
 (define-library (libs lib1)
     (export lib1-hello)
-    (import (scheme base)
-            (scheme write)
+    (import ;(scheme base)
+            ;(scheme write)
             (libs lib2))
     (begin
         (define (internal-func)