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

Fix testing

This commit is contained in:
retropikzel 2026-02-12 16:06:52 +02:00
parent 273a1644c5
commit 69a377410f
3 changed files with 10 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
.gitignore vendored
View File

@ -10,4 +10,5 @@ foreign
venv venv
tmp tmp
run-test* run-test*
Akku.*

8
Jenkinsfile vendored
View File

@ -28,6 +28,7 @@ pipeline {
stage("${SCHEME}") { stage("${SCHEME}") {
catchError(buildResult: 'SUCCESS', stageResult: 'FAILURE') { catchError(buildResult: 'SUCCESS', stageResult: 'FAILURE') {
sh "timeout 600 make SCHEME=${SCHEME} LIBRARY=${LIBRARY} RNRS=r6rs run-test-docker" sh "timeout 600 make SCHEME=${SCHEME} LIBRARY=${LIBRARY} RNRS=r6rs run-test-docker"
archiveArtifacts(artifacts: '*.json', allowEmptyArchive: true, fingerprint: true)
} }
} }
} }
@ -46,6 +47,7 @@ pipeline {
stage("${SCHEME}") { stage("${SCHEME}") {
catchError(buildResult: 'SUCCESS', stageResult: 'FAILURE') { catchError(buildResult: 'SUCCESS', stageResult: 'FAILURE') {
sh "timeout 600 make SCHEME=${SCHEME} LIBRARY=${LIBRARY} RNRS=r7rs run-test-docker" sh "timeout 600 make SCHEME=${SCHEME} LIBRARY=${LIBRARY} RNRS=r7rs run-test-docker"
archiveArtifacts(artifacts: '*.json', allowEmptyArchive: true, fingerprint: true)
} }
} }
} }
@ -55,10 +57,4 @@ pipeline {
} }
} }
} }
post {
success {
archiveArtifacts(artifacts: '*.json', allowEmptyArchive: true, fingerprint: true)
}
}
} }

14
Makefile
View File

@ -59,18 +59,18 @@ run-test-system: build
echo "(import (scheme base) (scheme write) (scheme read) (scheme char) (scheme file) (scheme process-context) (retropikzel mouth) (srfi 64) (retropikzel ctrf) (retropikzel ${LIBRARY}))" > run-test.scm echo "(import (scheme base) (scheme write) (scheme read) (scheme char) (scheme file) (scheme process-context) (retropikzel mouth) (srfi 64) (retropikzel ctrf) (retropikzel ${LIBRARY}))" > run-test.scm
echo "(test-runner-current (ctrf-runner))" >> run-test.scm echo "(test-runner-current (ctrf-runner))" >> run-test.scm
cat ${TESTFILE} >> run-test.scm cat ${TESTFILE} >> run-test.scm
if [ "${RNRS}" = "r7rs" ]; then snow-chibi install --always-yes srfi.64; fi if [ "${RNRS}" = "r7rs" ]; then snow-chibi install --impls=${SCHEME} --always-yes srfi.64; fi
if [ "${RNRS}" = "r7rs" ]; then snow-chibi install retropikzel.mouth; fi if [ "${RNRS}" = "r7rs" ]; then snow-chibi install --impls=${SCHEME} --always-yes retropikzel.mouth; fi
if [ "${RNRS}" = "r7rs" ]; then printf "1\n1\n" | snow-chibi install retropikzel.ctrf; fi if [ "${RNRS}" = "r7rs" ]; then snow-chibi install --impls=${SCHEME} --always-yes retropikzel.ctrf; fi
if [ "${SCHEME}" = "chezscheme" ]; then akku install akku-r7rs chez-srfi; fi if [ "${SCHEME}" = "chezscheme" ]; then akku install akku-r7rs chez-srfi; fi
if [ "${SCHEME}" = "ikarus" ]; then akku install akku-r7rs chez-srfi; fi if [ "${SCHEME}" = "ikarus" ]; then akku install akku-r7rs chez-srfi; fi
if [ "${SCHEME}" = "ironscheme" ]; then akku install akku-r7rs chez-srfi; fi if [ "${SCHEME}" = "ironscheme" ]; then akku install akku-r7rs chez-srfi; fi
if [ "${SCHEME}" = "racket" ]; then akku install akku-r7rs chez-srfi; fi if [ "${SCHEME}" = "racket" ]; then akku install akku-r7rs chez-srfi; fi
if [ "${RNRS}" = "r6rs" ]; then akku install; fi if [ "${RNRS}" = "r6rs" ]; then akku install; fi
if [ "${SCHEME}-${RNRS}" = "mosh-r7rs" ]; then snow-chibi install --always-yes srfi.64; fi if [ "${RNRS}" = "r7rs" ]; then snow-chibi install --impls=${SCHEME} ${PKG}; fi
if [ "${RNRS}" = "r7rs" ]; then snow-chibi install ${PKG}; fi rm -rf run-test
if [ "${RNRS}" = "r6rs" ]; then COMPILE_SCHEME=${SCHEME} compile-scheme run-test.sps; fi if [ "${RNRS}" = "r6rs" ]; then COMPILE_R7RS=${SCHEME} compile-scheme -I .akku/lib run-test.sps; fi
if [ "${RNRS}" = "r7rs" ]; then COMPILE_SCHEME=${SCHEME} CSC_OPTIONS="-L -lcurl" compile-scheme run-test.scm; fi if [ "${RNRS}" = "r7rs" ]; then COMPILE_R7RS=${SCHEME} CSC_OPTIONS="-L -lcurl" compile-scheme run-test.scm; fi
./run-test ./run-test
run-test-docker: run-test-docker: