X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcompiler%2Fir2tran.lisp;h=cf611d432588a580149a170ec8502f5a80eefca0;hb=e0697854ef9f4999c8585b64be1b282ce4725176;hp=ed620a88d264026bb8d2e85b98be00c6a53a4f6b;hpb=f1acc17f83cdfa9454a53bd0ee9bd0e9b9482817;p=sbcl.git

diff --git a/src/compiler/ir2tran.lisp b/src/compiler/ir2tran.lisp
index ed620a8..cf611d4 100644
--- a/src/compiler/ir2tran.lisp
+++ b/src/compiler/ir2tran.lisp
@@ -1285,9 +1285,6 @@
 (defoptimizer (%nip-values ir2-convert) ((last-nipped last-preserved 
 						      &rest moved)
                                          node block)
-  #!-(or x86 alpha sparc mips)
-  (bug "%NIP-VALUES is not implemented on this platform.")
-  #!+(or x86 alpha sparc mips)
   (let (;; pointer immediately after the nipped block
 	(2after (lvar-info (lvar-value last-nipped)))
 	;; pointer to the first nipped word