Retropikzel
/
foreign-c
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Bring things to new compile-r7rs

This commit is contained in:
retropikzel 2025-07-19 19:46:05 +03:00
parent 254cb2a318
commit c6d515cd4f
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Makefile
View File

@ -68,7 +68,7 @@ test: ${TMPDIR}/test/libtest.o ${TMPDIR}/test/libtest.so ${TMPDIR}/test/libtest.
LD_LIBRARY_PATH=. \ LD_LIBRARY_PATH=. \
GUILE_AUTO_COMPILE=0 \ GUILE_AUTO_COMPILE=0 \
timeout 60 \ timeout 60 \
./${TEST} printf "\n" | ./${TEST}
test-compile-r7rs-snow: ${TMPDIR}/test/libtest.o ${TMPDIR}/test/libtest.so ${TMPDIR}/test/libtest.a test-compile-r7rs-snow: ${TMPDIR}/test/libtest.o ${TMPDIR}/test/libtest.so ${TMPDIR}/test/libtest.a
cp tests/*.scm ${TMPDIR}/test/ cp tests/*.scm ${TMPDIR}/test/

2
tests/primitives.scm
View File

@ -345,4 +345,4 @@
(lambda () (read-line)))) (lambda () (read-line))))
(assert equal? (string=? file-content "Hello world 1") #t) (assert equal? (string=? file-content "Hello world 1") #t)
(exit) (exit 0)