diff --git a/utils.rkt b/utils.rkt
index ad2dd2c..40c2eb1 100644
--- a/utils.rkt
+++ b/utils.rkt
@@ -603,9 +603,6 @@
 ;;; Randomness
 ;;; ==========
 
-(module+ test
-  (random-seed 0))
-
 ;;; Generates a stream of inexact random numbers.  The meaning of the
 ;;; arguments is the same as for the function random:
 ;;;
@@ -625,6 +622,7 @@
 
 (module+ test
   (test-case "in-random"
+    (random-seed 0)
     (check-equal? (stream->list (stream-take (in-random 100) 10))
                   '(85 65 20 40 89 45 54 38 26 62))
     (check-equal? (stream->list (stream-take (in-random 50 100) 10))