From 430aafe6479305f4918ee2a0291e0d859286a4a4 Mon Sep 17 00:00:00 2001 From: retropikzel Date: Tue, 15 Jul 2025 20:26:31 +0300 Subject: [PATCH] Fix mit scheme --- libs/data.sld | 17 ++++++++++------- 1 file changed, 10 insertions(+), 7 deletions(-) diff --git a/libs/data.sld b/libs/data.sld index abcf18d..f76b153 100644 --- a/libs/data.sld +++ b/libs/data.sld @@ -241,10 +241,8 @@ " " ,@(map (lambda (item) (string-append "-L" " " item " ")) - prepend-directories) - ,@(map (lambda (item) - (string-append "-L" " " item " ")) - append-directories) + (append prepend-directories + append-directories)) " " ,input-file))))) (husk @@ -390,9 +388,14 @@ " " ,(util-getenv "COMPILE_R7RS_MIT_SCHEME") " " - ,@(map (lambda (item) - (string-append "--load " item " ")) - library-files) + ,@(map + (lambda (item) + (string-append "--load " + (search-library-file (append append-directories + prepend-directories) + item) + " ")) + library-files) " " "--load" " "