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, <stch...@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 <stchang...@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)) > +) > _________________________________________________ For list-related administrative tasks: http://lists.racket-lang.org/listinfo/dev
