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

Test -I and -A

This commit is contained in:
retropikzel 2026-03-13 14:04:10 +02:00
parent ccb828df5c
commit 1543e1d62c
1 changed files with 16 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
Makefile
View File

@ -12,17 +12,27 @@ install:
install compile-r7rs ${PREFIX}/bin/compile-r7rs
test:
@# Misc
@rm -rf .tmp
@mkdir -p .tmp
@mkdir -p .tmp/libs
@mkdir -p .tmp/libs/foo
@mkdir -p .tmp/other_libs
@echo "(import (rnrs))" > .tmp/main.sps
@echo "(display \"Hello\") (newline)" >> .tmp/main.sps
@echo "(import (scheme base) (scheme write))" > .tmp/main.scm
@echo "(display \"Hello\") (newline)" >> .tmp/main.scm
@# R6RS testfiles
@printf "(import (rnrs) (foo bar))\n(baz)" > .tmp/main.sps
@printf "(library (foo bar) (export baz) (import (rnrs)) (define (baz) (display \"Hello from bar.sls\") (newline)))" > .tmp/libs/foo/bar.sls
@# R7RS testfiles
@printf "(import (scheme base) (scheme write) (foo bar))\n(baz)" > .tmp/main.scm
@printf "(define-library (foo bar) (import (scheme base) (scheme write)) (export baz) (include \"bar.scm\"))" > .tmp/libs/foo/bar.sld
@printf "(define (baz) (display \"Hello from bar.scm\") (newline))" > .tmp/libs/foo/bar.scm
@# Tests
@rm -rf .tmp/main
@if [ "${RNRS}" = "r6rs" ]; then cd .tmp && COMPILE_R7RS=${SCHEME} sh ../compile-r7rs -o main main.sps; fi
@if [ "${RNRS}" = "r7rs" ]; then cd .tmp && COMPILE_R7RS=${SCHEME} sh ../compile-r7rs -o main main.scm; fi
@if [ "${RNRS}" = "r6rs" ]; then cd .tmp && COMPILE_R7RS=${SCHEME} sh ../compile-r7rs -o main -I libs main.sps; fi
@if [ "${RNRS}" = "r7rs" ]; then cd .tmp && COMPILE_R7RS=${SCHEME} sh ../compile-r7rs -o main -I libs main.scm; fi
@cd .tmp && ./main
@rm -rf .tmp/main
@if [ "${RNRS}" = "r6rs" ]; then cd .tmp && COMPILE_R7RS=${SCHEME} sh ../compile-r7rs -o main -A libs main.sps; fi
@if [ "${RNRS}" = "r7rs" ]; then cd .tmp && COMPILE_R7RS=${SCHEME} sh ../compile-r7rs -o main -A libs main.scm; fi
@cd .tmp && ./main
test-docker: