Update of /cvsroot/sbcl/sbcl/src/compiler/x86
In directory sc8-pr-cvs8.sourceforge.net:/tmp/cvs-serv29420/src/compiler/x86
Modified Files:
array.lisp
Log Message:
1.0.2.20:
Fix parenthetical typo.
Index: array.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/compiler/x86/array.lisp,v
retrieving revision 1.28
retrieving revision 1.29
diff -u -d -r1.28 -r1.29
--- array.lisp 29 Jan 2007 21:24:12 -0000 1.28
+++ array.lisp 7 Feb 2007 18:35:55 -0000 1.29
@@ -658,8 +658,8 @@
(inst ,ref-inst value
(make-ea :word :base object
:disp (- (+ (* vector-data-offset n-word-bytes)
- (* 2 (+ offset (tn-value index)))
- other-pointer-lowtag)))))
+ (* 2 (+ offset (tn-value index))))
+ other-pointer-lowtag))))
(t
(inst ,ref-inst value
(make-ea :word :base object :index index :scale 2
|