At Wed, 26 Jan 2011 17:07:32 -0500, e...@racket-lang.org wrote: > + (let ([n0 (! n)]) > + (unless (exact-nonnegative-integer? n) > + (raise-type-error 'take "non-negative exact integer" 0 n l))
Still committing changes with no tests. Still broken: > (list-ref (take (car (list 1)) (list 2)) 0) take: expects type <non-negative exact integer> as 1st argument, given: #<promise!1>; other arguments were: '(2) _________________________________________________ For list-related administrative tasks: http://lists.racket-lang.org/listinfo/dev
