summaryrefslogtreecommitdiff
path: root/srfi/srfi-69.scm
diff options
context:
space:
mode:
Diffstat (limited to 'srfi/srfi-69.scm')
-rw-r--r--srfi/srfi-69.scm2
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."