projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
0.8.1.34:
[sbcl.git]
/
src
/
code
/
early-extensions.lisp
diff --git
a/src/code/early-extensions.lisp
b/src/code/early-extensions.lisp
index
523754f
..
e195215
100644
(file)
--- a/
src/code/early-extensions.lisp
+++ b/
src/code/early-extensions.lisp
@@
-824,7
+824,7
@@
which can be found at <http://sbcl.sourceforge.net/>.~:@>"
(error 'simple-type-error ; maybe should be TYPE-BUG, subclass of BUG?
:value value
:expected-type type
(error 'simple-type-error ; maybe should be TYPE-BUG, subclass of BUG?
:value value
:expected-type type
- :format-string "~@<~S ~_is not a ~_~S~:>"
+ :format-control "~@<~S ~_is not a ~_~S~:>"
:format-arguments (list value type)))
\f
;;; Return a function like FUN, but expecting its (two) arguments in
:format-arguments (list value type)))
\f
;;; Return a function like FUN, but expecting its (two) arguments in