Retropikzel
/
compile-r7rs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Remove support for mit-scheme

This commit is contained in:
retropikzel 2026-03-13 14:08:21 +02:00
parent 1543e1d62c
commit 3a7e8f61ab
2 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Jenkinsfile vendored
View File

@ -15,7 +15,7 @@ pipeline {
parameters { parameters {
string(name: 'R6RS_SCHEMES', defaultValue: 'capyscheme chezscheme guile ikarus ironscheme larceny loko mosh racket sagittarius ypsilon', description: '') string(name: 'R6RS_SCHEMES', defaultValue: 'capyscheme chezscheme guile ikarus ironscheme larceny loko mosh racket sagittarius ypsilon', description: '')
string(name: 'R7RS_SCHEMES', defaultValue: 'capyscheme chibi chicken cyclone foment gauche guile kawa larceny loko meevax mit-scheme mosh racket sagittarius skint stklos tr7 ypsilon', description: '') string(name: 'R7RS_SCHEMES', defaultValue: 'capyscheme chibi chicken cyclone foment gauche guile kawa larceny loko meevax mosh racket sagittarius skint stklos tr7 ypsilon', description: '')
} }
stages { stages {

3
compile-r7rs
View File

@ -3,7 +3,7 @@
set -eu set -eu
if [ "${COMPILE_R7RS:-}" = "" ]; then if [ "${COMPILE_R7RS:-}" = "" ]; then
echo "COMPILE_R7RS not set, possible values:" echo "COMPILE_R7RS not set, possible values:"
echo "capyscheme chezscheme chibi chicken cyclone foment gauche guile ikarus ironscheme kawa larceny loko meevax mosh mit-scheme racket sagittarius skint stklos tr7 ypsilon" echo "capyscheme chezscheme chibi chicken cyclone foment gauche guile ikarus ironscheme kawa larceny loko meevax mosh racket sagittarius skint stklos tr7 ypsilon"
exit 1 exit 1
fi fi
@ -84,7 +84,6 @@ case $rnrs in
loko) LOKO_LIBRARY_PATH="$prepend_dirs:$append_dirs" loko -std=r7rs --compile "$input_file"; loko) LOKO_LIBRARY_PATH="$prepend_dirs:$append_dirs" loko -std=r7rs --compile "$input_file";
if [ ! "${input_file%.scm}" = "$output_file" ]; then mv -f "${input_file%.sps}" "$output_file"; fi;; if [ ! "${input_file%.scm}" = "$output_file" ]; then mv -f "${input_file%.sps}" "$output_file"; fi;;
meevax) echo "$prefix meevax $prepend_dirs $append_dirs" >> "$output_file";; meevax) echo "$prefix meevax $prepend_dirs $append_dirs" >> "$output_file";;
mit-scheme) echo "$prefix mit-scheme --batch-mode $prepend_dirs $append_dirs" >> "$output_file";;
mosh) echo "$prefix MOSH_LOADPATH=$prepend_dirs:$append_dirs mosh" >> "$output_file";; mosh) echo "$prefix MOSH_LOADPATH=$prepend_dirs:$append_dirs mosh" >> "$output_file";;
racket) echo "$prefix racket -I r7rs $prepend_dirs $append_dirs --script" >> "$output_file";; racket) echo "$prefix racket -I r7rs $prepend_dirs $append_dirs --script" >> "$output_file";;
sagittarius) echo "$prefix sash -r7 $prepend_dirs $append_dirs" >> "$output_file";; sagittarius) echo "$prefix sash -r7 $prepend_dirs $append_dirs" >> "$output_file";;