Parent Directory | Revision Log | 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) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |