set modules folder to modules path

1 files changed, 11 insertions, 11 deletions

diff --git a/src/gscc b/src/gscc
index d00b116..41cbbed 100755
--- a/src/gscc
+++ b/src/gscc
@@ -1,16 +1,16 @@
 #!/run/current-system/profile/bin/guile \
--L ./src -e main -s
+-L ./src/modules -e main -s
 !#
 
 
 (use-modules (ice-9 getopt-long)
              (ice-9 popen)
              (ice-9 pretty-print)
-             (modules lexer driver)
-             (modules parser driver)
-             (modules tacky driver)
-             (modules generator driver)
-             (modules emitter driver))
+             (lexer driver)
+             (parser driver)
+             (tacky driver)
+             (generator driver)
+             (emitter driver))
 
 
 (define version "v0.1.1")
@@ -53,11 +53,11 @@ Options:
                         (a-file (string-append dest ".s")))
                     (when (file-exists? a-file)
                       (delete-file a-file))
-                    ;; (let ((port (open-output-file a-file)))
-                    ;;   (display program port)
-                    ;;   (close-port port))
-                    ;; (when (postprocess a-file dest)
-                    ;;   (display (string-concatenate `("Postprocess reported success (wrote " ,dest ").\n"))))
+                    (let ((port (open-output-file a-file)))
+                      (display program port)
+                      (close-port port))
+                    (when (postprocess a-file dest)
+                      (display (string-concatenate `("Postprocess reported success (wrote " ,dest ").\n"))))
                     ))))))))))
 
 (define (preprocess file)