diff options
author | Ludovic Courtès <ludo@gnu.org> | 2007-12-13 12:27:37 +0000 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2007-12-13 12:27:37 +0000 |
commit | 70a4404429e198f37f52ddf73f6d9336277ed54c (patch) | |
tree | 346aed2d97a7136ea724966e165d51263503b1df /srfi/srfi-69.scm | |
parent | 2ae87f26a8f84a16944f9fcdd0bbcae45939a509 (diff) | |
download | guile-70a4404429e198f37f52ddf73f6d9336277ed54c.tar.gz |
Changes from arch/CVS synchronization
Diffstat (limited to 'srfi/srfi-69.scm')
-rw-r--r-- | srfi/srfi-69.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/srfi/srfi-69.scm b/srfi/srfi-69.scm index c000c2911..7da560b1b 100644 --- a/srfi/srfi-69.scm +++ b/srfi/srfi-69.scm @@ -143,7 +143,7 @@ follow them." (cond ((null? rest-list) (reverse! acc)) ((keyword? (first rest-list)) (lp acc (cddr rest-list))) - (else (lp (cons (first rest-list) acc) (rest rest-list)))))) + (else (lp (cons (first rest-list) acc) (cdr rest-list)))))) (define (guile-ht-ctor weakness) "Answer the Guile HT constructor for the given WEAKNESS." |