[racket] rackunit (success)

In rackunit, a cps interface like:
  (search where what found-proc not-found-proc)

Could be tested like:
  (test-begin
   (search
    where
    what
    (lambda (value) (fail "found something"))
    (lambda () (check-true #t "not found"))))

But, the second check would be nicer as (success "not found"), but I
don't see a "success" check. It is my first time using rackunit, so
maybe I'm overlooking something.

-- 
Anthony Carrico

-------------- next part --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 262 bytes
Desc: OpenPGP digital signature
URL: <http://lists.racket-lang.org/users/archive/attachments/20110620/19e18dde/attachment.sig>