Fixing output port
This commit is contained in:
parent
e78b5d722e
commit
b4cc683f08
|
@ -19,6 +19,7 @@
|
||||||
"eval.rkt")
|
"eval.rkt")
|
||||||
|
|
||||||
(define-runtime-path racket-mod "racket.rkt")
|
(define-runtime-path racket-mod "racket.rkt")
|
||||||
|
(define stdout (current-output-port))
|
||||||
|
|
||||||
(run-tests
|
(run-tests
|
||||||
(test-suite
|
(test-suite
|
||||||
|
@ -40,4 +41,5 @@
|
||||||
eval-tests
|
eval-tests
|
||||||
|
|
||||||
(test-case "Racket Interop"
|
(test-case "Racket Interop"
|
||||||
(dynamic-require racket-mod #f))))
|
(parameterize ([current-output-port stdout])
|
||||||
|
(dynamic-require racket-mod #f)))))
|
Loading…
Reference in New Issue
Block a user