Index: /trunk/ccl/compiler/PPC/PPC32/ppc32-arch.lisp
===================================================================
--- /trunk/ccl/compiler/PPC/PPC32/ppc32-arch.lisp	(revision 5470)
+++ /trunk/ccl/compiler/PPC/PPC32/ppc32-arch.lisp	(revision 5471)
@@ -746,5 +746,5 @@
                           :code-vector-prefix ()
                           :gvector-types '(:ratio :complex :symbol :function
-                                           :catch-frame :structure :istruct
+                                           :catch-frame :struct :istruct
                                            :pool :population :hash-vector
                                            :package :value-cell :instance
Index: /trunk/ccl/compiler/PPC/PPC64/ppc64-arch.lisp
===================================================================
--- /trunk/ccl/compiler/PPC/PPC64/ppc64-arch.lisp	(revision 5470)
+++ /trunk/ccl/compiler/PPC/PPC64/ppc64-arch.lisp	(revision 5471)
@@ -811,5 +811,5 @@
                           :code-vector-prefix '(#$"CODE")
                           :gvector-types '(:ratio :complex :symbol :function
-                                           :catch-frame :structure :istruct
+                                           :catch-frame :struct :istruct
                                            :pool :population :hash-vector
                                            :package :value-cell :instance