diff --git a/lib/init.scm b/lib/init.scm index 8f1c6492..276914ae 100644 --- a/lib/init.scm +++ b/lib/init.scm @@ -651,8 +651,6 @@ (cond ((not (null? (cddr p))) (cond - ((not (list? (cddr p))) - (error "dotted ellipse" p)) ((any (lambda (x) (and (identifier? x) (compare x ellipse))) (cddr p)) (error "multiple ellipses" p))