Index: /branches/ia32/level-1/x86-error-signal.lisp
===================================================================
--- /branches/ia32/level-1/x86-error-signal.lisp	(revision 9401)
+++ /branches/ia32/level-1/x86-error-signal.lisp	(revision 9402)
@@ -18,8 +18,12 @@
 (in-package "CCL")
 
+#+x8664-target
 (defun xp-argument-count (xp)
   (ldb (byte (- 16 x8664::fixnumshift) 0)
                     (encoded-gpr-lisp xp x8664::nargs.q)))
 
+#+x8632-target
+(defun xp-argument-count (xp)
+  (encoded-gpr-lisp xp target::nargs))
 
 
