diff --git a/ansi-tests/assoc-if-not.lsp b/ansi-tests/assoc-if-not.lsp
index e2b70e7730d142ea591ceb611dc08944daf64fbb..061157f8c316c165f22eb7d46b3c9df79d7c59d3 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 be40c679e94e755b9dfbb49bf241e38e58a5b927..e9bca8f3f444aa8c9f7c558316a8bcc8cb6e6754 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