From bf0c4812cd28507b248f06b9da23e3840a64be34 Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Mon, 17 Aug 2015 11:42:17 -0400 Subject: [PATCH] adding test case --- rackunit-test/tests/rackunit/pr/5.rkt | 12 ++++++++++++ 1 file changed, 12 insertions(+) create mode 100644 rackunit-test/tests/rackunit/pr/5.rkt diff --git a/rackunit-test/tests/rackunit/pr/5.rkt b/rackunit-test/tests/rackunit/pr/5.rkt new file mode 100644 index 0000000..74cb693 --- /dev/null +++ b/rackunit-test/tests/rackunit/pr/5.rkt @@ -0,0 +1,12 @@ +#lang racket/base +(module+ test + (require rackunit + racket/port + rackunit/text-ui) + + (define t (open-output-string)) + (parameterize ([current-error-port t]) + (run-tests + (test-suite "x" + (check-not-false (displayln 0))))) + (check-equal? (get-output-string t) ""))