From c3e6208b4454ff3639a7fd778c12ceacc9d3b2b8 Mon Sep 17 00:00:00 2001
From: pfdietz <pfdietz@localhost>
Date: Sat, 2 Aug 2003 20:01:44 +0000
Subject: [PATCH] Fixed typoes.

---
 ansi-tests/assoc-if-not.lsp | 2 +-
 ansi-tests/assoc-if.lsp     | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/ansi-tests/assoc-if-not.lsp b/ansi-tests/assoc-if-not.lsp
index e2b70e77..061157f8 100644
--- a/ansi-tests/assoc-if-not.lsp
+++ b/ansi-tests/assoc-if-not.lsp
@@ -141,7 +141,7 @@
   type-error)
 
 (deftest assoc-if-not.error.12
-  (classify-error (assoc-if-not #'identity ((a . b) :bad (c . d))))
+  (classify-error (assoc-if-not #'identity '((a . b) :bad (c . d))))
   type-error)
 
 (deftest assoc-if-not.error.13
diff --git a/ansi-tests/assoc-if.lsp b/ansi-tests/assoc-if.lsp
index be40c679..e9bca8f3 100644
--- a/ansi-tests/assoc-if.lsp
+++ b/ansi-tests/assoc-if.lsp
@@ -140,7 +140,7 @@
   type-error)
 
 (deftest assoc-if.error.12
-  (classify-error (assoc-if #'null ((a . b) :bad (c . d))))
+  (classify-error (assoc-if #'null '((a . b) :bad (c . d))))
   type-error)
 
 (deftest assoc-if.error.13
-- 
GitLab