Retropikzel
/
compile-r7rs
1
0
Fork 0
Code Issues 8 Pull Requests Releases Activity

Fix mit scheme

This commit is contained in:
retropikzel 2025-07-15 20:26:31 +03:00
parent 7c16e623a7
commit 430aafe647
1 changed files with 10 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
libs/data.sld
View File

@ -241,10 +241,8 @@
" " " "
,@(map (lambda (item) ,@(map (lambda (item)
(string-append "-L" " " item " ")) (string-append "-L" " " item " "))
prepend-directories) (append prepend-directories
,@(map (lambda (item) append-directories))
(string-append "-L" " " item " "))
append-directories)
" " " "
,input-file))))) ,input-file)))))
(husk (husk
@ -390,9 +388,14 @@
" " " "
,(util-getenv "COMPILE_R7RS_MIT_SCHEME") ,(util-getenv "COMPILE_R7RS_MIT_SCHEME")
" " " "
,@(map (lambda (item) ,@(map
(string-append "--load " item " ")) (lambda (item)
library-files) (string-append "--load "
(search-library-file (append append-directories
prepend-directories)
item)
" "))
library-files)
" " " "
"--load" "--load"
" " " "