release

original commit: 13213ccad64fd8afa157bc278a485f175de9e56c
1997-08-01 13:52:59 +00:00 · 1997-08-01 13:52:59 +00:00 · 3b0857d638
commit 3b0857d638
parent 210e2e83e2
1 changed files with 2 additions and 0 deletions
--- a/collects/mzlib/functior.ss
+++ b/collects/mzlib/functior.ss
@ -180,6 +180,8 @@
   (define seventh (polymorphic (compose fourth cdddr)))
   (define eighth (polymorphic (compose fourth cddddr)))

+   (define rest (polymorphic cdr))
+
   (define  build-string
     (lambda  (n  fcn)
       (unless  (and (integer? n) (exact? n) (>= n 0))