From 5fbb8c8bc75cabd5c5f8c0b21c4f2958807d312e Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Thu, 4 Feb 2010 08:19:59 +1300 Subject: [PATCH] cpu.ppc: another fix --- basis/cpu/ppc/ppc.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/basis/cpu/ppc/ppc.factor b/basis/cpu/ppc/ppc.factor index 4f4411b314..c263f4110e 100644 --- a/basis/cpu/ppc/ppc.factor +++ b/basis/cpu/ppc/ppc.factor @@ -683,7 +683,7 @@ M:: ppc %restore-context ( temp1 temp2 -- ) rs-reg temp1 "retainstack" context-field-offset LWZ ; M:: ppc %save-context ( temp1 temp2 -- ) - temp1 "ctx" %vm-field-ptr + temp1 "ctx" %vm-field 1 temp1 "callstack-bottom" context-field-offset STW ds-reg temp1 "datastack" context-field-offset STW rs-reg temp1 "retainstack" context-field-offset STW ;