diff --git a/compiler/ppc/arith.lisp b/compiler/ppc/arith.lisp
index f1eca41fa0a5c5fb3f0c7d849c91a7b89a5cb918..6f841351209888636a9a10716477d433157bd56d 100644
--- a/compiler/ppc/arith.lisp
+++ b/compiler/ppc/arith.lisp
@@ -7,7 +7,7 @@
 ;;; Scott Fahlman (FAHLMAN@CMUC). 
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/ppc/arith.lisp,v 1.10 2005/11/04 04:29:46 rtoy Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/ppc/arith.lisp,v 1.11 2006/05/07 23:50:00 rtoy Exp $
 ;;;
 ;;;    This file contains the VM definition arithmetic VOPs for the MIPS.
 ;;;
@@ -270,6 +270,8 @@
 ;;; Special case fixnum + and - that trap on overflow.  Useful when we
 ;;; don't know that the output type is a fixnum.
 ;;;
+#+nil
+(progn
 (define-vop (+/fixnum fast-+/fixnum=>fixnum)
   (:policy :safe)
   (:results (r :scs (any-reg descriptor-reg)))
@@ -298,6 +300,7 @@
       (inst unimp (logior (ash (reg-tn-encoding r) 5)
 			  fixnum-additive-overflow-trap))
       (emit-label no-overflow))))
+)
 
 (define-vop (fast-*/fixnum=>fixnum fast-fixnum-binop)
   (:temporary (:scs (non-descriptor-reg)) temp)
diff --git a/compiler/ppc/parms.lisp b/compiler/ppc/parms.lisp
index cafad62b15d929c7c6df12b4db27d26adf547185..98398beecba682fe1fc673e1ed457d5441beb3c0 100644
--- a/compiler/ppc/parms.lisp
+++ b/compiler/ppc/parms.lisp
@@ -7,7 +7,7 @@
 ;;; Scott Fahlman or slisp-group@cs.cmu.edu.
 ;;;
 (ext:file-comment
-  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/ppc/parms.lisp,v 1.10 2006/01/18 15:21:26 rtoy Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/ppc/parms.lisp,v 1.11 2006/05/07 23:50:00 rtoy Exp $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -173,8 +173,7 @@
   cerror
   breakpoint
   function-end-breakpoint
-  after-breakpoint
-  fixnum-additive-overflow)
+  after-breakpoint)
 
 (defenum (:prefix object-not- :suffix -trap :start 16)
   list