Parent Directory | Revision Log | Patch
revision 1.1 by mdj, Thu Mar 20 13:22:45 2003 UTC | revision 1.2 by mdj, Thu Mar 20 14:12:54 2003 UTC | |
---|---|---|
# | Line 57 | Line 57 |
57 | (define (rassv key alist) | (define (rassv key alist) |
58 | (generic-rassoc key alist eqv?)) | (generic-rassoc key alist eqv?)) |
59 | ||
60 | (define (rassv key alist) | (define (rassq key alist) |
61 | (generic-rassoc key alist eq?)) | (generic-rassoc key alist eq?)) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |