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

Fix mosh

This commit is contained in:
retropikzel 2025-07-15 16:30:22 +03:00
parent aeccf77075
commit 0497228afa
1 changed files with 3 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
libs/data.sld
View File

@ -375,16 +375,12 @@
(type . interpreter) (type . interpreter)
(command . ,(lambda (input-file output-file prepend-directories append-directories library-files r6rs?) (command . ,(lambda (input-file output-file prepend-directories append-directories library-files r6rs?)
(apply string-append (apply string-append
`("MOSH_LOAD_PATH=" `("mosh"
,@(map (lambda (item) (string-append item ":")) prepend-directories)
,@(map (lambda (item) (string-append item ":")) append-directories)
" "
"mosh"
" " " "
,(util-getenv "COMPILE_R7RS_MOSH") ,(util-getenv "COMPILE_R7RS_MOSH")
" " " "
;,@(map (lambda (item) (string-append "--loadpath=" item " ")) ,@(map (lambda (item) (string-append "--loadpath=" item " "))
;(append append-directories prepend-directories)) (append append-directories prepend-directories))
;" " ;" "
,input-file))))) ,input-file)))))
(picrin (picrin