[racket-dev] [plt] Push #22081: master branch updated

From: Stephen Chang (stchang at ccs.neu.edu)
Date: Wed Jan 26 18:42:18 EST 2011

That wasnt the bug that I was fixing.



On Wed, Jan 26, 2011 at 5:58 PM, Matthew Flatt <mflatt at cs.utah.edu> wrote:
> At Wed, 26 Jan 2011 17:07:32 -0500, eli at 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
>


Posted on the dev mailing list.