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))