diff --git a/collects/tests/datalog/main.rkt b/collects/tests/datalog/main.rkt
index 1f4a66b048..b73ad061cd 100644
--- a/collects/tests/datalog/main.rkt
+++ b/collects/tests/datalog/main.rkt
@@ -19,6 +19,7 @@
          "eval.rkt")
 
 (define-runtime-path racket-mod "racket.rkt")
+(define stdout (current-output-port))
 
 (run-tests
  (test-suite
@@ -40,4 +41,5 @@
   eval-tests
   
   (test-case "Racket Interop"
-             (dynamic-require racket-mod #f))))
\ No newline at end of file
+             (parameterize ([current-output-port stdout])
+               (dynamic-require racket-mod #f)))))
\ No newline at end of file