Files
ports/lang/mit-scheme/files/patch-microcode_step.c
T
Dag-Erling Smørgrav d4b99bae02 lang/mit-scheme: Unbreak with llvm 20 and newer
PR:		295431
MFH:		2026Q2
Reviewed by:	olgeni
Differential Revision:	https://reviews.freebsd.org/D57191
2026-05-23 13:46:13 +02:00

12 lines
436 B
C

--- microcode/step.c.orig 2022-09-07 06:01:33 UTC
+++ microcode/step.c
@@ -103,7 +103,7 @@ DEFINE_PRIMITIVE ("PRIMITIVE-APPLY-STEP", Prim_apply_s
POP_PRIMITIVE_FRAME (3);
install_traps (hooks);
{
- SCHEME_OBJECT * scan_stack = (STACK_LOC (- number_of_args));
+ SCHEME_OBJECT * scan_stack = (STACK_NEG (number_of_args));
SCHEME_OBJECT scan_list;
long i;
Will_Push (number_of_args + STACK_ENV_EXTRA_SLOTS + 1);