Index: /trunk/source/level-0/PPC/ppc-misc.lisp
===================================================================
--- /trunk/source/level-0/PPC/ppc-misc.lisp	(revision 13352)
+++ /trunk/source/level-0/PPC/ppc-misc.lisp	(revision 13353)
@@ -1055,7 +1055,8 @@
 (defppclapfunction %static-inverse-cons ((n arg_z))
   (check-nargs 1)
-  (extract-lisptag. imm0 arg_z)
+  (extract-lisptag imm0 arg_z)
+  (cmpri imm0 0)
+  (ref-global temp0 static-cons-area)
   (bne @fail)
-  (ref-global temp0 static-cons-area)
   (la n '-128 n)
   (ldr imm0 target::area.ndwords temp0)