diff --git a/ansi-tests/gethash.lsp b/ansi-tests/gethash.lsp
index 68ab183f9672b3eeab20eed1515d98d08376f071..573b4fcaed189dcca30a4c2cc580a6ad1136893f 100644
--- a/ansi-tests/gethash.lsp
+++ b/ansi-tests/gethash.lsp
@@ -143,7 +143,7 @@
 			(gethash pz table)
 			(gethash nz table)))
 	unless (or (eql pz nz)
-		   (equal result '(:x :x nil :y :y :y)))
+		   (equal result '(:x :x :x :y :y :y)))
 	collect (list pz nz result))
   nil)