From 4d8aaa18091fd03ff075deb0071d09983bb8b9fb Mon Sep 17 00:00:00 2001
From: retropikzel <retropikzel@iki.fi>
Date: Sun, 8 Feb 2026 14:34:44 +0200
Subject: [PATCH] Mark cyclone and loko as compilers. Add way to pass args to
 loko

---
 scheme-venv | 18 ++++++++++--------
 1 file changed, 10 insertions(+), 8 deletions(-)

diff --git a/scheme-venv b/scheme-venv
index 660acea..9cfe33b 100755
--- a/scheme-venv
+++ b/scheme-venv
@@ -86,7 +86,9 @@ mkdir -p "${venvpath}/install-prefix"
 ## Set scheme type if other than interpreter
 case "${implementation}" in
     "chicken") scheme_type=compiler ;;
+    "cyclone") scheme_type=compiler ;;
     "gambit") scheme_type=compiler ;;
+    "loko") scheme_type=compiler ;;
 esac
 
 ## bin/activate
@@ -160,9 +162,9 @@ if [ "${rnrs}" = "r6rs" ]; then
             scheme_repl_cmd="larceny -nobanner -quiet -utf8 -r6 -I \"${venvpath}/lib/.akku/lib\""
             ;;
           "loko")
-            scheme_cmd="LOKO_LIBRARY_PATH=\"${venvpath}/lib/.akku/lib\" loko --program \"\${IF}\""
-            scheme_repl_cmd="LOKO_LIBRARY_PATH=\"${venvpath}/lib/.akku/lib\" loko"
-            scheme_compile_cmd="LOKO_LIBRARY_PATH=\"${venvpath}/lib/.akku/lib\" loko -o \"\${OF}\" --compile \"\${IF}\""
+            scheme_cmd="LOKO_LIBRARY_PATH=\"${venvpath}/lib/.akku/lib\" loko \${VENV_LOKO_ARGS:-} --program \"\${IF}\""
+            scheme_repl_cmd="LOKO_LIBRARY_PATH=\"${venvpath}/lib/.akku/lib\" loko \${VENV_LOKO_ARGS:-}"
+            scheme_compile_cmd="LOKO_LIBRARY_PATH=\"${venvpath}/lib/.akku/lib\" loko \${VENV_LOKO_ARGS:-} --compile \"\${IF}\""
             ;;
           "mosh")
             scheme_cmd="mosh --loadpath=\"${venvpath}/lib/.akku/lib\" \"\${IF}\""
@@ -202,12 +204,12 @@ else
                 #scheme_cmd="LD_LIBRARY_PATH=\"${venvpath}/lib\" csi -R r7rs -I \"${venvpath}/lib\" -script \"\${IF}\""
                 scheme_cmd="echo \"Chicken script not supported\" && exit 1"
                 scheme_repl_cmd="echo \"Chicken repl not supported\" && exit 1"
-                scheme_compile_cmd="cd \"${venvpath}/lib\" && csc -static -keyword-style none -X r7rs -R r7rs \${VENV_CSC_ARGS:-} -I${venvpath}/include -L${venvpath}/lib -o \"\${OF}\" \"\${IF}\""
+                scheme_compile_cmd="cd \"${venvpath}/lib\" && csc -static -keyword-style none -X r7rs -R r7rs \${VENV_CHICKEN_ARGS:-} -I${venvpath}/include -L${venvpath}/lib -o \"\${OF}\" \"\${IF}\""
             else
                 #scheme_cmd="LD_LIBRARY_PATH=\"${venvpath}/lib\" csi -I \"${venvpath}/lib\" -script \"\${IF}\""
                 scheme_cmd="echo \"Chicken script not supported\" && exit 1"
                 scheme_repl_cmd="echo \"Chicken repl not supported\" && exit 1"
-                scheme_compile_cmd="cd \"${venvpath}/lib\" && csc -static -r7rs-syntax \${VENV_CSC_ARGS:-} -I${venvpath}/include -L${venvpath}/lib -o \"\${OF}\" \"\${IF}\""
+                scheme_compile_cmd="cd \"${venvpath}/lib\" && csc -static -r7rs-syntax \${VENV_CHICKEN_ARGS:-} -I${venvpath}/include -L${venvpath}/lib -o \"\${OF}\" \"\${IF}\""
             fi
             ;;
           "cyclone")
@@ -243,9 +245,9 @@ else
             scheme_repl_cmd="larceny -nobanner -quiet -utf8 -r7 -I \"${venvpath}/lib\""
             ;;
           "loko")
-            scheme_cmd="LOKO_LIBRARY_PATH=\"${venvpath}/lib\" loko -std=r7rs --program \"\${IF}\""
-            scheme_repl_cmd="LOKO_LIBRARY_PATH=\"${venvpath}/lib\" loko -std=r7rs"
-            scheme_compile_cmd="LOKO_LIBRARY_PATH=\"${venvpath}/lib\" loko -std=r7rs -o \"\${OF}\" --compile \"\${IF}\""
+            scheme_cmd="LOKO_LIBRARY_PATH=\"${venvpath}/lib\" loko -std=r7rs \${VENV_LOKO_ARGS} --program \"\${IF}\""
+            scheme_repl_cmd="LOKO_LIBRARY_PATH=\"${venvpath}/lib\" loko -std=r7rs \${VENV_LOKO_ARGS:-} "
+            scheme_compile_cmd="LOKO_LIBRARY_PATH=\"${venvpath}/lib\" loko -std=r7rs \${VENV_LOKO_ARGS:-} --compile \"\${IF}\""
             ;;
           "meevax")
             scheme_cmd="meevax -I \"${venvpath}/lib\" \"\${IF}\""