Update of /cvsroot/sbcl/sbcl/src/compiler/sparc
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11377/src/compiler/sparc
Modified Files:
call.lisp
Log Message:
0.8.14.18: non-x86 %listify-rest-args fixes
* Fix buildabillity on non-x86 arches. Tested only on
sparc, though.
Index: call.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/compiler/sparc/call.lisp,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- call.lisp 13 Sep 2004 05:40:30 -0000 1.5
+++ call.lisp 13 Sep 2004 22:51:39 -0000 1.6
@@ -1073,7 +1073,7 @@
(define-vop (listify-rest-args)
(:args (context-arg :target context :scs (descriptor-reg))
(count-arg :target count :scs (any-reg)))
- (:arg-types * tagged-num (:constant t))
+ (:arg-types * tagged-num)
(:temporary (:scs (any-reg) :from (:argument 0)) context)
(:temporary (:scs (any-reg) :from (:argument 1)) count)
(:temporary (:scs (descriptor-reg) :from :eval) temp)
|