Red Hat Linux
Click URL instructions:
Right-click on ad, choose "Copy Link", then paste here →
(This may not be possible with some types of ads)
You seem to have CSS turned off.
Please don't fill out this field.
Briefly describe the problem (required):
Please provide the ad click URL, if possible:
Update of /cvsroot/sbcl/sbcl/tests
In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv3543/tests
188.8.131.52: fix invalid array index reporting for compiled code
* Index and bound were swapped around.
* Also fix the name in the type declamation for INVALID-ARRAY-INDEX-ERROR.
Thanks to Stas Boukarev.
RCS file: /cvsroot/sbcl/sbcl/tests/array.pure.lisp,v
retrieving revision 1.34
retrieving revision 1.35
diff -u -d -r1.34 -r1.35
--- array.pure.lisp 16 Jan 2009 12:13:41 -0000 1.34
+++ array.pure.lisp 23 Apr 2009 12:26:58 -0000 1.35
@@ -261,3 +261,16 @@
(= 3 (type-error-datum e))
(equal '(integer 0 (3)) (type-error-expected-type e)))
+(with-test (:name :out-of-bounds-error-details)
+ (assert (eq :good
+ (flet ((test (array i)
+ (aref array i)))
+ (test (eval '(vector 0 1 2 3)) 6))
+ (sb-int:invalid-array-index-error (e)
+ (when (and (equal '(integer 0 (4))
+ (type-error-expected-type e))
+ (eql 6 (type-error-datum e)))
Sign up for the SourceForge newsletter: