projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
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
(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)
:format-arguments (list index array bound)))
(deferr object-not-simple-array-error (object)