Parent Directory | Revision Log | Patch
revision 1.4 by pfdietz, Wed Jun 18 11:55:24 2003 UTC | revision 1.5 by pfdietz, Sun Jul 27 03:47:37 2003 UTC | |
---|---|---|
# | Line 81 | Line 81 |
81 | "ABCDE") | "ABCDE") |
82 | ||
83 | (deftest string-downcase.11 | (deftest string-downcase.11 |
84 | :notes (:nil-vectors-are-strings) | |
85 | (string-downcase (make-array '(0) :element-type nil)) | (string-downcase (make-array '(0) :element-type nil)) |
86 | "") | "") |
87 | ||
88 | (deftest string-downcase.order.1 | (deftest string-downcase.order.1 |
89 | (let ((i 0) a b c (s (copy-seq "ABCDEF"))) | (let ((i 0) a b c (s (copy-seq "ABCDEF"))) |
90 | (values | (values |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |