Parent Directory | Revision Log | Patch
revision 1.7 by pfdietz, Wed Jun 18 13:11:11 2003 UTC | revision 1.8 by pfdietz, Sun Jul 27 03:47:37 2003 UTC | |
---|---|---|
# | Line 77 | Line 77 |
77 | t) | t) |
78 | ||
79 | (deftest make-string.10 | (deftest make-string.10 |
80 | :notes (:nil-vectors-are-strings) | |
81 | (let ((s (make-string 0 :element-type nil))) | (let ((s (make-string 0 :element-type nil))) |
82 | (values | (values |
83 | (notnot (stringp s)) | (notnot (stringp s)) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |