/[gcl]/gcl/ansi-tests/nsubstitute-if-not.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/nsubstitute-if-not.lsp

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

revision 1.1 by pfdietz, Thu Sep 26 16:53:38 2002 UTC revision 1.2 by camm, Wed Oct 9 19:05:01 2002 UTC
# Line 544  Line 544 
544           (x (copy-seq orig))           (x (copy-seq orig))
545           (result (nsubstitute-if-not 1 (is-not-eq-p 1) x :key #'1+ :start 1 :end 10)))           (result (nsubstitute-if-not 1 (is-not-eq-p 1) x :key #'1+ :start 1 :end 10)))
546      result)      result)
   #*01111111111010110)  
547      #*01111111111010110)

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

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