From 94f77f6075f0965fcab956475909399b7a4f24d8 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Wed, 13 Feb 2019 15:37:53 -0500
Subject: [PATCH] Added TODO's

---
 cyclone.scm | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/cyclone.scm b/cyclone.scm
index 08fb0711..e7df2b82 100644
--- a/cyclone.scm
+++ b/cyclone.scm
@@ -439,7 +439,14 @@
           (cons 'module-globals module-globals)
           ;(cons)
           ))
-              
+TODO: use this function to set module-globals and globals, then pass it instead of options above
+      (define (inject-globals lis)
+          (cons 'module-globals module-globals)
+      ;(set! globals (union globals '())) ;; Ensure list is sorted
+      )
+TODO: pass this function to check flags, instead of having search logic in CPS opt module
+(define (flag-set? flag)
+
       (when (> *optimization-level* 0)
         (set! input-program
           (optimize-cps input-program *cps-opt-options*))