Index: /trunk/ccl/level-0/PPC/ppc-def.lisp
===================================================================
--- /trunk/ccl/level-0/PPC/ppc-def.lisp	(revision 848)
+++ /trunk/ccl/level-0/PPC/ppc-def.lisp	(revision 849)
@@ -179,8 +179,4 @@
   (check-nargs 1)
   (lwz arg_z ppc32::lisp-frame.backlink arg_z)
-  (rlwinm imm0 arg_z 30 0 0)            ; Bit 1 -> sign bit
-  (srawi imm0 imm0 31)                  ; copy sign bit to rest of word
-  (andc arg_z arg_z imm0)               ; arg_z = 0 if bit 1 was set
-  (rlwinm arg_z arg_z 0 0 29)           ; clear low two bits
   (blr))