From 30c86ef36a6834569979b6ae49d6b9d795541ec3 Mon Sep 17 00:00:00 2001 From: pfdietz <pfdietz@localhost> Date: Sun, 6 Oct 2002 12:45:12 +0000 Subject: [PATCH] Fixed busted test FIND-SYMBOL.8. --- ansi-tests/packages-01.lsp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ansi-tests/packages-01.lsp b/ansi-tests/packages-01.lsp index 6204560e..057110bb 100644 --- a/ansi-tests/packages-01.lsp +++ b/ansi-tests/packages-01.lsp @@ -38,8 +38,8 @@ car :external) (deftest find-symbol-8 - (ignore-errors (find-symbol "CAR" "COMMON-LISP-USER")) - car :inherited) + (values (ignore-errors (find-symbol "CAR" "COMMON-LISP-USER"))) + car #| :inherited |# ) (deftest find-symbol-9 (ignore-errors (find-symbol "CAR" "CL-TEST")) -- GitLab