Retropikzel
/
scheme-venv
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix guile, ikarus and larceny scheme_version_cmd

This commit is contained in:
retropikzel 2026-02-19 08:22:03 +02:00
parent 0ac5486b46
commit 79d556c22b
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
scheme-venv
View File

@ -151,12 +151,12 @@ if [ "${rnrs}" = "r6rs" ]; then
;; ;;
"guile") "guile")
scheme_cmd="guile --r6rs -x .sls -L \"${venvpath}/lib/.akku/lib\" -s \"\${IF}\"" scheme_cmd="guile --r6rs -x .sls -L \"${venvpath}/lib/.akku/lib\" -s \"\${IF}\""
scheme_version_cmd="guile --version | head -n 1 | awk '{print($4);}'" scheme_version_cmd="guile --version | head -n 1 | awk '{print(\$4);}'"
scheme_repl_cmd="guile --r6rs -x .sls -L \"${venvpath}/lib/.akku/lib\"" scheme_repl_cmd="guile --r6rs -x .sls -L \"${venvpath}/lib/.akku/lib\""
;; ;;
"ikarus") "ikarus")
scheme_cmd="IKARUS_LIBRARY_PATH=\"${venvpath}/lib/.akku/lib\" ikarus --r6rs-script \"\${IF}\"" scheme_cmd="IKARUS_LIBRARY_PATH=\"${venvpath}/lib/.akku/lib\" ikarus --r6rs-script \"\${IF}\""
scheme_version_cmd="ikarus -v 2>&1 | head -n 1 | awk '{print($4);}' | sed 's/,//'" scheme_version_cmd="ikarus -v 2>&1 | head -n 1 | awk '{print(\$4);}' | sed 's/,//'"
scheme_repl_cmd="IKARUS_LIBRARY_PATH=\"${venvpath}/lib/.akku/lib\" ikarus" scheme_repl_cmd="IKARUS_LIBRARY_PATH=\"${venvpath}/lib/.akku/lib\" ikarus"
;; ;;
"ironscheme") "ironscheme")
@ -165,7 +165,7 @@ if [ "${rnrs}" = "r6rs" ]; then
;; ;;
"larceny") "larceny")
scheme_cmd="larceny -nobanner -quiet -utf8 -r6 -I \"${venvpath}/lib/.akku/lib\" \"\${IF}\"" scheme_cmd="larceny -nobanner -quiet -utf8 -r6 -I \"${venvpath}/lib/.akku/lib\" \"\${IF}\""
scheme_version_cmd="larceny --version | awk '{print($2);}'" scheme_version_cmd="larceny --version | awk '{print(\$2);}'"
scheme_repl_cmd="larceny -nobanner -quiet -utf8 -r6 -I \"${venvpath}/lib/.akku/lib\"" scheme_repl_cmd="larceny -nobanner -quiet -utf8 -r6 -I \"${venvpath}/lib/.akku/lib\""
;; ;;
"loko") "loko")