diff --git a/core/cpu/ppc/architecture/architecture.factor b/core/cpu/ppc/architecture/architecture.factor
index 4890a199d2..9814242cd5 100644
--- a/core/cpu/ppc/architecture/architecture.factor
+++ b/core/cpu/ppc/architecture/architecture.factor
@@ -41,9 +41,9 @@ TUPLE: ppc-backend ;
 
 : factor-area-size 4 cells ;
 
-: xt-save ( n -- i ) cell - ;
+: next-save ( n -- i ) cell - ;
 
-: next-save ( n -- i ) 2 cells - ;
+: xt-save ( n -- i ) 2 cells - ;
 
 M: ppc-backend stack-frame ( n -- i )
     local@ factor-area-size + 4 cells align ;