Retropikzel
/
compile-r7rs
1
0
Fork 0
Code Issues 4 Pull Requests Releases Activity

Improvements to csc

This commit is contained in:
retropikzel 2025-01-31 19:28:50 +02:00
parent c18aaf26c5
commit 9d43fbd9a8
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compile-r7rs
View File

@ -46,6 +46,7 @@ case "${SCMC}" in
scm_cmd="csi -b -R r7rs $paths -script" scm_cmd="csi -b -R r7rs $paths -script"
;; ;;
csc) csc)
set -x
paths="-I $tmpdir" paths="-I $tmpdir"
objects="" objects=""
units="r7rs,scheme.base,scheme.case-lambda,scheme.char,scheme.complex,scheme.cxr,scheme.eval,scheme.file,scheme.inexact,scheme.lazy,scheme.load,scheme.process-context,scheme.read,scheme.repl,scheme.time,scheme.write,scheme.r5rs" units="r7rs,scheme.base,scheme.case-lambda,scheme.char,scheme.complex,scheme.cxr,scheme.eval,scheme.file,scheme.inexact,scheme.lazy,scheme.load,scheme.process-context,scheme.read,scheme.repl,scheme.time,scheme.write,scheme.r5rs"
@ -63,8 +64,9 @@ case "${SCMC}" in
objects="$objects ${lib%.sld}.o" objects="$objects ${lib%.sld}.o"
done done
done done
csc -X r7rs -R r7rs -cc ${CC} ${CSCFLAGS} -static -uses ${units} ${main} output="${main%.scm}"
chmod +x "$output" csc -X r7rs -R r7rs -cc ${CC} ${CSCFLAGS} -static -o "${output}" -uses ${units} ${main}
test -f "${output}" && chmod +x "${output}"
exit 0 exit 0
;; ;;
icyc) icyc)