Retropikzel
/
compile-scheme
1
0
Fork 0
Code Issues

Clean up some code

This commit is contained in:
retropikzel 2025-12-26 17:31:47 +02:00
parent 4cdf740096
commit ed54426fc5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
libs/implementations.sld
View File

@ -555,7 +555,7 @@
library-file)) library-file))
(library-rkt-file (change-file-suffix full-path ".rkt"))) (library-rkt-file (change-file-suffix full-path ".rkt")))
(if r6rs? (if r6rs?
`("sleep 0") ;`(,(string-append "plt-r6rs --compile " library-file)) `("sleep 0")
`(,(string-append "printf " `(,(string-append "printf "
"'#lang r7rs\\n" "'#lang r7rs\\n"
"(import (except (scheme base) let let-values let*-values string-copy string-copy! string-for-each string-map string-fill! string->list))\\n" "(import (except (scheme base) let let-values let*-values string-copy string-copy! string-for-each string-map string-fill! string->list))\\n"