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 | |
parent | 2ae87f26a8f84a16944f9fcdd0bbcae45939a509 (diff) | |
download | guile-70a4404429e198f37f52ddf73f6d9336277ed54c.tar.gz |
Changes from arch/CVS synchronization
Diffstat (limited to 'srfi')
-rw-r--r-- | srfi/ChangeLog | 5 | ||||
-rw-r--r-- | srfi/srfi-69.scm | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/srfi/ChangeLog b/srfi/ChangeLog index 401dfee22..ecb7679a2 100644 --- a/srfi/ChangeLog +++ b/srfi/ChangeLog @@ -1,3 +1,8 @@ +2007-12-13 Stephen Compall <s11@member.fsf.org> + + * srfi-69.scm (without-keyword-args): Use `cdr' instead of + `rest'. + 2007-12-03 Stephen Compall <s11@member.fsf.org> * srfi-69.scm: New file. 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." |