cpu.ppc: integer>fixnum scratch area overlapped with the rest of stack frame, very bad

2009-08-22 20:23:28 -05:00 · 2009-08-22 20:23:28 -05:00 · b14dd8ab67
parent 1961b4da16
commit b14dd8ab67
1 changed files with 1 additions and 4 deletions
--- a/basis/cpu/ppc/ppc.factor
+++ b/basis/cpu/ppc/ppc.factor
@ -96,10 +96,7 @@ HOOK: reserved-area-size os ( -- n )
 ! frame, 8 bytes in size. This is in the param-save area so it
 ! does not overlap with spill slots.
 : scratch@ ( n -- offset )
-    stack-frame get total-size>>
-    factor-area-size -
-    param-save-size -
-    + ;
+    factor-area-size + ;

 ! GC root area
 : gc-root@ ( n -- offset )