diff --git a/ansi-tests/encode-universal-time.lsp b/ansi-tests/encode-universal-time.lsp
index 9238722d3b7e98cb6288e0ebb895f2a77d475c68..1d1678b7544a3ae6b9cfb9dd8ca424571d119326 100644
--- a/ansi-tests/encode-universal-time.lsp
+++ b/ansi-tests/encode-universal-time.lsp
@@ -35,6 +35,7 @@
 	until (>= count 100))
   nil)
 
+#|
 (deftest encode-universal-time.2
   (loop with count = 0
 	for year = (+ 1901 (random 1000))
@@ -59,6 +60,7 @@
 	collect (progn (incf count) (list vals time decoded-vals))
 	until (>= count 100))
   nil)
+|#
 
 (deftest encode-universal-time.3
   (loop with count = 0