/[gcl]/gcl/ansi-tests/nstring-capitalize.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/nstring-capitalize.lsp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4 by pfdietz, Fri Feb 14 05:10:36 2003 UTC revision 1.5 by pfdietz, Wed Jun 18 11:55:24 2003 UTC
# Line 60  Line 60 
60     ("ABCDEF" "ABCDEF" "ABCDEf")     ("ABCDEF" "ABCDEF" "ABCDEf")
61     ("ABCDEF" "ABCDEF")))     ("ABCDEF" "ABCDEF")))
62    
63    (deftest nstring-capitalize.11
64      (nstring-capitalize "")
65      "")
66    
67    (deftest nstring-capitalize.12
68      (nstring-capitalize (make-array '(0) :element-type nil))
69      "")
70    
71  (deftest nstring-capitalize.order.1  (deftest nstring-capitalize.order.1
72    (let ((i 0) a b c (s (copy-seq "abcdef")))    (let ((i 0) a b c (s (copy-seq "abcdef")))
73      (values      (values

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26