On 2023-04-19 12:27 p.m., John David Anglin wrote:
The current version of racket fails to build because of a typo:
gcc -Wdate-time -D_FORTIFY_SOURCE=2 -Ibc -Ibc/rktio -I/<<PKGBUILDDIR>>/src/rktio -I/<<PKGBUILDDIR>>/src/bc/include
-I/<<PKGBUILDDIR>>/src/version -I/<<PKGBUILDDIR>>/src/bc/src -Ibc/phase2 -g -O2 -ffile-prefix-map=/<<PKGBUILDDIR>>=. -Wformat
-Werror=format-security -Wdate-time -D_FORTIFY_SOURCE=2 -DUSE_SENORA_GC -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -o bc/src/setjmpup.o -c
/<<PKGBUILDDIR>>/src/bc/src/setjmpup.c
/<<PKGBUILDDIR>>/src/bc/src/setjmpup.c: In function ‘scheme_uncopy_stack’:
/<<PKGBUILDDIR>>/src/bc/src/setjmpup.c:337:30: error: ‘struct Scheme_Cont’ has
no member named ‘buf’
337 | + c->cont->buf.stack_size)
| ^~
compile failed
Things go a bit further with the following change:
dave@mx3210:~/debian/racket/racket-8.7+dfsg1/src/bc/src$ cat setjmpup.c.d
--- setjmpup.c.save 2022-11-15 20:49:35.000000000 +0000
+++ setjmpup.c 2023-04-19 17:26:34.316615331 +0000
@@ -334,7 +334,7 @@
if (c->cont) {
#ifdef STACK_GROWS_UP
top_delta = (((uintptr_t)c->cont->buf_ptr->buf.stack_from
- + c->cont->buf.stack_size)
+ + (uintptr_t)c->stack_size)
- (uintptr_t)c->stack_from);
#else
bottom_delta = ((uintptr_t)c->stack_from
bc/racketcgc1 -O info'@'compiler/cm -l- setup --boot /home/dave/debian/racket/racket-8.7+dfsg1/src/setup-go.rkt bc/compiled ignored bc/ignored.d
/home/dave/debian/racket/racket-8.7+dfsg1/src/bc/src/compile-startup.rkt bc/phase2/cstartup.inc bc/cstartup.zo
/home/dave/debian/racket/racket-8.7+dfsg1/src/bc/src/startup.inc
/home/dave/debian/racket/racket-8.7+dfsg1/src/version/racket_version.h
failed
in build-one
in loop
in module->hash
make[1]: *** [Makefile:18: all] Error 1
I doubt I have the top_delta calculation right.
There is a hppa system available for development to debian developers. Helge
can provide access to others.
Dave
--
John David Anglin dave.ang...@bell.net