Add support for the rackunit/gui test runner
This commit is contained in:
parent
40a952da0c
commit
f9b886f83b
|
@ -1,5 +1,6 @@
|
|||
#lang typed/racket
|
||||
(require typed/private/utils
|
||||
(require typed/racket/class
|
||||
typed/private/utils
|
||||
typed/private/rewriter
|
||||
"type-env-ext.rkt"
|
||||
(for-syntax syntax/parse))
|
||||
|
@ -108,7 +109,7 @@
|
|||
(require/typed
|
||||
rackunit/private/monad
|
||||
[#:opaque monad monad?])
|
||||
(define-type Seed (Option monad))
|
||||
(define-type Seed (U #f monad (Object)))
|
||||
|
||||
(define-type test-suite-handler-down
|
||||
(rackunit-test-suite (Option String) (Thunk Any) (Thunk Any) Seed -> Seed))
|
||||
|
|
Loading…
Reference in New Issue
Block a user