[Chicken-users] TestBase collection style

[Kon Lovett]

Hi Ivan,

I added the 'test-collect' container:

  (test/collect "Collect Form 1"
    (do ([i 0 (+ 1 i)]) [(> i 9)]
      (+ i i) ; some code
      (collect-test (expect-eqv (conc "cft " i) i (modulo i 10))) )
  )

The above will generate ten tests, sort of. Really only one test  
evaluated ten times, so ten test results. (The '(conc "cft " i)' is  
just a way of generating a test name at runtime.) A collect container  
has the same basic semantics as a case container.

Also 'define-expect-nary' which is similar to a feature of SchemeUnit.

Best Wishes,
Kon