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

Ok I'll add it.



On Wed, Jan 26, 2011 at 6:36 PM, Robby Findler
<robby at eecs.northwestern.edu> wrote:
> Also: you want a test that captures the reason Eli made the change in
> the first place, ie
>
>  (take 0 (car 'x))
>
> or something.
>
> Robby
>
> On Wed, Jan 26, 2011 at 5:14 PM,  <stchang at racket-lang.org> wrote:
>> stchang has updated `master' from 1ab22f7c2b to f60957282f.
>>  http://git.racket-lang.org/plt/1ab22f7c2b..f60957282f
>>
>> =====[ 1 Commits ]======================================================
>>
>> Directory summary:
>>  100.0% collects/tests/lazy/
>>
>> ~~~~~~~~~~
>>
>> f609572 Stephen Chang <stchang216 at gmail.com> 2011-01-26 18:14
>> :
>> | fix (take 0 nonemptylist) test in tests/lazy/langimpl.rkt
>> :
>>  M collects/tests/lazy/langimpl.rkt |    4 ++--
>>  M collects/tests/lazy/main.rkt     |    3 ++-
>>
>> =====[ Overall Diff ]===================================================
>>
>> collects/tests/lazy/langimpl.rkt
>> ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
>> --- OLD/collects/tests/lazy/langimpl.rkt
>> +++ NEW/collects/tests/lazy/langimpl.rkt
>> @@ -5,8 +5,8 @@
>>  ;; tests for lazy language constructs
>>
>>  (define (test-take)
>> -  (test (take 0 '(1 2 3)) => '())) ; test for push#22080
>> +  (test (! (take 0 '(1 2 3))) => '())) ; test for push#22080
>>
>>  (provide langimpl-tests)
>>  (define (langimpl-tests)
>> -  (test do (test-take)))
>> \ No newline at end of file
>> +  (test (test-take)))
>> \ No newline at end of file
>>
>> collects/tests/lazy/main.rkt
>> ~~~~~~~~~~~~~~~~~~~~~~~~~~~~
>> --- OLD/collects/tests/lazy/main.rkt
>> +++ NEW/collects/tests/lazy/main.rkt
>> @@ -3,5 +3,6 @@
>>  (require tests/eli-tester "promise.rkt" "lang.rkt" "langimpl.rkt")
>>
>>  (test do (lang-tests)
>> +      do (langimpl-tests)
>>       do (promise-tests)
>> -      do (langimpl-tests))
>> +)
>>
>