0.8.10.76:
[sbcl.git] / src / compiler / ir2tran.lisp
index 4dde647..cf611d4 100644 (file)
 (defoptimizer (%nip-values ir2-convert) ((last-nipped last-preserved 
                                                      &rest moved)
                                          node block)
-  #!-(or x86 alpha sparc)
-  (bug "%NIP-VALUES is not implemented on this platform.")
-  #!+(or x86 alpha sparc)
   (let (;; pointer immediately after the nipped block
        (2after (lvar-info (lvar-value last-nipped)))
        ;; pointer to the first nipped word