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

What should be the result of (take 0 "nonlist")

In the spirit of this bug report, I think it should be an error
http://bugs.racket-lang.org/query/?cmd=view&pr=11458

But right now it evaluates to the empty list.




On Wed, Jan 26, 2011 at 6:43 PM, Stephen Chang <stchang at ccs.neu.edu> wrote:
> Oh sorry, didnt read carefully. I now see that it wasnt my push you
> were replying to.
>
>
>
> On Wed, Jan 26, 2011 at 6:42 PM, Stephen Chang <stchang at ccs.neu.edu> wrote:
>> 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
>>>
>>
>