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

New builds

This commit is contained in:
retropikzel 2026-07-22 22:09:28 +03:00
parent 8cfac7fff4
commit 6399043fa3
2 changed files with 4 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
Jenkinsfile vendored
View File

@ -1,7 +1,5 @@
pipeline { pipeline {
agent { agent any
label 'agent1'
}
options { options {
disableConcurrentBuilds() disableConcurrentBuilds()
buildDiscarder(logRotator(numToKeepStr: '10', artifactNumToKeepStr: '10')) buildDiscarder(logRotator(numToKeepStr: '10', artifactNumToKeepStr: '10'))
@ -28,10 +26,7 @@ pipeline {
} }
stage('tap') { stage('tap') {
catchError(buildResult: 'SUCCESS', stageResult: 'FAILURE') { catchError(buildResult: 'SUCCESS', stageResult: 'FAILURE') {
sh 'snow-chibi install --impls=chibi srfi.64' sh 'make SCHEME=chibi LIBRARY=tap all install test'
sh 'snow-chibi install --impls=chibi retropikzel.tap'
sh 'COMPILE_R7RS=chibi compile-r7rs -o tap-test-program retropikzel/tap/test.scm'
sh './tap-test-program'
} }
} }
} }
@ -58,10 +53,7 @@ pipeline {
} }
stage('tap') { stage('tap') {
catchError(buildResult: 'SUCCESS', stageResult: 'FAILURE') { catchError(buildResult: 'SUCCESS', stageResult: 'FAILURE') {
sh 'snow-chibi install --impls=sagittarius srfi.64' sh 'make SCHEME=sagittarius LIBRARY=tap all install test'
sh 'snow-chibi install --impls=sagittarius retropikzel.tap'
sh 'COMPILE_R7RS=sagittarius compile-r7rs -o tap-test-program retropikzel/tap/test.scm'
sh './tap-test-program'
} }
} }
} }

7
makings.scm
View File

@ -6,12 +6,7 @@
"snow-chibi install retropikzel.compile-r7rs")) "snow-chibi install retropikzel.compile-r7rs"))
(tap (tap
(lambda (scheme) (lambda (scheme)
`(,(string-append "snow-chibi install --impls=" scheme " srfi.64") (list (string-append "make SCHEME=" scheme " LIBRARY=tap all install test")))))
,(string-append "snow-chibi install --impls=" scheme " retropikzel.tap")
,(string-append "COMPILE_R7RS="
scheme
" compile-r7rs -o tap-test-program retropikzel/tap/test.scm")
"./tap-test-program"))))
`((makings ,@(map (lambda (scheme) `((makings ,@(map (lambda (scheme)
`((name ,scheme) `((name ,scheme)