projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fix :bug-309448 test for faster CPUs.
[sbcl.git]
/
src
/
code
/
string.lisp
diff --git
a/src/code/string.lisp
b/src/code/string.lisp
index
72df091
..
b7c0035
100644
(file)
--- a/
src/code/string.lisp
+++ b/
src/code/string.lisp
@@
-15,7
+15,7
@@
(defun string (x)
#!+sb-doc
"Coerces X into a string. If X is a string, X is returned. If X is a
(defun string (x)
#!+sb-doc
"Coerces X into a string. If X is a string, X is returned. If X is a
- symbol, X's pname is returned. If X is a character then a one element
+ symbol, its name is returned. If X is a character then a one element
string containing that character is returned. If X cannot be coerced
into a string, an error occurs."
(cond ((stringp x) x)
string containing that character is returned. If X cannot be coerced
into a string, an error occurs."
(cond ((stringp x) x)