0.6.10:

[sbcl.git] / src / code / interr.lisp

diff --git a/src/code/interr.lisp b/src/code/interr.lisp
index 0a97449..16a07f3 100644 (file)
--- a/src/code/interr.lisp
+++ b/src/code/interr.lisp
@@ -300,7 +300,7 @@
   (error 'simple-error
         :function-name name
         :format-control
-        "invalid array index, ~D for ~S (should have been less than ~D)"
+        "invalid array index ~D for ~S (should be nonnegative and <~D)"
         :format-arguments (list index array bound)))
 
 (deferr object-not-simple-array-error (object)