Re: string-hash
Michael Sperber <[email protected]> Thu, 17 May 2012 15:37:07 +0200
| Newsgroups | gmane.lisp.scheme.scheme48 |
|---|---|
| Message-ID | <[email protected]> |
Jonathan Rees <[email protected]> writes: > http://www.cse.yorku.ca/~oz/hash.html > > vm/data/struct.scm has > > (define (vm-string-hash s) > (let ((n (vm-string-length s))) > (do ((i 0 (+ i 1)) > (h 0 (+ h (char->ascii (vm-string-ref s i))))) > ((>= i n) h)))) > > also other places in the source (but not srfi-13) > > I'm not complaining, just thought this might want to go on the to-do-someday list. Marcus Crestani fixed this in 2008. I just need to make a release with the fix in it. -- Cheers =8-} Mike Friede, Völkerverständigung und überhaupt blabla