Work on 5.39

2021-04-21 10:02:02 -04:00
parent 922a47f20e
commit 360f740441
4 changed files with 474 additions and 16 deletions
--- a/util.scm
+++ b/util.scm
@@ -138,7 +138,7 @@
        (display (car xs) port)
        (display "\n" port)
        (write-list-to-port (cdr xs) port))))
-  (if #f ; #t means write to file; #f means don't write to file
+  (if #t ; #t means write to file; #f means don't write to file
    (let* ((compile-result (compile code target linkage))
           (assembly-insts (statements compile-result))
           (port (open-output-file file-name)))