diff --git a/pkgs/racket-pkgs/racket-test/tests/generic/base-interfaces.rkt b/pkgs/racket-pkgs/racket-test/tests/generic/base-interfaces.rkt
index 12f5e9a0e2..43c1a3e568 100644
--- a/pkgs/racket-pkgs/racket-test/tests/generic/base-interfaces.rkt
+++ b/pkgs/racket-pkgs/racket-test/tests/generic/base-interfaces.rkt
@@ -21,8 +21,11 @@
    (define (hash2-proc a h)
      (hash2 (tuple-ref a) h))])
 
-;; ok if these don't raise unbound id errors
-(write (tuple 5))
-(equal? (tuple 5) (tuple 5))
-(equal-hash-code (tuple 5))
-(equal-secondary-hash-code (tuple 5))
+(module+ test
+  (require rackunit racket/port)
+
+  ;; ok if these don't raise unbound id errors
+  (check-equal? (with-output-to-string (lambda () (write (tuple 5)))) "#0=#0#")
+  (check-equal? (tuple 5) (tuple 5))
+  (check-equal? (equal-hash-code (tuple 5)) 53)
+  (check-equal? (equal-secondary-hash-code (tuple 5)) 44))
diff --git a/pkgs/racket-pkgs/racket-test/tests/generic/tests.rkt b/pkgs/racket-pkgs/racket-test/tests/generic/tests.rkt
index 916d130c53..19a3330d4d 100644
--- a/pkgs/racket-pkgs/racket-test/tests/generic/tests.rkt
+++ b/pkgs/racket-pkgs/racket-test/tests/generic/tests.rkt
@@ -11,8 +11,8 @@
          (submod "defaults.rkt" test)
          (submod "errors.rkt" test)
          (submod "fallbacks.rkt" test)
+         (submod "base-interfaces.rkt" test)
          "syntax-errors.rkt"
-         "base-interfaces.rkt"
          "contract.rkt"
          "from-unstable.rkt"
          "poly-contracts.rkt"