diff --git a/collects/tests/file/unpackers.rkt b/collects/tests/file/unpackers.rkt
index eec6b69bd9..a87e0ccf6d 100644
--- a/collects/tests/file/unpackers.rkt
+++ b/collects/tests/file/unpackers.rkt
@@ -165,8 +165,8 @@
             (test do (tester))))
     cleanup))
 
-(define (untar-tests) (test do (run-tests untar-tests*)))
-(define (unzip-tests) (test do (run-tests unzip-tests*)))
+(define (untar-tests) (when tar-exe (test do (run-tests untar-tests*))))
+(define (unzip-tests) (when zip-exe (test do (run-tests unzip-tests*))))
 
 (module+ main (tests))
 (define (tests)