diff --git a/test-suite/tests/00-repl-server.test b/test-suite/tests/00-repl-server.test
index 54f518a66..2a46fc03b 100644
--- a/test-suite/tests/00-repl-server.test
+++ b/test-suite/tests/00-repl-server.test
@@ -27,15 +27,15 @@
 (define (call-with-repl-server proc)
   "Set up a REPL server in a separate process and call PROC with a
 socket connected to that server."
+  ;; The REPL server requires thread. The test requires fork.
+  (unless (and (provided? 'threads) (provided? 'fork) (provided 'AF_UNIX))
+    (throw 'unsupported))
+
   (let ((sockaddr      (make-socket-address AF_UNIX "/tmp/repl-server"))
         (client-socket (socket AF_UNIX SOCK_STREAM 0)))
     (false-if-exception
      (delete-file (sockaddr:path sockaddr)))
 
-    ;; The REPL server requires thread. The test requires fork.
-    (unless (and (provided? 'threads) (provided? 'fork))
-      (throw 'unsupported))
-
     (match (primitive-fork)
       (0
        (dynamic-wind