Update of /cvsroot/sbcl/sbcl/src/compiler/generic
In directory sc8-pr-cvs1:/tmp/cvs-serv6992/src/compiler/generic
Modified Files:
array.lisp
Log Message:
0.8.0.9:
Minor buglet fixes:
... remove bogus YES-OR-NO-P and Y-OR-N-P extra level of
indirection. (thanks to Antonio Martinez)
... make clocc-ansi-test whine less, by not making
COMPILER-ERROR inherit from SERIOUS-CONDITION
... add a couple of IGNORE/IGNORABLEs
Index: array.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/compiler/generic/array.lisp,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- array.lisp 11 Mar 2003 10:14:14 -0000 1.1
+++ array.lisp 27 May 2003 16:17:28 -0000 1.2
@@ -19,6 +19,7 @@
(:arg-types simple-array-nil positive-fixnum)
(:results (value :scs (descriptor-reg)))
(:result-types *)
+ (:ignore index value)
(:vop-var vop)
(:save-p :compute-only)
(:generator 1
@@ -41,8 +42,9 @@
(index :scs (unsigned-reg))
(value :scs (descriptor-reg)))
(:arg-types simple-array-nil positive-fixnum *)
- (:results (value :scs (descriptor-reg)))
+ (:results (result :scs (descriptor-reg)))
(:result-types *)
+ (:ignore index value result)
(:vop-var vop)
(:save-p :compute-only)
(:generator 1
|