Fixed sequence/c to work with multiple-element sequences.

This commit is contained in:
Carl Eastlund 2011-08-25 15:54:21 -04:00
parent 871ea6dc76
commit fe3d4c9fe6

View File

@ -225,8 +225,8 @@
(lambda (idx) idx) (lambda (idx) idx)
#f #f
(lambda (idx) (more?)) (lambda (idx) (more?))
(lambda (elem) #t) (lambda elems #t)
(lambda (idx elem) #t))))))) (lambda (idx . elems) #t)))))))
sequence?))) sequence?)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;