Index: /trunk/ccl/compiler/PPC/PPC32/ppc32-backend.lisp
===================================================================
--- /trunk/ccl/compiler/PPC/PPC32/ppc32-backend.lisp	(revision 372)
+++ /trunk/ccl/compiler/PPC/PPC32/ppc32-backend.lisp	(revision 373)
@@ -20,5 +20,6 @@
 (eval-when (:compile-toplevel :execute)
   (require "NXENV")
-  (require "PPCENV"))
+  (require "PPCENV")
+  (require "PPC32-ARCH"))
 
 (defvar *ppc32-vinsn-templates* (make-hash-table :test #'eq))
@@ -48,5 +49,6 @@
 		:name :linuxppc32
 		:target-arch-name :ppc32
-		:target-foreign-type-data nil)
+		:target-foreign-type-data nil
+		:target-lisp-node-size 4)
   )
 
@@ -68,5 +70,6 @@
 		:name :darwinppc32
 		:target-arch-name :ppc32
-		:target-foreign-type-data nil)
+		:target-foreign-type-data nil
+		:target-lisp-node-size 4)
   )
 
@@ -92,5 +95,5 @@
 (fixup-ppc32-backend)
 
-#+ppc-target
+#+ppc32-target
 (setq *host-backend* *ppc32-backend* *target-backend* *ppc32-backend*)