#lang scheme/base
(require scheme/contract
scheme/match
scheme/pretty
(planet schematics/schemeunit/test)
(planet untyped/unlib/debug)
(planet untyped/unlib/exn)
(only-in (file "text-ui.ss") test/text-ui))
(define-struct (exn:delirium exn) () #:transparent)
(define-struct (exn:fail:delirium exn:fail) () #:transparent)
(define-struct (exn:delirium:browser exn:delirium) (command) #:transparent)
(define-struct (exn:fail:delirium:browser exn:fail:delirium) (command) #:transparent)
(provide (all-from-out scheme/contract
scheme/match
scheme/pretty
(planet schematics/schemeunit/test)
(planet untyped/unlib/debug)
(planet untyped/unlib/exn))
(rename-out [test/text-ui test/text-ui/pause-on-fail])
(all-defined-out))