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

Update image to trixie. Racket fixes

This commit is contained in:
retropikzel 2025-08-23 15:39:39 +03:00
parent 793127259c
commit c717aeadde
2 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
Dockerfile
View File

@ -1,4 +1,4 @@
FROM schemers/chibi:head AS build FROM debian:trixie-slim AS build
RUN mkdir -p ${HOME}/.snow && echo "()" > ${HOME}/.snow/config.scm RUN mkdir -p ${HOME}/.snow && echo "()" > ${HOME}/.snow/config.scm
RUN apt-get update && apt-get install -y \ RUN apt-get update && apt-get install -y \
build-essential \ build-essential \
@ -7,7 +7,8 @@ RUN apt-get update && apt-get install -y \
make \ make \
libffi-dev \ libffi-dev \
pandoc \ pandoc \
chicken-bin chicken-bin \
libc-dev
RUN mkdir -p /opt/compile-r7rs RUN mkdir -p /opt/compile-r7rs
RUN mkdir -p /opt/compile-r7rs/bin RUN mkdir -p /opt/compile-r7rs/bin
RUN mkdir -p /opt/compile-r7rs/lib RUN mkdir -p /opt/compile-r7rs/lib
@ -16,8 +17,11 @@ WORKDIR /builddir
COPY Makefile . COPY Makefile .
COPY compile-r7rs.scm . COPY compile-r7rs.scm .
COPY libs/ libs/ COPY libs/ libs/
#RUN git clone https://github.com/ashinn/chibi-scheme.git --depth=1
RUN git clone https://github.com/Retropikzel/chibi-scheme.git --depth=1 --branch=snow-chibi-chicken-static
RUN cd chibi-scheme && make -j 32 && make -j 32 install
RUN make PREFIX=/opt/compile-r7rs build-chicken-static && make PREFIX=/opt/compile-r7rs install RUN make PREFIX=/opt/compile-r7rs build-chicken-static && make PREFIX=/opt/compile-r7rs install
FROM debian:bookworm-slim FROM debian:trixie-slim
COPY --from=build /opt/compile-r7rs /opt/compile-r7rs COPY --from=build /opt/compile-r7rs /opt/compile-r7rs
ENV PATH=/opt/compile-r7rs/bin:${PATH} ENV PATH=/opt/compile-r7rs/bin:${PATH}

2
libs/data.sld
View File

@ -423,7 +423,7 @@
(apply string-append (apply string-append
`("printf" `("printf"
" " " "
"'#lang r7rs\\n(import (scheme base))\\n(include \"" "'#lang r7rs\\n(import (only (scheme base) include))\\n(include \""
,(path->filename library-file) ,(path->filename library-file)
"\")\\n" "\")\\n"
"'" "'"