/[gcl]/gcl/ansi-tests/map.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/map.lsp

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

revision 1.2 by pfdietz, Tue Oct 1 12:39:56 2002 UTC revision 1.3 by pfdietz, Wed Oct 2 03:45:30 2002 UTC
# Line 125  Line 125 
125    (map '(simple-vector character) #'identity '(#\a #\b #\c #\d #\e))    (map '(simple-vector character) #'identity '(#\a #\b #\c #\d #\e))
126    "abcde")    "abcde")
127    
128    ;;; Use a more elaborate form of the simple-array type specifier
129  (deftest map-string.31  (deftest map-string.31
130    (map '(simple-array character *) #'identity "abcde")    (map '(simple-array character *) #'identity "abcde")
131    "abcde")    "abcde")
132    
133    ;;; Use a more elaborate form of the simple-array type specifier
134  (deftest map-string.32  (deftest map-string.32
135    (map '(simple-array character 5) #'identity "abcde")    (map '(simple-array character 5) #'identity "abcde")
136    "abcde")    "abcde")

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

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