Index: /trunk/ccl/level-0/PPC/ppc-symbol.lisp
===================================================================
--- /trunk/ccl/level-0/PPC/ppc-symbol.lisp	(revision 393)
+++ /trunk/ccl/level-0/PPC/ppc-symbol.lisp	(revision 394)
@@ -80,6 +80,6 @@
   (lwzx temp0 imm4 imm3)
   (cmpwi temp0 ppc32::subtag-no-thread-local-binding)
+  (slwi imm3 imm3 ppc32::fixnumshift)
   (beq @sym)
-  (slwi imm3 imm3 ppc32::fixnumshift)
   (vpush imm4)
   (vpush imm3)
@@ -89,5 +89,5 @@
   @sym
   (lwz arg_z ppc32::svar.symbol svar)
-  (li arg_y 'ppc32::symbol.vcell)
+  (li arg_y '#.ppc32::symbol.vcell)
   (vpush arg_z)
   (vpush arg_y)
