diff --git a/cgen.scm b/cgen.scm
index f4845183..b4b59a00 100644
--- a/cgen.scm
+++ b/cgen.scm
@@ -937,7 +937,7 @@
                        "}\n"))
       formals*))))
   
-(define (mta:code-gen input-program globals)
+(define (mta:code-gen input-program globals program? lib-exports lib-imports)
   (set! *global-syms* globals)
   (let ((compiled-program 
           (apply string-append
diff --git a/cyclone.scm b/cyclone.scm
index 1dae6266..920d98f2 100644
--- a/cyclone.scm
+++ b/cyclone.scm
@@ -168,11 +168,7 @@
           (exit)))
     
       (trace:info "---------------- C code:")
-      (mta:code-gen input-program globals)
-        ; TODO: add as parameters above?
-        ; (set! program? #f)
-        ; (set! lib-exports (lib:exports (car input-program)))
-        ; (set! lib-imports (lib:imports (car input-program)))
+      (mta:code-gen input-program globals program? lib-exports lib-imports)
       (return '())))) ;; No codes to return
 
 ;; TODO: longer-term, will be used to find where cyclone's data is installed