X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fx86-64%2Fcall.lisp;h=6676cc47a1308333aa44c7a7cd7c07866b3d795e;hb=6822034325136cde4e14773c83c3769b42721306;hp=8dfada6f0fa132f3a19b684d40e1502b2385307c;hpb=451d6e4af62dc8bbad57219c403d4395db84a4d6;p=sbcl.git

diff --git a/src/compiler/x86-64/call.lisp b/src/compiler/x86-64/call.lisp
index 8dfada6..6676cc4 100644
--- a/src/compiler/x86-64/call.lisp
+++ b/src/compiler/x86-64/call.lisp
@@ -1271,9 +1271,6 @@
     (inst mov value (make-ea :qword :base object :index value))))
 
 ;;; Turn more arg (context, count) into a list.
-(defoptimizer (%listify-rest-args stack-allocate-result) ((&rest args))
-  t)
-
 (define-vop (listify-rest-args)
   (:translate %listify-rest-args)
   (:policy :safe)