R6RS fixes

This commit is contained in:
retropikzel 2026-01-31 05:48:58 +02:00
parent c29e90f8c0
commit fe3b2ed457
1 changed files with 4 additions and 9 deletions

View File

@ -161,7 +161,7 @@ if [ "${rnrs}" = "r6rs" ]; then
then then
scheme_cmd="chezscheme --libdirs ${venvpath}/lib/.akku/lib --program \"\${IF}\"" scheme_cmd="chezscheme --libdirs ${venvpath}/lib/.akku/lib --program \"\${IF}\""
else else
scheme_cmd="scheme --libdirs \"${venvpath}/lib/.akku/lib\" --program \"\${IF}\"" scheme_cmd="scheme --libdirs ${venvpath}/lib/.akku/lib --program \"\${IF}\""
fi fi
;; ;;
"guile") "guile")
@ -187,10 +187,10 @@ if [ "${rnrs}" = "r6rs" ]; then
scheme_cmd="racket -I scheme/init -l r6rs/run.rkt -S \"${venvpath}/lib/.akku/lib\" \"\${IF}\"" scheme_cmd="racket -I scheme/init -l r6rs/run.rkt -S \"${venvpath}/lib/.akku/lib\" \"\${IF}\""
;; ;;
"sagittarius") "sagittarius")
scheme_cmd="sash -r6 -L \"${venvpath}/lib\" \"\${IF}\"" scheme_cmd="sash -r6 -L \"${venvpath}/lib/.akku/lib\" \"\${IF}\""
;; ;;
"ypsilon") "ypsilon")
scheme_cmd="ypsilon --r6rs --sitelib \"${venvpath}/lib\" --top-level-program \"\${IF}\"" scheme_cmd="ypsilon --r6rs --sitelib \"${venvpath}/lib/.akku/lib\" --top-level-program \"\${IF}\""
;; ;;
*) *)
>&2 echo "Unsupported implementation RnRS combination: ${implementation} ${rnrs}" >&2 echo "Unsupported implementation RnRS combination: ${implementation} ${rnrs}"
@ -322,11 +322,6 @@ fi
## bin/snow-chibi ## bin/snow-chibi
impls=${implementation}
if [ "${rnrs}" = "r6rs" ]; then
impls=generic
fi
{ {
cat << EOF cat << EOF
#!/bin/sh #!/bin/sh
@ -334,7 +329,7 @@ if [ "\${1}" = "install" ]; then
shift shift
snow-chibi \ snow-chibi \
install \ install \
--impls=${impls} \ --impls=${implementation} \
--install-source-dir=${venvpath}/lib \ --install-source-dir=${venvpath}/lib \
--install-library-dir=${venvpath}/lib \ --install-library-dir=${venvpath}/lib \
--install-data-dir=${venvpath}/lib \ --install-data-dir=${venvpath}/lib \