diff --git a/lib/srfi/1/selectors.scm b/lib/srfi/1/selectors.scm
index 66dca43c..678f689a 100644
--- a/lib/srfi/1/selectors.scm
+++ b/lib/srfi/1/selectors.scm
@@ -9,9 +9,9 @@
 (define (fifth ls)   (car (cdr (cdr (cdr (cdr ls))))))
 (define (sixth ls)   (car (cdr (cdr (cdr (cdr (cdr ls)))))))
 (define (seventh ls) (car (cdr (cdr (cdr (cdr (cdr (cdr ls))))))))
-(define (eighth ls)  (car (cdr (cdr (cdr (cdr (cdr (cdr ls))))))))
-(define (ninth ls)   (car (cdr (cdr (cdr (cdr (cdr (cdr (cdr ls)))))))))
-(define (tenth ls)   (car (cdr (cdr (cdr (cdr (cdr (cdr (cdr (cdr ls))))))))))
+(define (eighth ls)  (car (cdr (cdr (cdr (cdr (cdr (cdr (cdr ls)))))))))
+(define (ninth ls)   (car (cdr (cdr (cdr (cdr (cdr (cdr (cdr (cdr ls))))))))))
+(define (tenth ls)   (car (cdr (cdr (cdr (cdr (cdr (cdr (cdr (cdr (cdr ls)))))))))))
 
 (define (car+cdr x) (values (car x) (cdr x)))