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 21:49:11 +03:00
parent b2c362bd78
commit 667ed5242f
2 changed files with 34 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
Jenkinsfile vendored
View File

@ -32,6 +32,33 @@ pipeline {
}
}
}
stage('sagittarius') {
agent {
docker {
image 'schemers/sagittarius:head'
args '--user=root'
}
}
steps {
script {
stage('init') {
catchError(buildResult: 'SUCCESS', stageResult: 'FAILURE') {
sh 'apt-get update && apt-get install -y git ca-certificates gcc make libffi-dev'
sh 'git clone https://github.com/ashinn/chibi-scheme.git --depth=1'
sh 'make -j8 -C chibi-scheme'
sh 'make -j8 -C chibi-scheme install'
sh 'snow-chibi install retropikzel.compile-r7rs'
}
}
stage('tap') {
catchError(buildResult: 'SUCCESS', stageResult: 'FAILURE') {
sh 'COMPILE_R7RS=sagittarius compile-r7rs -o tap-test-program retropikzel/tap/test.scm'
sh './tap-test-program'
}
}
}
}
}
}
post {
always {

14
makings.scm
View File

@ -12,10 +12,10 @@
" compile-r7rs -o tap-test-program retropikzel/tap/test.scm")
"./tap-test-program"))))
(map (lambda (scheme)
`(makings ((name ,scheme)
(image ,(string-append "schemers/" scheme ":head"))
(stages
(init ,@init)
(tap ,@(tap scheme))))))
'("chibi" "sagittarius")))
`((makings ,@(map (lambda (scheme)
`((name ,scheme)
(image ,(string-append "schemers/" scheme ":head"))
(stages
(init ,@init)
(tap ,@(tap scheme)))))
'("chibi" "sagittarius")))))