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

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

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

revision 1.5 by pfdietz, Sat Feb 15 05:11:12 2003 UTC revision 1.6 by pfdietz, Wed Jun 18 11:55:24 2003 UTC
# Line 84  Line 84 
84     ("ABCDEF" "ABCDEF"))     ("ABCDEF" "ABCDEF"))
85    "ABCDEF")    "ABCDEF")
86    
87    (deftest string-capitalize.11
88      (string-capitalize (make-array '(0) :element-type nil))
89      "")
90    
91  (deftest string-capitalize.order.1  (deftest string-capitalize.order.1
92    (let ((i 0) a b c (s (copy-seq "abcdef")))    (let ((i 0) a b c (s (copy-seq "abcdef")))
93      (values      (values

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

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