dotted ellipsis no longer invalid

This commit is contained in:
Alex Shinn 2011-03-08 21:26:49 +09:00
parent 9ea986d34c
commit 9b8126cfc3

View file

@ -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))