release
original commit: 13213ccad64fd8afa157bc278a485f175de9e56c
This commit is contained in:
parent
210e2e83e2
commit
3b0857d638
|
@ -180,6 +180,8 @@
|
||||||
(define seventh (polymorphic (compose fourth cdddr)))
|
(define seventh (polymorphic (compose fourth cdddr)))
|
||||||
(define eighth (polymorphic (compose fourth cddddr)))
|
(define eighth (polymorphic (compose fourth cddddr)))
|
||||||
|
|
||||||
|
(define rest (polymorphic cdr))
|
||||||
|
|
||||||
(define build-string
|
(define build-string
|
||||||
(lambda (n fcn)
|
(lambda (n fcn)
|
||||||
(unless (and (integer? n) (exact? n) (>= n 0))
|
(unless (and (integer? n) (exact? n) (>= n 0))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user