typed-racket/typed-racket-test/succeed/rackunit-suite.rkt
Jack Firth 6369753c28 Fix typed/rackunit contract exception when using run-tests (#583)
* Add a test that suites and run-tests work in typed/rackunit

* Fix Seed type

The "seed" parameter of fold-test-results is passed to each test suite but, near as I can tell, never actually interacted with by the suite.
2017-07-14 08:58:11 -04:00

11 lines
226 B
Racket

#lang typed/racket
(require typed/rackunit
typed/rackunit/text-ui)
(define passing-suite
(test-suite "Example Typed Rackunit test suite"
(check-equal? 1 1)))
(check-equal? (run-tests passing-suite 'quiet) 0)