From 515719d7748ed289dcdd4aad1199ebfaded8e26e Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Wed, 13 May 2015 18:26:11 -0400 Subject: [PATCH] Added TODO --- cyclone.scm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/cyclone.scm b/cyclone.scm index debc5181..97f1792f 100644 --- a/cyclone.scm +++ b/cyclone.scm @@ -238,10 +238,11 @@ (program? ; TODO: if there is an (import) ; (write `(DEBUG ,(lib:imports->objs (cdar in-prog) "."))) - (system - ;; -I is a hack, real answer is to use 'make install' to place .h file + (let ((objs-str "")) ;; TODO: populate using above (if prog) and link to objs below (will need to run 2 gcc commands) + (system + ;; -I is a hack, real answer is to use 'make install' to place .h file ;TODO: need to link to object files from lib:import->obj-file - (string-append "gcc " src-file " -L" (cyc:get-clib-dir) " -lcyclone -lm -I" (cyc:get-include-dir) " -g -o " exec-file))) + (string-append "gcc " src-file " -L" (cyc:get-clib-dir) " -lcyclone -lm -I" (cyc:get-include-dir) " -g -o " exec-file)))) (else (system (string-append "gcc " src-file " -I" (cyc:get-include-dir) " -g -c -o " exec-file ".o")))))))