cpu.ppc: another fix

diff --git a/basis/cpu/ppc/ppc.factor b/basis/cpu/ppc/ppc.factor
index 4f4411b31411e50816526fabbf015cf3230960cc..c263f4110e4d4d4c8629ea05a7ebf78d13d64590 100644 (file)
--- 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 ;