diff --git a/ansi-tests/keyword.lsp b/ansi-tests/keyword.lsp
index e9f36551983105df68f15a829bb4f7ab4e6fb616..053e8d3f7de4f10a8b342c5704eda2fde890ecfe 100644
--- a/ansi-tests/keyword.lsp
+++ b/ansi-tests/keyword.lsp
@@ -30,7 +30,7 @@
       (import s kwp)
       ;; Check that it's a keyword
       (values
-       (eql (symbol-package s) kwp)
+       (eqlt (symbol-package s) kwp)
        (eqlt (find-symbol name kwp) s)
        (nth-value 1 (find-symbol name kwp))
        (notnot (typep s 'keyword))